View Full Version : تایپ درست فارسی به همراه انگلیسی در textbox
setroyd
پنج شنبه 16 شهریور 1391, 02:54 صبح
بچها وقتی تایپ فارسی میکنی و کنارش کلمه انگلیسی مینوشتی در text box کلمه انگلیسی پشت کلمه فارسی قرار میگیره بجای جلوش , من سرچ کردم تو سایت پیدا نکردم دوستان اگه کسی بلد هست کمک کنه ممنون . یادمه با یه کلید ترکیبی این مثاله حل میشد ولی یادم رفته که چی بود ممنون میشم کمکم کنید .
M.T.P
پنج شنبه 16 شهریور 1391, 03:04 صبح
با Right to left کردن Textbox درست میشه.
محسن واژدی
پنج شنبه 16 شهریور 1391, 06:27 صبح
سلام علیکم
کد زیر را بررسی کنین: Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const KEYEVENTF_KEYUP = &H2
Private Const VK_RCONTROL As Long = &HA3
Private Const VK_RSHIFT As Long = &HA1
Private Sub Command1_Click()
Text1.SetFocus
keybd_event VK_RCONTROL, &H1D, 0, 0
keybd_event VK_RSHIFT, &H36, 0, 0
keybd_event VK_RSHIFT, &H36, KEYEVENTF_KEYUP, 0
keybd_event VK_RCONTROL, &H1D, KEYEVENTF_KEYUP, 0
End Sub
موفق باشید
setroyd
پنج شنبه 16 شهریور 1391, 12:56 عصر
با Right to left کردن Textbox درست میشه.
نه عزیز من ربطی به right to left نداره !
just4froum
پنج شنبه 16 شهریور 1391, 13:40 عصر
نه عزیز من ربطی به right to left نداره !
ببخشید ولی فکر کنم جناب M.T.P درست فرمودند.
آخه کد جناب واژدی هم همینکار رو می کنند. یعنی right to left رو برابر true و alignment رو برابر 1 میکند ( همون ctrl + shift خودمون )
نمی دونم شاید من اشتباه می کنم ؟!!:متفکر:
محسن واژدی
پنج شنبه 16 شهریور 1391, 14:10 عصر
نمی دونم شاید من اشتباه می کنم ؟!!:متفکر:
سلام علیکم
بله حق باشماست، کد پست 3 کلیدهای RCtrl+RShift را در زمانی که فوکوس در text-box قرار دارد ارسال میکند و در نتیجه آن همانطور که فرمودین کنترل RTL و راستچین میشود،
موفق باشید
M.T.P
پنج شنبه 16 شهریور 1391, 16:05 عصر
نه عزیز من ربطی به right to left نداره !!!!!
پس ربطش به چی بود ؟ :چشمک:
کد آقای واژدی هم TextBox رو Right to left می کنه ، در واقع عملیات کلیک راست تو Textbox و انتخاب گزینه Right to left Reading Order با این کد انجام میشه.
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.