ini файл

[Simply-Art]

Я хочу записать многострочный текст из Memo, текст записывается, но при чтении файла читается тока первая строка текста. Вот код

var
 IniFile:TIniFile;
begin
IniFile := TIniFile.Create('File.ini');
if x=true then 
{чтение} Memo1.Text:=IniFile.ReadString('X','Y','') else 
{запись} IniFile.WriteString('X','Y',Memo1.Text);
IniFile.Free;
end;

В файле записано примерно так

[X]
Y=Строка 1
Строка 2
Строка 3

[Alar]

С ini файлами раньше не работал. Вот что получилось


В uses нужно добавить модуль - IniFiles

Сейчас только значение SectionValues получиось скачать, как только скачаю отдельные строки выложу код

procedure TForm1.Button1Click(Sender: TObject);
var
IniFile:TIniFile;
i: integer;

begin
IniFile := TIniFile.Create('d:/File.ini');

for i:=0 to memo1.lines.count-1 do
begin
IniFile.WriteString('X',inttostr(i) ,Memo1.lines[i]);
end;
Memo1.Clear;
IniFile.ReadSectionValues('x', memo1.Lines);
IniFile.Free;
end;

end.

Как я понял, в файле должно быть - что типа этого

[X]
Y=Строка 1
Y1=Строка 2
Y2=Строка 3

[mutabor]

А чего ты просто текстовый файл не создашь если много записывать? Все таки ini файл не для этого.

[Simply-Art]

Сообщение от mutabor

А чего ты просто текстовый файл не создашь если много записывать? Все таки ini файл не для этого.

Мне нужен именно INI файл, я прекрасно знаю как работать с (не) типизированными файлами.