Anasayfa / Delphi / Delphi dbgrid enter tab

Delphi dbgrid enter tab

Delphi Dbgrid üzerinde iken enter tuşuna basınca tab tuşuna basılmış gibi sonraki column a geçme kodu.

procedure Tfrm_fatura.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
if DBGrid1.Columns.Grid.SelectedIndex < DBGrid1.Columns.Count - 1 then
DBGrid1.Columns[DBGrid1.Columns.grid.SelectedIndex + 1].Field.FocusControl
else
begin

DBGrid1.Columns[0].field.FocusControl;
end;

Hakkında ibrahim

İlgili Makaleler

borlndmm.dll disable delphi

Kod yürütülmesi devam edemiyor çünkü borlndmm.dll bulunamadı. Programı yeniden yüklemek bu sorunu çözebilir. borlndmm.dll gerekliliğini …

Bir cevap yazın

E-posta hesabınız yayımlanmayacak.