Steht doch eigentlich alles Da.
Delphi-Quellcode:
if Label1.Left = -Label1.Width then // Überprüft wann eine bestimmte Position erreicht ist - Hier Label Weite zb. 50
Label1.Left:= Panel2.Width // Wenn Ja setzte Label auf Anfangsposition
else
Label1.Left:= Label1.Left -1;//Verschiebe Label