Thema: Delphi Maskedit verwenden

Einzelnen Beitrag anzeigen

Benutzerbild von juergen
juergen

Registriert seit: 10. Jan 2005
Ort: Bönen
1.174 Beiträge
 
Delphi 11 Alexandria
 
#8

Re: Maskedit verwenden

  Alt 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)
  Mit Zitat antworten Zitat