hallo und herzlich willkommen in der
DP !
du musst erstmal eine variable definieren, die die richtung angibt. sie ist vom typ integer.
1 bedeutet dann nach links, -1 bedeutet ach rechts.
im OnTimer-Ereignis fragst du vor dem verschieben die aktuelle position der wolke ab. wenn sie am rand ist, dann wird die richtung umgedreht.
so sollte es funktionieren:
Delphi-Quellcode:
var direction: integer;
{...}
//onTimer-Ereignis:
begin
if (wolke.left = 0) or (wolke.left = form1.clientwidth-wolke.width) then
direction := direction * -1;
wolke.left := wolke.left + 10*direction;
end;
edit:
oh mein gott... dieser titel... "45 Jahre alte frau mit auto erschlagen!"
edit2: was soll das mit dem titel???
Aenogym