Edit : string,char und Tasten

[daddy2000]

Hallo Leute,

habe mit Edit Feld so meine Probleme.

Möchte das der User in den Editfeldern des Forms nur Zahlen eingeben kann.
Nach eingabe ins Editfeld soll er dirkt ins nächste springen.

Es sind nur Zahlen von 0-10 möglich, bei drücken des + vom Numpad soll
eine 10 ins Editfeld.

Hier schon mal ein bischen code:

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

begin
 if not (Key in ['0'..'9',#8,#43]) then    //auf Zahlen prüfen
  Key := #0;

 if Edit1.Text = '+' Then
        Edit1.Text := '10';   //bei eingabe von + eine 10 einfügen

 PostMessage(Handle, WM_NEXTDLGCTL, 0, 0);    //automatisch nächstes Feld

end;

Das mit der Zahlenprüfung funktioniert,
automatisch das nächste Feld auch,
aber das mit + und 10 nicht.

hoffe ihr könnt helfen!

[edit=Christian Seehase]Delphi-Tags korrigiert. Mfg, Christian Seehase[/edit]