Memo speichern?

[Die Muhkuh]

so hier ein Beispiel für die Ini:

Delphi-Quellcode:

uses
  Inifiles;

end
var
  ini : TInifile;


procedure //Wieder ein OnClose-Event der Form!
begin
  ini := TInifile.create ('d:\Test.ini');
    try
      ini.Writestring('Nachricht','Text',Memo1.lines.text);
    finally
      ini.free;
    end;
end;

procedure //Wieder ein OnShow-Event der Form!
begin
  ini := TIniFile.create ('d:\Test.ini');
    try
      memo1.lines.text := ini.Readstring('Nachricht','Text','');
    finally
      ini.free;
    end;
end;

Man kann auch beim OnShow-Event das try und das Finally weglassen!