Text in Listbox zentrieren

[schuetzejanett]

Hallo,

ich erstelle während der laufzeit eine bestimmte anzahl von Listboxen.
Nun möchte ich das der Inhalt der Listboxen zentriert ist deswegen habe
ich es mit dem Befehl

 setwindowlong(APunkte[i].Handle ,GWL_Style , ES_CENTER); jetzt haben die listboxen aber nicht mehr die eingestellte größe und sind alle in der mitte zentriert.
Also nicht das was ich wollte wie schaffe ich es nun nur den text(Inhalt) der listboxen zu zentrieren hier noch mal der gesamte quellcode

Delphi-Quellcode:

 APunkte : array of TListbox;

setlength(APunkte,unit1.anz);
 For i :=0 to High(APunkte) do
    begin
      APunkte[i] := TListbox.Create(self);

      with APunkte[i] do
        begin
          parent := TPunkt;
          Items.add (inttostr(aspieler[i].punkte[0]));
          Height := 320;
          Top := 105;
          Width := 85;
          Left := 15 + (i * 90);
          parent := self;
        end;
      setwindowlong(APunkte[i].Handle ,GWL_Style , ES_CENTER);
    end;