Registriert seit: 11. Jan 2004
Ort: Alsdorf
98 Beiträge
Delphi 7 Personal
|
Re: fmod problem?
28. Mai 2005, 14:17
Zitat von s.h.a.r.k:
hast du auch nen code, wo der trunc befehl einen fehler ergibt?!
zum bleistift 1:
Delphi-Quellcode:
dCurrentR:= 212.2
dCurrentG:= 212.2
dCurrentB:= 212.2
Canvas.Brush.Color := rgb(trunc(dCurrentR), trunc(dCurrentG), trunc(dCurrentB));
zum bleistift 2:
Delphi-Quellcode:
function getTimeDblSecStr (ATimeSec: Double): string;
var
i : integer;
begin
try
i:= TRUNC (ATimeSec);
except
GlobalData. SaveToFehlerLog ('TRUNC Fehler getTimeDblSecStr!');
Result:= '0:00';
EXIT;
end;
Result:= getTimeSecStr (i*1000); // wandelt integer in string um: 05:00 zum bsp
end;
Jan Karger Punk's not dead!!!
|