Inhalt von Variable per savetofile in txt datei speichern

[toms]

Du koenntest auch eine TStringList nehmen.

Delphi-Quellcode:

procedure SaveVariableToFile(const FileName: TFileName; MyVariable: Variant);
var
  sl: TStringList;
begin
  sl := TStringList.Create;
 try
  sl.Text := MyVariable;
  sl.SaveToFile(FileName);
 finally
  sl.Free;
 end;
end;

Bsp:

Delphi-Quellcode:

var
 a: Integer;
 b: string;
begin
 a := 3;
 SaveVariableToFile('c:\test1.txt',a);
 b := 'test';
 SaveVariableToFile('c:\test2.txt',b);
end;