[dpmkh]

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

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

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

[Dmitry_DM]

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

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

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

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

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

Код:

1 2 3 4 5 6 7 8 9

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.

Код:

1 2 3 4 5 6 7

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

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