الموضوع الرسمي لإستفسارات المبرمجين في لغات البرمجة [يرجى المساهمة من جميع المبرمجين]

[WaHdAiN]

* كيف يمكنني التحكم بأوامر رمز البرنامج المصغر بجوار الساعة؟ (النقر باليمين-باليسار-النقر المزدوج-إلخ)

هذا الكود مشروحاً ^_^

[PHP]Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Select Case (X \ Screen.TwipsPerPixelX)
'عند مرور الماوس على الأيقونة
Case &H200
MsgBox "لقد مر الماوس على الأيقونة ^_^", vbInformation

'عند النقر على الأيقونة بالفأرة نقرة واحدة
Case &H202
Me.Caption = "WaHdAiN"

'عند النقر المزدوج على الأيقونة بالفأرة
Case &H203
If WindowState = vbMinimized Then
Me.WindowState = vbNormal
Me.Visible = True
End If

'عند النقر بالزر الأيمن على الأيقونة
Case &H205
PopupMenu Mnu_File

End Select
End Sub [/PHP]
إستبدل كلمة Mnu_File بإسم القائمة التي تريد ظهورها عند النقر بالزر الأيمن (يجب ان تكون قد عملت هذه القائمة مسبقا)