Kontrola PictureBox

Prethodna strana

Kontrola PictureBox se primarno koristi za prikaz slike. Slika koja će biti prikazana u okviru ove kontrole određuje se svojstvom kontrole Picture. Argument za svojstvo Picture je ime fajla (i putanju do njega) koji sadrži sliku.

Za prikaz slike u vremenu izvođenja programa koristi se  funkcija LoadPicture:

picSlika.Picture = LoadPicture("VANGOGH.BMP")

Ova kontrola može da se koristi i kao kontejner za druge kontrole. Slično kao sa kontrolom frame mogu se postaviti druge kontrole preko picture box-a. Često se picture box, kao kontejner, koristi za paletu alata ili statusnu liniju. Može da se koristi i kao pozadina po kojoj se može crtati, za prikaz teksta, grafike ili čak jednostavne animacije.

Primer 7.- Upotreba kontrole PictureBox kao pozadine za crtanje (Na CD-u 7.2.Crtanje-PictureBox\ Crtanje.vbp):

Option Explicit

Public A, B As Integer

Private Sub Command1_Click()

    Picture1.Cls

End Sub

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

    If Button = 1 Then Picture1.Line (A, B)-(X, Y)

    A = X: B = Y

End Sub

Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

    If Button = 1 Then Picture1.Line (X, Y)-(X + 15, Y + 15)

End Sub

Primer 7- .EXE verzija

Izgled forme za primer 7:

Prethodna strana