• ¡Welcome to Square Theme!
  • This news are in header template.
  • Please ignore this message.
مهمان عزیز خوش‌آمدید. ورود عضــویت


امتیاز موضوع:
  • 13 رای - 2.08 میانگین
  • 1
  • 2
  • 3
  • 4
  • 5
Title: غیر فعال کردن کلیک راست تکست باکس (ویژوال بیسیک 6)
حالت خطی
#1
Disable TextBox control's right click context menu to appear without using any API.... There are several other hard ways to do this (like SendMessage, Hooking etc.) But here is the most simple three line code you can use in your application - No API !
Only thing to remember while using this code is - there should at least be one more control on your VB form other than your text box control and textbox's tabindex should not be 0 !


با سورس زیر یاد میگیرید چه چگونه کلیک راست را بر روی تکست باکس غیر فعال کنید :

کد:
Dim bIsRightClk As Boolean
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 2 Then
     bIsRightClk = True
End If

End Sub
Private Sub Form_Load()
     bIsRightClk = False
End Sub
Private Sub Text1_GotFocus()
   If bIsRightClk = True Then
          Text1.Enabled = False
          Me.SetFocus
          Text1.Enabled = True
   End If
End Sub
گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
 
پاسخ
  


پیام‌های این موضوع
غیر فعال کردن کلیک راست تکست باکس (ویژوال بیسیک 6) - توسط Amin_Mansouri - 11-06-2012، 02:44 PM

موضوعات مشابه ...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  سه فیلتر در نمایس لیست باکس aghamali 0 2,438 07-11-2017، 10:39 PM
آخرین ارسال: aghamali
  کد یافتن عدد در تکست باکس aghamali 0 2,277 07-09-2017، 04:00 PM
آخرین ارسال: aghamali
  سورس کدهای ویژوال بیسیک Amin_Mansouri 8 18,466 05-15-2017، 04:35 PM
آخرین ارسال: minarad69
  سورس کد شماره گیری از مودم (ویژوال بیسیک 6 ) Amin_Mansouri 1 7,061 05-07-2017، 06:54 PM
آخرین ارسال: alikorg
  جابجایی در لیست باکس aghamali 0 3,326 03-14-2016، 07:41 PM
آخرین ارسال: aghamali
  چگونه فایل exe با ویژوال بیسیک بسازیم ؟ Amin_Mansouri 4 14,632 08-13-2015، 10:08 PM
آخرین ارسال: Amin_Mansouri
  مشکل با ارور ویژوال بیسیک aghamali 4 7,997 07-03-2015، 11:14 AM
آخرین ارسال: aaaaaaaaa
  سورس کد کار با وب کم (ویژوال بسیک 6) Amin_Mansouri 1 8,572 04-20-2015، 10:10 PM
آخرین ارسال: hackert41389
  انتخاب رندوم از لیست باکس aghamali 0 2,594 04-16-2015، 06:30 AM
آخرین ارسال: aghamali
  مشکل با paste بیسیک 6 aghamali 1 3,963 01-18-2015، 08:53 PM
آخرین ارسال: aghamali

پرش به انجمن:


Browsing: 1 مهمان