[mounzerlb]

السلام عليكم
أريد صنع حالتين للزر commad
الحالة الأولى أثناء الضغط
الحالة الثانية عندما يعود لطبيعته
المشروع نجح عندما استخدمت هذا الحدت

كود :

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

End Sub

كود :

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

End Sub

ولكن في حالة شاشة التاتش لم يعد للموس دور فلم يعد يعمل زر command
فهل من طريقة أخرى؟
مع الشكر الجزيل