memo in ini speichern

[NicoDE]

Zitat von SirThornberry:

Die kannst auch den Inhalt des memos in Hex-Zeichen wandeln und dann in die Ini speichern.

TStrings.CommaText dürfte noch einfacher sein...

Delphi-Quellcode:

uses
  IniFiles;

procedure TForm1.Button1Click(Sender: TObject);
begin
  with TMemIniFile.Create(ChangeFileExt(Application.ExeName, '.ini')) do
    try
      WriteString('Test', 'Memo1', Memo1.Lines.CommaText);
      UpdateFile;
    finally
      Free;
    end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  with TMemIniFile.Create(ChangeFileExt(Application.ExeName, '.ini')) do
    try
      Memo1.Lines.CommaText := ReadString('Test', 'Memo1', EmptyStr);
    finally
      Free;
    end;
end;