Komisch...
Delphi-Quellcode:
var ErgTemp : Real;
ErgTempInt : Integer;
begin
ErgTemp:=9.7;
ErgTempInt:=Trunc(ErgTemp * 10);
ShowMessage(IntToStr(ErgTempInt));
end;
...gibt bei mir auch 96. Warum das bei dir 97 sind, ist mir ein Rätsel
Gruss Otto PS: Sorry wenn ich manchmal banale Fragen stelle. Ich bin Hobby-Programmierer und nicht zu faul die SuFu zu benutzen