Code:
Datei=test1
Datei=test2
Datei=test3
du überschreibst doch damit jedesmal "Datei"
In einer Inidatei ist es nicht möglich mehrere einträge mit dem selben Namen zu haben wenn sie auch zur gleichen Kategorie gehören..
Sollte wohl eher so aussehen
Delphi-Quellcode:
[...]
for Count := 0 to Memo1.Lines.Count - 1 do
begin
Ini.WriteString('Pfad', 'Datei' + inttostr(Count+1), Memo1.Lines.Strings[Count]);
end;
[...]
[Edit1]
oder ist Memo1.lines.text eine gesammte datei?
dann musst du die Zeilenumbrüsche mit einem zeichen ersetzen das nicht in dem Text vorkommt und beim aulesen ersetzt du dann wieder zurück
Ini.WriteString('Pfad', 'Datei', StringReplace(Memo1.Lines.Text, #13#10, 'µ', [rfreplaceall]);
[/Edit1]
[Edit2]
Ich denke jedoch du solltest dir mal gedanken machen ob das konzept wirklich soo toll ist eine datei in eine inidatei zu schreiben. Beispielsweise werden führende Leerzeichen bei einem value entfernt. Gibt noch einige andere zeichen die nicht so recht in die ini-datei passen bzw falsch/nicht geschrieben oder gelesen werden. Vielleicht solltest du das ganze lieber in eine Zipdatei packen. Ich selbst verwende für sowas TFilepack (virtuelles Dateisystem in einer Datei) und kann dann darin dateien anlegen...
[/Edit2]