PDA

View Full Version : سوال: enable و disable کردن یک تکس باکس



look20
جمعه 05 آذر 1389, 19:51 عصر
با سلام و خسته نباشید این فایل ضمیمه کردم یه تکس باکس که با دستور mousemove در اون enable=fasle میشه ولی اگه بخام وقتی موس رو از تکس باکس خارج کردن enable=true بشه باید چکار کنم
ممنون

Ali_Prodes
جمعه 05 آذر 1389, 20:13 عصر
با سلام

می تونید درون رویداد Form_MouseMove دوباره TextBox رو فعال کنید و یا درون رویداد

MouseMove هر کنترل دیگری که اطراف TextBox قرار دارد ، دوباره TextBox رو فعال کنید .

ali190
جمعه 05 آذر 1389, 20:18 عصر
سلام
کدوم ضمیمه؟

look20
جمعه 05 آذر 1389, 20:22 عصر
با سلام روشی که گفتید رو قبلا امتحان کردم خودتونForm_MouseMove رو امتحان کنید جواب نمیده

MouseMove هر کنترل دیگری که اطراف TextBox قرار دارد ، دوباره TextBox رو فعال کنید . مثلا از چی استفاده کنم یه تکس باکس دیگه؟ میخام کاری کنم که از طریق یه تکس باکس دیگه نباشه میخام هروقت از تکس باکس خارج شدم خودش فعال بشه نه اینکه از طریق ورود به تکس باکس دیگه فعال شه
ببخشید ضمیمه کردم

mohsen_archi
جمعه 05 آذر 1389, 22:26 عصر
همونطوری که دوستمون گفتند از خاصیت MouseMove هر کنترلی که اطراف TextBox هست استفاده کنید، اگر هم نیست از خاصیت MouseMove فرمت استفاده کن
چیزی ضمیمه نکردید:متفکر:

pcdownload.bloghaa.com
جمعه 05 آذر 1389, 23:16 عصر
با عرض سلام خدمت دوستان

در مورد این مساله استفاده از mouse_move فرم به این راحتی ها هم نیست.
اگه امتحان کنید متوجه حرف من خواهید شد.
اما کد زیر مشکلت را حل میکنه:

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
a = X < Text1.Left Or X > Text1.Left + Text1.Width
b = Y < Text1.Top Or Y > Text1.Top + Text1.Height
If a Or b Then
Text1.Enabled = True
End If
End Sub

Private Sub Text1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Text1.Enabled = False
End Sub