Länge einer hor. Scrollbar abhängig von Einträgen

[Ramone]

Hallo nochmal,
ich habs jetzt so versucht:

Delphi-Quellcode:

l := FileListBox1.Canvas.TextWidth(IntToStr(x)); // x ist die Länge des längsten Strings in der ListBox.
ShowMessage(IntToStr(l)); // Nur zum Testen der Ausgabe
{bei der Stringlänge 48 kriegt "l" den Wert 12!?!?}
SendMessage(FileListbox1.Handle, LB_SetHorizontalExtent, l, Longint(0)); // Scrollbalken in Listbox

Auf jeden Fall funktioniert das nicht, da der Wer "12" natürlich viel zu klein ist. Hat jemand noch eine Idee?

Gruß