Linien Ausrichtung

[thiagojonas]

Hallo Leute,
ich habe eine kniffliges Problem.

1. Ich habe eine Listbox mit Namen:
2. Alle Namen die sich in der Listbox befinden, weise ich einer Varibalen zu und hänge noch ein ': ______' hinzu;

Delphi-Quellcode:

for z := 0 to Pred(Listbox.Items.Count) do
      begin
       Variable:= Variable+ Listbox.Items.Strings[z]+': ______' + #13#10;
      end;

So das Problem ist jetzt natürlich, dass die Namen in der Listbox unterschiedlich lang sind, d.h.
dass die Ausgabe wie folgt aussehen könnte:

Zitat:

Peter : ______
Alexander : ______
Carolina : ______
Hans : ______

Mein Ziel ist es jetzt die Formatierung so hinzukriegen, dass ': ______' genau übereinander stehen.


Mein Ansatz:
Ich habe mir überlegt, dass wenn ich die Länge des längsten Namen in der Listbox in mm oder so berechne lasse und anschließend nur die Diefferenz zu den anderen Namen berechne und diese anschließen addiere, hätte ich das die X-Position für ': ______' erhalten.

Kann man das so in der Art machen?

Da ich keine Schrift benutze wo alles Ziffern gleich breit sind, und ich es auch nicht benutzen möchte kann ich diesen Weg schonmal ausschließen

Danke im voraus