Registriert seit: 10. Jan 2005
Ort: Bönen
1.174 Beiträge
Delphi 11 Alexandria
|
Re: Maskedit verwenden
9. Jun 2008, 20:19
@Hansa,
im KeyDown muss allerdings der äquivalente Word-Wert für #13 eingegeben werden:
Delphi-Quellcode:
procedure TFrmPCBNrGUI.txtDisplayPCB3KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key in [$0D]) then
begin
txtDisplayPCB4.SetFocus;
end;
end;
//Ende Klugs...
Jürgen Indes sie forschten, röntgten, filmten, funkten, entstand von selbst die köstlichste Erfindung: der Umweg als die kürzeste Verbindung zwischen zwei Punkten. (Erich Kästner)
|