Halo,
Habe einen Tipp mit dem
DBGrid1.Columns.SaveToFile('c:\sortierung.txt') gefunden, ist toll, und funktioniert
Ich möchte allerdings den Stream in eine INI-Section ablegen, hier verzweifel ich.
Habe auch keine Ahnung, wie ich einen TStringStream direkt in eine INI-Section bekomme.
Hat jemand einen Tipp ??
mfg waldforest
Delphi-Quellcode:
procedure TQueryForm.GridToIni(GridName: TDBGrid; Section: string);
var
MS: TMemoryStream;
Ini : TIniFile;
tTv: TStringStream;
node : string;
n: integer;
begin
tTv := TStringStream.Create('');
MS := TMemoryStream.Create;
Ini:=TIniFile.Create(ChangeFileExt(Application.ExeName,'.ini'));
try
GridName.Columns.SaveToStream(MS);
MS.Position := 0;
tTv.Read(MS,ms.Size) ;
INI.EraseSection(Section);
INI.WriteString(Section, '', tTv.DataString); // Hier läuft die Anwendung auf Fehler
finally
tTv.Free;
MS.Free;
end;
end;
[edit=Christian Seehase]Delphi-Tags korrigiert. Mfg, Christian Seehase[/edit]