in Ini Datei mehrzeiligen text schreiben

[Zacherl]

Wenns schnell gehen soll verwende ich eine StringList, speichere den Text darin und schreibe StringList.DelimitedText in die INI und lade den DelimitedText hinterher wieder.
Sonst kodiere ich den String wie gesagt vorher Base64.

Beispiel:

Delphi-Quellcode:

//Text speichern (Text ist in Memo1)
var
  Tmp: TStringList;
begin
  Tmp := TStringList.Create;
  Tmp.Text := Memo1.Lines.Text;
  Ini.WriteString('Section', 'Value', Tmp.DelimitedText);
  Tmp.Free;
end;

//Text laden (In Memo1)
var
  Tmp: TStringList;
begin
  Tmp := TStringList.Create;
  Tmp.DelimitedText := Ini.ReadString('Section', 'Value', '');
  Memo1.Lines.Text := Tmp.Text;
  Tmp.Free;
end;