Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#15

Re: Mit ENTER das Nächste Feld selektieren (so wie Tab)

  Alt 3. Apr 2006, 18:34
Zitat von alzaimar:
...Das funktioniert auch mit DBGrid und allen anderen Controls... wenn, ja wenn man der Form über
MyForm.KeyPreview = True sagt, das sie (die Form) die Tastendrücke bitte zuerst bekommen soll.
Das mag künstlerisch richtig sein, aber hier wird eher das Handwerk benötigt. Habe nachgeschaut :

Delphi-Quellcode:
procedure TfrmEin.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  EnterTab(Sender,Key,Shift,[],[],true);
end;

procedure TfrmEin.sgEnter(Sender: TObject);
begin
  KeyPreview := false;
  sg.SetFocus;
...
end;

procedure TfrmEin.sgExit(Sender: TObject);
begin
  KeyPreview := true;
end;

...
Luckie hat ja den Link zu EnterTab bereits gepostet. Die Controls der Form werden bei mir immer mit Enter verlassen / bestätigt. Dies bedeutet EnterTab setzen und KeyPreview auch auf true setzen. Aber eben NICHT im Grid (siehe Source) !!! Hier irrt sich der Künstler.
Gruß
Hansa
  Mit Zitat antworten Zitat