تغییر زبان تایپ [بایگانی]

رهنورد2

یک شنبه 21 آبان 1385, 20:13 عصر

دوedit داریم چطور میشه وقتی اشاره گر بهر کدام پرید زبان تایپ به صورت خودکارعوض شود ودیگر کاربر کلید ها ی تغییر زبان تایپ را نفشرد.مثلا یکی
مخصوص زبان انگلیسی ودیگری فارسی.

فرزاد دلفی باز

یک شنبه 21 آبان 1385, 20:21 عصر

در رویداد Onenter

ActivateKeyboardLayout(0,1);

و در رویداد Onexit

ActivateKeyboardLayout(1,0);

یا برعکس

Mahdi_Delphi

یک شنبه 21 آبان 1385, 20:23 عصر

توی رویداد OnEnter :

LoadKeyboardLayout('00000429',KLF_ACTIVATE(;

00000409 برای انگلسیس

dkhatibi

یک شنبه 21 آبان 1385, 20:27 عصر

باید از تابع LoadKeyboardLayout استفاده کنی در لینک زیر DelphiAssistant به خوبی جواب داده است.
http://barnamenevis.org/forum/showthread.php?t=3251&highlight=loadkeyboardlayout
فقط در رویداد OnEnter شئ مورد نظر کدهای مربوطه رو بنویس مثلا برای Edit اولی

LoadKeyboardLayout('00000409',KLF_ACTIVATE);

و برای رویداد OnEnter شئ Edit دومی

LoadKeyboardLayout('00000429',KLF_ACTIVATE);

(در حین اینکه من این پست را مینوشتم دوستان چند پست فرستادند.)

maisam57

دوشنبه 22 آبان 1385, 07:34 صبح

از این روش هم میتونی استفاده کنی
توی ایونت onenter

ActivateKeyboardLayout(hkl_next,klf_reorder);

و توی ایونت onexit

ActivateKeyboardLayout(hkl_next,klf_reorder);

maisam57

دوشنبه 22 آبان 1385, 15:34 عصر

البته اینم بگم که بسته به زبان پیش فرضت داره