Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Для новичков > Сохранение и загрузка Edit'ов


Автор: pomogite 24.12.2007, 17:35
Здравствуйте уважаемые программисты!
Подскажите пожалуйста как можно сохранить например 10 значений edit'ов в файл при закрытии
и загрузить из этого же файла при открытии программы? 
Спасибо!

Автор: Qu1nt 24.12.2007, 17:51
IniFiles

Автор: pomogite 24.12.2007, 18:55
Спасибо разобралась!

Автор: azer88 26.12.2007, 17:02
Ya ne ponal kak eto mojna sdelat plz pomqite skajem soxranal cvet i razmer edita kak mojna s pomoshyu inifayla?

Автор: Snowy 26.12.2007, 17:31
Можно попросить писать по русски?
Если русских буковок под рукой нет, то под смайликами есть кнопочка Транслит...

Автор: Alexeis 26.12.2007, 17:34
Цитата(Snowy @  26.12.2007,  17:31 Найти цитируемый пост)
Если русских буковок под рукой нет, то под смайликами есть кнопочка Транслит... 

  Она временно не работает, так что выхода нет, прийдется временно потерпеть :(

Автор: Snowy 26.12.2007, 18:05
Ну тогда http://www.translit.ru/

Автор: Exai1e 26.12.2007, 19:48
Код

procedure TForm1.Button1Click(Sender: TObject);
var
  f : TIniFile;
begin
  f := TIniFile.Create('H:\1.ini');
    f.WriteInteger('PropertyEdit' , 'Width', 100);
    f.WriteInteger('PropertyEdit' , 'Height', 100);
end;

procedure TForm1.FormShow(Sender: TObject);
var
  f : TIniFile;
begin
  f := TIniFile.Create('H:\1.ini');
    Edit1.Width  := f.ReadInteger('PropertyEdit' , 'Width', 100);
    Edit1.Height := f.ReadInteger('PropertyEdit' , 'Height', 100);
end;


Примерно так smile

Автор: pomogite 28.12.2007, 08:20
только 2 процедура лучше онкрит

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)