Spalten eines DBGrid in INI-Datei speichern

[marabu]

Hi René,

wenn es dir nur um die Reihenfolge der Spalten in einem DBGrid geht, dann reicht vielleicht schon das hier:

Delphi-Quellcode:

procedure LoadColumnOrder(gc: TDBGridColumns; sl: TStrings);
var
  i: integer;
begin
  for i := 0 to gc.Count - 1 do
    with gc.Items[i] do
    Index := sl.IndexOf(FieldName);
end;

procedure SaveColumnOrder(gc: TDBGridColumns; sl: TStrings);
var
  i: integer;
begin
  sl.Clear;
  for i := 0 to gc.Count - 1 do
    sl.Add(gc.Items[i].FieldName);
end;

// Verwendung:
// SaveColumnOrder(DBGrid.Columns, sl);
// LoadColumnOrder(DBGrid.Columns, sl);

Müsstest du aber noch testen.

Grüße vom marabu