DBGrid anpassen der Weite der Spalte automatisch

[wschrabi]

alles columns haben alles die gleiche breite.
auf der www site steht:

Zitat:

Before you begin, in the OnCreate event for the Form object containing the DBGrid, specify what columns need to be auto-resized by assigning a non-zero value for the Tag property of the corresponding TField object.

[Renate Schaaf]

Ich mache nichts mit Daten, aber da sind ein paar Stellen, wo dir die Kopie von der website mit dem code fehlgeschlagen ist, aufgrund der schlunzigen Formatierung da:

An einigen Stellen ist dir code in den Kommentar gerutscht.
Die letzten beiden Zeilen sollten wahrscheinlich sein

Delphi-Quellcode:

if AColumn.Width <= 0 then
 AColumn.Width := AColumn.Field.Tag;

denn in dem .Tag sollte doch die Minimalweite stehen.

Hab' ich nicht getestet, denn wie gesagt ...