SaveToFile [TStringgrid] ohne Tsavedialog

[marabu]

Probiere es so:

Delphi-Quellcode:

var
  fn: TFileName;
begin
  fn := IncludeTrailingPathDelimiter(GetCurrentDir)
      + 'demo.txt';
  with sgFiles do
    Cols[FixedCols].SaveToFile(fn);
end;

Grüße vom marabu