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?
z1,z2 ...sind die 3 Edit-Felder.
Danke schon mal im vorraus.
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.