Grafikfehler bei Verschieben

[fred.reichbier]

Hi!

mach es mit einem Timer:

Ins FormCreate:
Image1.Left := -100; //zum Beispiel Einen Timer(unter "System") aufs Formular,
in die Timer1Timer:

Delphi-Quellcode:

Image1.Left := Image1.Left + 1;
if Image1.Left >= 200 Then //Obergrenze
begin
Timer1.Enabled := False;
end;

MfG,
fred