Einzelnen Beitrag anzeigen

Phistev
(Gast)

n/a Beiträge
 
#7

Re: Mit ENTER-Taste von EDITFeld zu EDITFeld und zur AUSGABE

  Alt 10. Sep 2005, 16:32
Mit key:=#0 wird verhindert, dass die Taste noch weiterverarbeitet wird. Man könnte es aber noch weiter vereinfachen:
Delphi-Quellcode:
if Key = #13 then begin
  if Sender = Edit1 then Edit2.SetFocus
  else if Sender = Edit2 then Edit3.Setfocus
  {...}
  else if Sender = Editx then Button1.Click; //Editx ist das letzte Eingabefeld
  key:= #0;
end;
Damit braucht man nur eine Methode für alle Edit-Felder.

/edit: Key:= #0 vergessen
  Mit Zitat antworten Zitat