Einzelnen Beitrag anzeigen

mat72

Registriert seit: 15. Mär 2012
35 Beiträge
 
#1

Mehrere Tasten in einer Procedure abfragen?

  Alt 26. Mär 2012, 10:38
Delphi-Version: 5
Hallo,
ich habe eine Form erstellt und will von einem Textfeld in das nächste wechseln mit Enter, Tab oder Mausklick.
Mit Enter das funktioniert super. Jetzt geht leider meine Tab-Taste nicht mehr.
Ist es möglich mit folgender Procedure mehrere Tasten abzufragen?

procedure TForm3.Edit13KeyPress(Sender: TObject; var Key: Char);
begin
if Key=#13 Key=#01 then
begin
try
mo2x:=StrToFloat(Edit13.Text);
Edit14.SetFocus;
mo2x:=mo2x;
except
ShowMessage('Please enter only Numbers!');
Edit13.Clear;
Edit13.SetFocus;
end;
end;
end;
end;
Vielen Dank für eure Hilfe. Bitte etwas Nachsicht, ich habe erst angefangen mit Delphi zu programmieren.
Gruss
Matthias
  Mit Zitat antworten Zitat