dann gibts bei
Label4.Caption:=IntToStr(Ergebnis);
den Fehler
[Fehler] Unit1.pas(47): Es gibt keine überladene Version von 'IntToStr', die man mit diesen Argumenten aufrufen kann
Zitat:
procedure TForm1.Button1Click(Sender: TObject);
begin
Zahl1:=strtofloat(Edit1.Text);
Zahl2:=strtofloat(Edit2.Text);
Ergebnis:=Zahl1+Zahl2;
Label4.Caption:=IntToStr(Ergebnis);
end;
da habe ich alle "inttostr" zu "floattostr" gemacht, doch dann gibts bei:
Ergebnis:=Zahl1 div Zahl2; // die Division
den Fehler
[Fehler] Unit1.pas(70): Operator ist auf diesen Operandentyp nicht anwendbar
aber um den Fehler einfach zu umgehen und mal auszutesten habe ich "div" durch "+" ersetzt, dann kann ich den Code zwar compilieren, aber das Ergebnis ist immer noch Null!?