Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.30;
Скачать: CL | DM;

Вниз

Сохранение пользовательских настроек   Найти похожие ветки 

 
Maverick ©   (2005-10-07 11:03) [0]

Привет всем.

Собственно сабж. в инете нашел (http://delphiworld.narod.ru/base/save_users_options.html) ниже приведенный код и он нормально работает, но..ни как не пойму а как сделать тоже самое но для главной формы?  

const
 FileName = "Form1.stm";

constructor TForm1.Create(AOwner: TComponent);
begin
 if FileExists(FileName) then
 begin
   CreateNew(AOwner);
   ReadComponentResFile(FileName, Self);
 end
 else
   inherited Create(AOwner);

 { поместите здесь код в стиле "OnCreate" }
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
 WriteComponentResFile(FileName, Self);
end;


 
TUser ©   (2005-10-07 11:26) [1]

Для главной этот код прекрасно работает.


 
Maverick ©   (2005-10-07 11:29) [2]

да, я тока что разобрался :)

надо конструктор объявлять так
....
public
 constructor Create(AOwner: TComponent); override;
.....
что то сразу не сообразил :)



Страницы: 1 вся ветка

Текущий архив: 2005.10.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.042 c
14-1128537581
bSava
2005-10-05 22:39
2005.10.30
Помощник Microsoft


14-1128895230
mensch
2005-10-10 02:00
2005.10.30
как сдублировать электронный ключ VIZIT?


4-1125027100
Irinka
2005-08-26 07:31
2005.10.30
как программно отключать и включать Active Desktop?


3-1126969360
810
2005-09-17 19:02
2005.10.30
Фильтрация таблицы DBF


14-1128440750
LordOfRock
2005-10-04 19:45
2005.10.30
Наткнулся в Интернете...