[Winny]

МОЙ ПРОШЛЫЙ КОД НЕПРАВИЛЬНЫЙ
ПРАВИЛЬНЫЙ КОД ЗДЕСЬ:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Left:=label1.Left-1;
if label1.Left=-label1.Width then
label1.Left:=Form1.Width
end;
end.