پیمایش edit text در دلفی

[yashar666]

با سلام چطوری میشه با زدن اینتر مثلا بین 10 تا ایدیت به ترتیب جلو رفت در واقه همون کاری که کلید tab می کنه ممنونم

[m-khorsandi]

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key = vk_return then
Perform(WM_NEXTDLGCTL, 0, 0);
end;

[mehdi_mohamadi]

در on key press‌ هر edit کدهای زیر را تایپ کنید.
if key=#13 then
edit2.setfocuse;

[babak869]

میتونید از این کد هم استفاده نمایید . دیگه نیازی نیست که معین کنید کنترل بعدی چیه.فقط در زمان طراحی فرم ترتیب TabOrder فراموش نشود



procedure TForm2.DBEdit1KeyPress(Sender: TObject; var Key: Char);
begin
If Key = #13 Then Begin
If HiWord(GetKeyState(VK_SHIFT)) <> 0 then
SelectNext(Sender as TWinControl,False,True)
else
SelectNext(Sender as TWinControl,True,True);
Key := #0
end;
end;

موفق باشید

[حرفه ای]

ابن همه یک روش دیگه


If Key=#13 Then
begin
Key:=#0;
PostMessage(Handle,WM_NEXTDLGCTL,0,0);
end;

[حمیدرضاصادقیان]

البته به جای این که تک تک در داخل هر Editbox این دستور رو بنویسی بهتره در داخل onkeydown فرم اصلی دستورت رو بنویسی و ترتیب taborder ها رو درست کنی به راحتی کار میکنه.در ضمن keypreview فرم هم روی true تنظیم کنید.

[nasr]

این خیلی خوبه

من که خیلی باهاش حال میکنم

[m-khorsandi]

در on key press‌ هر edit کدهای زیر را تایپ کنید.
لازم نیست کدهای تکراری بنویسی،
برای یکی از Edit ها بنویس و در بقیه استفاده (http://www.barnamenevis.org/forum/showthread.php?t=61772) کن.

[seaman202008]

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


در event presskey


if key=#13 then
activecontrol:=edit1;

[oracle]

activecontrol:=edit1;


چه کاری انجام می دهد؟


البته به جای این که تک تک در داخل هر Editbox این دستور رو بنویسی بهتره در داخل onkeydown فرم اصلی دستورت رو بنویسی و ترتیب taborder ها رو درست کنی به راحتی کار میکنه.در ضمن keypreview فرم هم روی true تنظیم کنید.

در این حالت که دوست عزیزمون فرمودن دیگه نمی شه یک سری شرط کنترلی برای داده ها گذاشت . مثلا کنترل اینکه فرمت تاریخ وارد شده صحیح است یه نه

[oracle]

یک سوال دیگه در همین ضمینه .

این کار رو چطور می شه در یک dbgrid انجام داد. بطوری که عمل Tab رو بر روی کالم ها انجام بده؟؟؟