[Михалыч]

Имеются поля edit, combobox и кнопка Сохранить. Как сделать чтобы при нажатии на кнопку сохранить содержимое этих полей сохранялось в ini-файл и наоборот, загружалось из файла по кнопке Загрузить.

[M.A.D.M.A.N.]

Код:

uses inifiles;
...
begin
  with TInifile.Create(FileNameHere)Do
    begin
      WriteString('Main','Edit',Edit1.Text);
    end;
end;

For read from ini

Код:

uses inifiles;
...
begin
  with TIniFIle.Create(FileNameHere)Do
    begin
      edit1.text:=ReadString('Main','Edit','Default value');
    end;
end;

[Михалыч]

что то не получается

если делать вот так, то получается, правда сохранение идет и не в ini.
Но сохраняются только данные в полях memo, а как сделать чтобы в edit.

procedure TForm1.Button1Click(Sender: TObject);
begin
if SaveDialog1.Execute then
Memo1.Lines.SaveToFile(SaveDialog1.FileName);
end;

end.

[lmikle]

Тебе же написали как собственно сохранять.

Код:

uses inifiles;
...
begin
if SaveDialog1.Execute then
  with TInifile.Create(SaveDialog1.FileName) Do
    begin
      WriteString('Main','Edit',Edit1.Text);
    end;
end;

Доцент тупой... (с)

[Михалыч]

begin
if SaveDialog1.Execute then
with TInifile.Create(SaveDialog1.FileName) Do
begin
WriteString('Main','Edit',Edit1.Text);
end;
end;

так работает, но сохраняет только данные поля Edit1.Text, а нужно
чтобы и остальных эдитов
WriteString('Main','Edit',Edit2.Text);
WriteString('Main','Edit',Edit3.Text);
WriteString('Main','Edit',Edit4.Text);
не работает, чохраняет только последнее, т.е. edit 4

[M.A.D.M.A.N.]

Сообщение от Михалыч

begin
...
WriteString('Main','Edit',Edit2.Text);
WriteString('Main','Edit',Edit3.Text);
WriteString('Main','Edit',Edit4.Text);
...

Смотри сюда, ты каздое значение сохраняеш под одним и тем же именем, у тебя каждое новое значение перезаписывает старое
т.е
у тебя вот ка идет
[Main]
Edit=Hello
сохраняеш Edit3
[Main]
Edit=Hello2
вот как надо

Код:

WriteString('Main','Edit2',Edit2.Text);
WriteString('Main','Edit3',Edit3.Text);
WriteString('Main','Edit4',Edit4.Text);

при чтении имена не забудь расставить