Fixed a bug causing floating point errors on various editing tasks.

This commit is contained in:
utak3r 2005-06-04 12:35:09 +00:00
parent 4d31a7c21a
commit 3945eca85e
2 changed files with 6 additions and 2 deletions

View File

@ -5,6 +5,7 @@ B1116907 Values Editing events
+ FR1183940 Added triangle rotation functions in the editors popup menu. + FR1183940 Added triangle rotation functions in the editors popup menu.
+ Added gradient drawing in a tooltip form in the gradient browser window. + Added gradient drawing in a tooltip form in the gradient browser window.
+ Editor window now has controls for precise moving and rotating triangles. + Editor window now has controls for precise moving and rotating triangles.
Fixed a bug causing floating point errors on big unzooming and other editing tasks.
2.02g 2.02g
+ Delphi2005 Project + Delphi2005 Project

View File

@ -404,8 +404,11 @@ begin
if FStop then if FStop then
Exit; Exit;
if (i and $F = 0) then if ((i and $F) = 0) then
Progress(i / nrbatches); if nrbatches > 0 then
Progress(i / nrbatches)
else
Progress(0);
// generate points // generate points
{$IFDEF TESTVARIANT} {$IFDEF TESTVARIANT}