f := meta.MetaItems[SMetaFrameDelay];
if f < 0 then f := 0;
// rounding ;-)
- c := f mod 27;
+ c := f mod 28;
if c < 13 then c := 0 else c := 1;
- f := (f div 27)+c;
+ f := (f div 28)+c;
if f < 1 then f := 1 else if f > 255 then f := 255;
_speed := f;
except
if wNeedTimeReset then
begin
- Time_Delta := (27777 div 1000);
+ Time_Delta := 28{(27777 div 1000)};
wNeedTimeReset := False;
end;
- t := Time_Delta div (27777 div 1000);
+ t := Time_Delta div 28{(27777 div 1000)};
if t > 0 then
begin
flag := True;
// Âðåìÿ ïðåäûäóùåãî îáíîâëåíèÿ:
if flag then
begin
- Time_Old := Time - (Time_Delta mod (27777 div 1000));
+ Time_Old := Time - (Time_Delta mod 28{(27777 div 1000)});
if (not wMinimized) then
begin
Draw();