Thema: Delphi Ball am Tisch

Einzelnen Beitrag anzeigen

Whatever

Registriert seit: 7. Jan 2009
Ort: 127.0.0.1
102 Beiträge
 
#10

Re: Ball am Tisch

  Alt 7. Feb 2009, 19:24
Sleep unterbricht das Programm komplett was ich aber nicht für sinnvoll halte.
Eine Delay-Procedure sorgt auch für eine Pause stoppt allerdings nicht das komplette Progamm.

Delphi-Quellcode:
procedure TForm1.Delay(time: word);
var
  Start : Integer;
begin
  Start:= GetTickCount;
  while (GetTickCount - Start <= time) do
  Application.ProcessMessages;
end;
Also kannst du z.B. in eine Schleife Delay(verzögerung) einbauen und sie wird "Schrittweise" ausgeführt womit du deine Bewegung erzeugen könntest.

Natürlich ist ein Timer das eleganteste aber dein genialer Lehrer möchte das ja nicht.
  Mit Zitat antworten Zitat