| Smile |
| Отправлено: 06.04.2004, 13:30 |
|
Ученик-кочегар
Группа: Участник
Сообщений: 13
|
Подскажите кто-нибудь, как сделать, чтобы устанавливать для конкретного приложения стили оформления окон (имена окон, параметры цвета, шрифты, размеры, начальные координаты расположения окон (форм)) и сохранять их в файл настроек или в таблицу, а потом при запуске проекта загружать от туда и применять эти настройки. |
|
| olegenty |
| Отправлено: 06.04.2004, 13:38 |
|
Ветеран
Группа: Модератор
Сообщений: 2412
|
поставь себе EhLib и воспользуйся TPropStorageEh,
либо поставь себе RxLib и пользуйся TFormStoraje,
либо читай документацию по классам
TRegistry — хранение информации в реестре и извлечение её оттуда,
TIniFile — хранение информации в *.INI файле и извлечение её оттуда
|
|
| olegenty |
| Отправлено: 06.04.2004, 13:44 |
|
Ветеран
Группа: Модератор
Сообщений: 2412
|
пример из справки Builder
| CODE |
__fastcall TForm1::TForm1(TComponent *Owner) : TForm(Owner)
{
TIniFile *ini;
ini = new TIniFile( ChangeFileExt( Application->ExeName, ".INI" ) );
Top = ini->ReadInteger( "Form", "Top", 100 );
Left = ini->ReadInteger( "Form", "Left", 100 );
Caption = ini->ReadString( "Form", "Caption",
"Default Caption" );
ini->ReadBool( "Form", "InitMax", false ) ?
WindowState = wsMaximized :
WindowState = wsNormal;
delete ini;
}
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
TIniFile *ini;
ini = new TIniFile(ChangeFileExt( Application->ExeName, ".INI" ) );
ini->WriteInteger( "Form", "Top", Top );
ini->WriteInteger( "Form", "Left", Left );
ini->WriteString ( "Form", "Caption", Caption );
ini->WriteBool ( "Form", "InitMax",
WindowState == wsMaximized );
delete ini;
}
|
|
|
|
