Kleinste Zahl herausfinden

paderborner

Grünschnabel
Hallo,

ich möchte eine Delphi-Programm schreiben (also in Pascal) mit dem über 3 Edit-Felder drei Zahlen einlesen kann und Delphi mir dann in einem Label die kleinste von den drei Zahlen ausgibt. Leider funktioniert das bisher nicht. Woran könnte das liegen?

Code:
procedure TForm1.Button1Click(Sender: TObject);
VAR z1,z2,z3:integer;
    ergebnis: integer;

begin

if z1>z2 then ergebnis:=z2 else ergebnis:=z1;
if z2>z3 then ergebnis := z3;

label1.Caption := StrToInt(ergebnis);


end;

end.

z1,z2 ...sind die 3 Edit-Felder.

Danke schon mal im vorraus.;)
 
Hi,
z1, z2 und z3 sind nicht die Edit-Felder, sondern lokale Integer-Variablen, die offenbar nicht initialisiert werden. Wo liest du denn die Werte aus den drei Eingabefeldern ein?
 
Zurück