Visual Basic içinde Form üzerindeki nesneyi sürükleyip bırakmak konusu , Burada örnek olarak command1 nesnesi seçilmiştir… Dim Fx As Integer Dim Fy As Integer Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Fx = ...
|
|
|||||||
| KAYIT OL | Yönetim Takımı | Üye Listesi | Tüm konuları okunmuş kabul et |
|
|
#1 (permalink) |
|
EN Afilli
![]() |
Burada örnek olarak command1 nesnesi seçilmiştir… Dim Fx As Integer Dim Fy As Integer Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Fx = X Fy = Y Command1.Drag 1 End Sub Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single) Command1.Left = X - Fx Command1.Top = Y - Fy End Sub
__________________
Geri döndüm
|
|
|
|
![]() |
| Konu Yönetim Seçenekleri | |
| Konu Gösterim Seçenekleri | |
|
|