Thema: Delphi Kleines Pferdespiel

Einzelnen Beitrag anzeigen

Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.464 Beiträge
 
Delphi 12 Athens
 
#10

Re: Kleines Pferdespiel

  Alt 4. Jan 2010, 10:17
Bitte benutze den Code-Tag, damit dein Quelltext lesbar bleibt.
Die Position -1025 wird wahrscheinlich nie genau erreicht, da sich das Image in 10er-Schritten bewegt.

Delphi-Quellcode:
procedure TForm1.Timer22Timer(Sender: TObject); --> Der Timer hat natürlich das gleiche Interval, wie die Sprünge
begin
  // --> Der gleiche Abstand, indem auch die Sprünge bewegt werden.
  Image3.Left := Image3.Left - 10;
  // --> Das Image verlässt auf der einen Seite das Spielfeld, bis es komplett nicht mehr zu sehen ist
  // ist und soll dann wieder zu einer Startposition zurückkehren,
  // an der es nahtlos an das andere Image angehängt wird.
  if Image3.Left <= -Image3.Width then
    Image3.Left := 1205;
end;
Scrollbars lassen sich in den Optionen des Formulars abschalten.
Eine andere Möglichkeit wäre, ein Panel auf das Formular zu legen und alle Images darauf.
  Mit Zitat antworten Zitat