Timer + Zeichnen(+Bewegen) im Koordinatensystem - WIE?

[rajuneon]

Danke erstmal! Meine Fragen hab ich neben die betreffenden Zeilen kommentiert:

Delphi-Quellcode:

var
  start: Cardinal;
  t: Double;
begin
  start := Gettickcount(); 
  t := 0;

  while (not Application.Terminated) && (t < 5) {wieso t < 5?}
  begin 
    Kreis.Top := 100 + 0.5 * 9.81 * t * t;      {was ist das für eine formel?}
    Kreis.Left := 200 + 100 * sin(2 * t)        {was ist das für eine formel?}

    Application.Processmessages;                {wofür ist das gut? ;-)}

    t := (Gettickcount() - start) / 1000.0;     {Neue Zeit ausrechnen}
  end;
end;