VirtualStringTree automatisch Spaltenbreite anpassen

[hedie]

Hallo zusammen

Ich verwende hier den VirtualStringTree und würde gerne die Spaltenbreite automatisch anpassen lassen.
Leider möchte dies nicht so wie gewünscht.

Anbei sind zwei screenshots welche das aktuelle Verhalten zeigen.
Einfügen tu ich die Spalten wie folgt:

Delphi-Quellcode:

self.Header.Columns.Add;
self.Header.Columns.Items[col].Text := FCustomColumns.Strings[col];

Ich hoffe jemand hat mir einen Tipp.

Danke

[Christian Seehase]

Moin Claudio,

Du könntest mit

Delphi-Quellcode:

Self.Canvas.TextWidth(FCustomColumns.Strings[col])

die Breite des eingefügten Textes ermitteln.
Ist der breiter als die bisherige Breite, die Spaltenbreite erhöhen.