سلام:
چطوری میشه یه editbox را کاریش کرد که فقط فارسی توش تایپ بشه؟
سلام:
چطوری میشه یه editbox را کاریش کرد که فقط فارسی توش تایپ بشه؟
میتونی از یک کامپوننت فاریس استفاده کنی یا تو ایونت OnKeyPressed کدهای فارسی رو معتبر بدونی.
اساتید عزیز درست گفتم؟
در مورد "فقط تایپ فارسی " من هم موافق هستم
اما اگر در مورد سوئیچ اتوماتیک روی فارسی منظورتونه میتونید از ارسال کد استفاده کنید
نوشته شده توسط سار
لطفا کدی را که باید در رویداد onkeypress بنویسم را برام بنویسید .
if key in 'a'..'z' or (key in 'A'..'Z') then
key:=#0;
0 کد بک اسپیس هست یعنی اگه بجای فارسی انگلیسی تایپ کنه پاک میشه :)
اگه روی ویندوزت امکانات فارسی نصب هست در رویداد OnEnter از کد زیر استفاده کن تا به محض ورود به Edit کیبورد فارسی فعال شود.
LoadKeyboardLayout(KLF_ACTIVATE,"00000401") ;
برای برگشتن به حالت انگلیسی در کد فوق به جای 0000401 از 00000409 استفاده کن
سلام
من زمانی که اطلاعات فارسی را از بانک اطلاعاتی بیرون می کشم و در listbox قرار میدم , روی سیستم خودم هیچ مشکلی ندارم ولی زمانی که برنامه رو به صورت exe به یک سیستم دیگه میبرم فارسی نشون نمیده
در حالیکه در قسمتهای دیگه هیچ مشکلی ندارم مثلا از بانک وقتی اطلاعات فارسی رو در یک label قرار میدم درست نشون میده.
لطف کنید و به دادم برسید.
دیگه واقعا کلافه شدم
:cry:
:-x
با اجازه میلاد جان من به جای Key=#0 مینویسم Key=#7
برای اون صدای بوق که یه هشدار هم باشه.
از پیشنهادهایی که ندادید ممنونم.
خودم پیدا کردم و درست شد.
:wink:
:P
میگفتی چی کار کردی بد نبود :)
دوست عزیز سلام
من برای حل این مشکل نیاز به استفاده Unicode داشتم هر چی گشتم نتونستم که Unicode رو براش معرفی کنم
مشکل خیلی جالبی بود و فکر نمی کردم نتونم حلش کنم در هر صورت با download کردن یه
component به اسم tntunicodecontrols تونستم حلش کنم.
ولی خیلی جالب بود که Delphi 7 هم با تمام امکاناتش این مشکل رو داشت. البته شاید راه حلی هم در خود دلفی موجود باشه ولی من متاسفانه سوادم نم کشیده است و نتونستم راهی رو پیدا کنم.
:wink:
خوب عزیز اگه اون کامپوننت رو اینجا بزاری بقیه هم استفاده کنن بد نیست! :D :wink:
قوانین ایجاد تاپیک در تالار
پاسخ با نقل قول