Fehler bei Lauftext

[Christian S.]

Hallo!

Wenn Du statt der 145 als label1.width folgendes verwendest, sollte es klappen:
label1.canvas.TextWidth(label1.caption); MfG
Peter

//Edit: und wenn Du folgendes statt Deiner Prozedur als OnTimer nimmst, wird es noch schöner:

Delphi-Quellcode:

  if label1.left = -label1.width then
    label1.left := SongPanel.width
  else label1.left := label1.Left -1;