Folgende
Unit ändert die
Spaltenbreite eines
StringsGrid so, dass auch noch der längste Text genau in seine Zelle passt.
Nachdem die Zelleninhalte bestückt worden sind, wird folgende Procedure aufgerufen:
Delphi-Quellcode:
SetOptimalGridCellWidth(StringGrid1, []);
// der 2. Parameter dient dazu, bestimmte Spalten auszuschliesen
// Bespiel: alle Spalten ausser der 3. bis 4. Spalte optimieren
SetOptimalGridCellWidth(StringGrid1, [2,3]);