Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Allgemeine Beschleunigungsprozedur

    Delphi
    by Flo.Hoe, 22. Mär 2007
  Ich hab es jetzt noch verfeinert, sodass man auch geringere Beschleunigungen einstellen Kann.
  
  
  procedure TForm1.Timer1Timer(Sender: TObject);
  begin
  s:=s+ds;
  image1.Left:=image1.Left+trunc(s);
  
  rest:=rest+s-trunc(s);
  image1.Left:=image1.Left+trunc(rest);
• Forum: Multimedia

  Allgemeine Beschleunigungsprozedur

    Delphi
    by Flo.Hoe, 22. Mär 2007
  Oh man wie lange ich das schon probiert habe ...
  Mir war immer klar, wie ein Objekt gleichmäßig beschleunigt werden kann.
  Entweder man verändert die Anzahl der Pixel, die es pro Zeiteinheit zurücklegt, oder das Zeitintervall.
  Also hab ich mich daran probiert für beide Arten Methoden zu schreiben.
  
  
  procedure TForm1.Timer1Timer(Sender: TObject);
  begin
  image1.left:=image1.left+1;...