DBGrid Hilfe columns

[Nine9]

Guten Tag Delphi Community,

ich habe ein, zwei kleine Probleme die nur eine Lösung erfordern würden.

Wenn ich eine Column mit Titel erstelle ist die Breite des Column nicht gewünscht breit genug.
Wie könnte ich durch eine Schleife alle erstellten Säulen(Columns) ansprechen und dessen Breite gewünscht ändern.


Grüße

[KodeZwerg]

Delphi-Quellcode:

for i := 0 to Pred(DBGrid.Columns.Count) do
  DBGrid.Columns[i].Width := xyz;

so?

[mmw]

Hallo,
evtl. so

Delphi-Quellcode:

var
  ln, 
  i: Integer;

begin

 for i := 0 to dbgrid1.Columns.Count - 1 do
  begin
    ln := DBGrid1.Canvas.TextWidth(dbgrid1.Columns[i].Title.Caption) + 4;
    dbgrid1.Columns[i].Width := ln;
  end;

end;

Gruß

[KodeZwerg]

Ist schon zu lange her aber es kann gut sein das "-1" als "Width" auch eine automatische Anpassung ist beruhend auf allen Einträgen.

[Uwe Raabe]

Ich würde die Width immer nur größer machen, aber nie kleiner. Sonst passen bei kurzen Titeln womöglich die Einträge nicht mehr rein.