[dpmkh]

Привет!
Есть одна проблема которую я не знаю как делать.
В общем есть форма, на которой 2 кнопки "сохранить" и " загрузить" и 2 компонента Edit.

Нада, что бы кнопка "сохранить" сохраняла значения которые введены в едитах в файл на компьютере. А при нажатии кнопки "загрузить" можно было загрузить файл со значениями едитов, которые были сохранены в файл.

Спасибо заранее!

[Dmitry_DM]

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

Привет!
Есть одна проблема которую я не знаю как делать.
В общем есть форма, на которой 2 кнопки "сохранить" и " загрузить" и 2 компонента Edit.

Нада, что бы кнопка "сохранить" сохраняла значения которые введены в едитах в файл на компьютере. А при нажатии кнопки "загрузить" можно было загрузить файл со значениями едитов, которые были сохранены в файл.

Спасибо заранее!

Вот так можно записать содержимое Edit в Txt файл.

Код:

var SaveStream:TMemoryStream;
      Text:String;
begin
  savestream:=tmemorystream.create;
  text:=edit1.text;
  savestream.write(text,length(text));
  savestream.savetofile('FileName.txt');
  savestream.free;
end;

Это процедура на кнопку сохранения.
Вот так можно записать содержимое Txt файла в Edit.

Код:

var
  List: TStringList;
begin
List := TStringList.Create;
List.LoadFromFile('FileName.txt');
Edit1.Text := List.Text;
end;

Это процедура на кнопку загрузки.