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 :

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

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?