Image – İmaj-(V.Basic-Kaynak1)

Bir resmi görüntüleyebilen grafik tipte bir nesnedir. Bu özelliğiyle resim kutusuna benzer. Daha az istem kaynağı kullanır ve mouse ile tıklandığı zaman komut butonuna benzer özellik gösterir.





Image - Özellikler



Align

Appearance

Autosize

BorderStyle

Container

DataField

DataFormat

DataMember

DataSource


DragIcon

DragMode

Enabled

Height

Index

Left

MouseIcon

MousePointer

Name




OleDragMode

OleDropMode

Parent

Picture

Stretch

Tag

Top

Visible

WhatsThisHelpID

Width

Align : Image’ın form üzerindeki yerini belirler

Autosize : Image boyutlarının resim boyutlarına göre otomatik ayarlanması

Stretch : Resmin Image boyutlarına otomatik olarak ayarlanması


Image - Olaylar





Click

DblClick

DragDrop

DragOver


MouseDown

MouseMove

MouseUp

OleDragDrop




OleDragOver

OleCompleteDrag

OleGiveFeedBack

OleSetData

OleStartDrag


Image - Yöntemler





Drag

Move


OleDrag

Refresh


ShowWhatsThis

Zorder



Çalışma Anında Resim Eklemek

Private Sub Command1_Click()

Image1.Picture = LoadPicture("d:\depo\bjk.jpg")
End Sub



Çalışma Anında Resim Silmek

Private Sub Command1_Click()

Image1.Picture = LoadPicture("")
End Sub



Resmi Fare ile Küçültüp Büyütmek


(General)(Declalaration)
Private genisle As Boolean

Private Sub Form_Load()
Image1.Stretch = True
End Sub

Private Sub Image1_MouseDown(Button As Integer, _
Shift As Integer, X As Single, Y As Single)
genisle = True
End Sub

Private Sub Image1_MouseMove(Button As Integer, _
Shift As Integer, X As Single, Y As Single)
If Not genisle Then Exit Sub
If (X >= 0) And (Y >= 0) Then
Image1.Move 0, 0, X, Y
End If
End Sub

Private Sub Image1_MouseUp(Button As Integer, _
Shift As Integer, X As Single, Y As Single)
genisle = False
End Sub