NumBlock und Tastatur in Delphi ?? (bin neu)

[SvenD]

Ja, mit StrToFloat arbeite ich ja bereits, mein Taschenrechner funktioniert ja auch, also ich kann +,-,*,/,wurzel,x²,cos,sin,tan und Kommerzahlen berechnen, ich kann das eingabefeld "löschen"-leeren, hab nen Button zum schließen des Taschenrechners

weiterer Code:

Delphi-Quellcode:

procedure TForm1.plusClick(Sender: TObject);
begin
wert1 := strToFloat(eingabe.Text);
eingabe.text:='';
rechenart:=1;
end;

und hauptrechenarten definiert in einem case of:

Delphi-Quellcode:

procedure TForm1.gleichClick(Sender: TObject);
begin
wert2 := StrToFloat(eingabe.Text);

case rechenart of
1: ergebnis:=wert1+wert2 ;
2: ergebnis:=wert1-wert2 ;
3: ergebnis:=wert1*wert2 ;
4: ergebnis:=wert1/wert2 ;
end;
eingabe.Text :=Floattostr(ergebnis)
end;

Mein Problem: Wenn ich den Taschenrechner starte, dann funktiniert zwar alles, aber ich kann die Zaheln nur über anklicken in das Editfeld bekommen, oder über die Tastatur, wenn das Editfeld angewählt ist.

Ich möchte aber die zahlen die ich berechnen möchte immer mit der Tastatur eingeben können, sowie +,-,.. auch, also so das ich das Programm geöffnet habe aber dann statt Maus, den Ziffernblock benutzen kann.

mfg SvenD