Работаю на Delphi7, пишу игрушку используя DelphiХ,
на моём компе всё работает без проблем, но на
некоторых компах происходит затормаживание
прорисовки кадров. В кодах по обработке поведения
спрайтов ошибок нет, компы тоже не слабые,
догадываюсь что это из-за тймера код привидён ниже.
Может кто встречался с подобной проблемой помоготе
procedure TForm2.DXTimer1Timer(Sender: TObject; LagCount: Integer);
begin
if not DXDraw1.CanDraw then exit;
DXInput1.Update;
DXSpriteEngine1.Move(LagCount);
DXSpriteEngine1.Dead;
DXDraw1.Surface.Fill(0);
DXSpriteEngine1.Draw;
with DXDraw1.Surface.Canvas do
begin
Textout(20, 30, 'Demo');
Release;
end;
DXDraw1.Flip;
end;