استفاده از enter در textbox

[xneda]

سلام دوستان !
می خوام هنگامی که کاربر اطلاعاتش رو توی یک textbox وارد کرد با فشردن کلید enter کنترل به textbox بعدی منتقل بشه .
یکی این موضوع و دیگه اینکه چطور بگم که کدوم textbox فعال بشه ؟

ممنونم .

[داوود]

Tab هر یک از TextBoxها را به ترتیب مورد نظر مرتب کن سپس در رویداد OnShow فرم تایپ کن
form1.KeyPreview:=true
و بعد در رویداد OnKeyPress فرم تایپ کن
if (Key=#13) then
begin
Key:=#0
( postmessage(form1.Handle,WM_NEXTDLGCTL,0,0
end
موفق باشی :sunglass:

[disappear]

در Event - Onkeypress TextBox بنویس :

if key=#13 then
textbox2.setfocus;

[سیروس مقصودی]

لطفا KeyPreview فرم را در حالت True قرار بده و دستور زیر را در قسمت OnKeyPress فرم بنویس

if key = #13 then
begin
key := #0 ;
Perform(CM_DIALOGKEY,vk_tab,0)
end;


و برای فعال نمودن یک Textbox کافی است دستور زیر را بنویسی

TextBox1.SetFocus

:موفق: :موفق: :موفق:

[xneda]

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

:oops:

[محمد میرمصطفی]

همه راهنماییهایی که دوستان کردن محدوده به یه Thread یعنی اگه این پیغامها رو از یا Thread دیگه بفرستید، کار نمی کنه. به نظر من بهترین راه SelectNext هستش.