Schleifen Bedingung

[daredd]

hi,
ich habe eine if-then-Schlefe und die soll nur ausgeführt werden wenn unter Edit3 (ein TEdit) eine Zahl steht und keine buchstaben.

bisher bin ich nur so weit:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
if Edit3.Text=integer then
begin
Person.Caption:=Edit1.Text;
Medikament.Caption:=Edit2.Text;
Frequenz.Caption:=Edit3.Text;
end;
end;

was muss ich nach if schreiben damit das alles so funktioniert wie ich mir das vorstelle.

[edit=SirThornberry]Programmiersprache korrigiert da es hier wohl nicht um .Net geht - Mfg, SirThornberry[/edit]