Forum: Sonstige Fragen zu Delphi
Delphi
by Sharky,
5. Nov 2005
Hai Chauffeur,
versuche es mal mit diesem Code im OnKeyDown der Form.
procedure TForm1.FormKeyDown(Sender: TObject; var Key: word; Shift: TShiftState);
var
Mgs: TMsg;
begin
if (ActiveControl is TDBEdit) then
begin
Forum: Sonstige Fragen zu Delphi
Delphi
by Sharky,
5. Nov 2005
Hai CH4.5
ersteinmal: "Herzlich Willkommen in der Delphi-PRAXiS" :hi:
Wie Du ja schon erkannt hast kannst Du mit
Perform(WM_NEXTDLGCTL, 0, 0)
zum nächsten Objekt in der Tabfolge springen.
Mit diesem Aufruf
Perform(WM_NEXTDLGCTL, 1, 0) kommst Du zu dem vorherigen Objekt.