Hi,
als kleiner Zusatz anreiz.
Ich habe folgendes gemacht:
Einstellen der Spaltenbreite ,speichern und beim ausführen des Querys load:
SAVE:
Delphi-Quellcode:
procedure TForm1.Button45Click(Sender: TObject);
var
i: integer;
begin
for i := 0 to dbgrid1.columns.Count - 1 do
begin
ini.Writeinteger('Spaltenbreite',dbgrid1.columns.Items[i].FieldName,dbgrid1.columns.Items[i].width);
end;
end;
--------------
LOAD;
Delphi-Quellcode:
procedure TForm1.Button46Click(Sender: TObject);
var
i: integer;
begin
for i := 0 to dbgrid1.columns.Count - 1 do
with dbgrid1.columns.Items[i] do
width := ini.readinteger('Spaltenbreite',fieldname,i);
end;
PS: Ini muß natürlich vorher Creat gemacht werden .
Zum Originalzustand herstellen:
ini.EraseSection('Spaltenbreite');
Das ganze kann man nat. als Procedur erstellen und beim Onshow oder so einbinden.
mfg
[edit=alcaeus]Delphi-Tags eingefuegt. Mfg, alcaeus[/edit]