Nach Showmessage Daten aus einem Editfeld einlesen

[kaddy]

Hallo,
danke Euch für die vielen hilfreichen Antworten. Habe mich für die Variate Label und Enter entschieden. Habe leider aber etwas Probleme sie umzusetzen. Hier mein Code:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
mac: integer;
per: integer;

begin
 data_init;
 bedarf_init;
 prod_struc_init;

 //Eingabe der Maschinendaten
  Label1.caption:='Anzahl Maschinen eingeben';
  TForm1.EingabefeldKeyDown(Sender,key,shift);
  mac:=strtoint(Eingabefeld.text);

end;



procedure TForm1.EingabefeldKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key =13 then 
end;

Was mache ich falsch? Er kann nicht complieren und springt auf key.
Danke!
Kaddy 8)
[edit=Daniel B]Delphi-Tags ergänzt. MfG Daniel B.[/edit]