SendMessage(ListBox1.Handle, LB_SetHorizontalExtent, Breite, LongInt(0));
Breite ist ein Integer der die Breite angibt die darstellbar sein soll.
Wenn du zum beispiel "skskls dfkdfljlsdf jdflsdfjsf" als längstes wort in deiner listbox hast muss die anweisung so aussehen
Delphi-Quellcode:
Breite := Listbox1.Canvas.TextWidth('skskls dfkdfljlsdf jdflsdfjsf') + 5;
SendMessage(ListBox1.Handle, LB_SetHorizontalExtent, Breite, LongInt(0));