تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
منع الضغط بالماوس داخل الحقول النصية
#1
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته

في شاشة حذف ذاتية، اريد ان اجعل تركيز المستثمر على زري ( حذف - الغاء الامر )
اي بمعنى اخر اريد منعه من التنقل عبر الحقول النصية الموجودة على الشاشة

تم استخدام خاصية tabstop للحقول وجعلها على قيمة false
التنقل عبر التاب اصبح غير متاح امام المستخدم، ولكــــــــــــــــــــــن

ماذا لو ضغط بالماوس داخل احد تلك الحقول ؟؟؟

ملاحظة:
ارجو ان لا يكون الحل بجعل خاصية enable للحقول على القيمة false
وذلك من شانه، جعل الحقول رمادية اللون........وانا لا اريد هذا الحل

ارجو تعديل المثال المرفق، في اطار ما ذكرت اعلاه
والف شكر


الملفات المرفقة
.rar   Desktop.rar (الحجم : 373.99 ك ب / التحميلات : 55)
الرد }}}
تم الشكر بواسطة:
#2
Private Declare Function SetCapture Lib "user32" (ByVal hwnd As Integer) As Long



Private Sub txt_Customer_MouseEnter(sender As Object, e As EventArgs) Handles txt_Customer.MouseEnter, txt_fax.MouseEnter, txt_Mobile.MouseEnter, txt_Phone1.MouseEnter, txt_Phone2.MouseEnter, txt_Zatea_id.MouseEnter
SetCapture(Me.Handle)

End Sub
ربما هناك طرق اكثر فعالية ولكن هذا ما وجدته اثناء بحثي قبل فترة لتنفيذ هذا الامر
الرد }}}
تم الشكر بواسطة:
#3
الف شكر اخي
سنوسي
على اجابتك

فعلا الكود الذي تفضلت به، نجح في منع المستثمر من الضغط على الحقول النصية عن طريق الماوس،
ولكــــــــــــــن
بحاجة الى منع تغيير مؤشر الماوس عند الاقتراب من الحقول النصية، اي ان يبقى المؤشر على شكل سهم
الرد }}}
تم الشكر بواسطة:
#4
وجدت حل ابسط
ضع الكود
كود :
SendKeys.Send("{TAB}")

في حدث GotFocus للتيكست بوكس
الرد }}}
تم الشكر بواسطة:
#5
شكرا اخي
سنوسي على تواصلك معي

فعلا الحل الثاني واضح اكثر للفهم، وابسط

ولكن مازالت مشكلة شكل مؤشر الماوس ، الذي يجب ان يبقى على شكل سهم، لا ان يتغير الى الشكل المعتاد i عند الوقوف على النص
الرد }}}
تم الشكر بواسطة:
#6
من خصائص التكست بوكس غير Cursor الى default
>> ولاحظت انه يمكن الضغط بزر الماوس الايسر غير ShortcutsEnabled من نافذة الخصائص للتكست بوكس الى false
الرد }}}
تم الشكر بواسطة:
#7

السلام عليكم ورحمة الله وبركاته




من خلال سؤالك وتفاعل الأخ
سنوسي معك له كل التحية والتقدير، فهمت أن هدفك منع المستخدم من نسخ البيانات التي في مربعات النص

فالحل من ناحية
الفأرة (الماوس) قد ذكر الأخ سنوسي في رده الأخير.

ولكن تبقى ناحية
لوحة المفاتيح (الكيبورد)

إذا كنت تريد التطبيق على جميع مربعات النص يكون كالتالي
- من نافذة الخصائص غيّر الخاصية KeyPreview لـ Form إلى True
- ثم ضع هذا الأمر (مع تغيير الاسم
Button1 إذا كان مختلفاً)
PHP كود :
Private Sub Form1_KeyDown(ByVal sender As ObjectByVal e As System.Windows.Forms.KeyEventArgsHandles Me.KeyDown
    Me
.Button1.Focus()
End Sub 


أما إذا كنت تريد التطبيق على بعض مربعات النص وليس الكل فيكون كالتالي (مع إضافة مربعات النص القصودة بعد كلمة
Handles تفصل بينهم بفاصلة)
- ضع هذا الأمر
PHP كود :
Private Sub TextBox_KeyDown(ByVal sender As ObjectByVal e As System.Windows.Forms.KeyEventArgs_
Handles TextBox1
.KeyDown
    
If e.Modifiers Keys.Control Then
        e
.Handled True
        sender
.SelectionLength 0
    End 
If
End Sub 


وإذا كنت متضايقاً من شكل مؤشر الفأرة على مربعات النص فمن نافذة الخصائص غيّر الخاصية
Cursor لمربعات النص إلى Default




السلام عليكم ورحمة الله وبركاته
الرد }}}
تم الشكر بواسطة:
#8
ابو رائد ردك رائع وتنسيقك للرد أروع
لو سمحت بالله مر على موضوعي اللي تحت هذا
هو موضوعي الوحيد
والله مسبب لي دوخة
ولك الشكر الجزيل
الرد }}}
تم الشكر بواسطة:
#9
السلام عليكم

شكرا اخوتي
سنوسي
ابو رائد

على اجابتكم الرائعة والمفيدة

بقيت لدي مشكلة وحيدة فقط، موضحة بالصورة المرفقة
وهي تتمثل بامكانية المستثمر من الضغط بالماوس على الليست بوكس المتضمنة ( زبون - مورد - شريك) .....مما يؤدي الى تحريك المؤشر الى ما تم الضغط عليه

رغم انني وضعت في حدث Gotfocus لليست بوكس الكود المذكور senkeytab

هل بالامكان منع المستثمر من الضغط بالماوس داخل حقل الليست بوكس

والف شكر


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيفية انشاء فورم داخل مشروعى عاصم النجار 2 304 05-01-24, 12:36 AM
آخر رد: HALIM ELEULMA
  حماية عمود داخل ورقة الاكسل العيدروس 3 190 05-01-24, 12:21 AM
آخر رد: HALIM ELEULMA
  هل الداتا قراد فيو تسمح بتعدد الاسطر داخل الخلية عند جلب بيانات نصية طويله من قاعدة ب khalidalwdi 3 460 10-11-23, 11:08 AM
آخر رد: khalidalwdi
  [سؤال] حول ظهور النافذة الاولى عند الضغط على Menustrip2 في النافذة الثانية vb.net 2012 mh66 0 244 19-10-23, 09:05 AM
آخر رد: mh66
  يوجد مشكلة عند تحميل البيانات فى كمبوبوكس داخل داتا جريد new_programer 2 473 17-10-23, 06:51 PM
آخر رد: new_programer
  اريد اضافة متغيراخر داخل Listbox1 احتاج تعديل بسيط moh61 0 349 05-08-23, 02:29 PM
آخر رد: moh61
  اريد البحث عن ID داخل ListView من قاعدة بيانات لكل صنف معين moh61 6 695 26-07-23, 05:47 AM
آخر رد: Taha Okla
  اريد تغير حجم ال Panel عند التفيذ من داخل الكود moh61 2 403 23-07-23, 12:22 AM
آخر رد: أبووسم
  مساعدة كتابة التاريخ داخل داتا جريد فيو كريم عبودي 2 523 22-06-23, 12:28 AM
آخر رد: كريم عبودي
  اريد كود لمسح النص من textbox بمجرد الضغط على ال textebox للكتابة رهف العريفي 21 11,883 03-06-23, 04:56 AM
آخر رد: سعود

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم