also ich will eine division mit einem ergebniss mit komma
in dem fall muss ich ja / einsetzen
dann würde das ja dann so aussehen
Delphi-Quellcode:
procedure TForm3.Button1Click(Sender: TObject);
var a,b,c : Integer;
begin
a:=StrtoInt (edit1.text);
b:=a / 60 / 60;
c:=b-Trunc(b);
Label1.caption:= FloattoStr (c);
end;
jedoch tritt dann dieser Fehler auf
b:=a / 60 / 60;
[Fehler] Unit3.pas(32): E2010 Inkompatible Typen: 'Integer' und 'Double'