Moin Paul jr.
eine Möglichkeit:
Erstelle Dir eine eigenen TEdit Komponente, in der Du die Tabulatortaste abfängst:
Delphi-Quellcode:
type // Abfangen der Navigationstasten
TmyEdit = class(TEdit)
private
procedure WMGetDlgCode(var msg: TWMGetDlgCode); message WM_GETDLGCODE;
end;
//...
implementation
procedure TmyEdit.WMGetDlgCode(var msg: TWMGetDlgCode);
begin
inherited;
// Ja, dieses Edit soll die TAB Taste "sehen"
msg.Result := msg.Result or DLGC_WANTTAB;
end;
Wenn Du dass dann, z.B. so erzeugst, und eine entsprechende Routine zuweist bekommt das neue Edit Feld direkt mit, dass TAB gedrückt wurde.
Delphi-Quellcode:
procedure TfrmMAIN.FormCreate(Sender: TObject);
begin
with TMyEdit.Create(self) do
begin
OnKeyDown := Edit1KeyDown;
Parent := frmMAIN;
end;
end;