Урок 29 Splash-screen. Вывод информации о приложении на заставке
February 19, 2007
в колонках играет Dire Straits - Money for Nothing
Скорее всего вы встречали в приложения заставки с информацией о пользователе и его регистрационных данных. Например Adobe Photoshop.
Итак откройте предыдущий проект(или создайте его заново). Модифицируем нашу заставку так, чтобы на ней отображались содержащиеся в реестре имя пользователя и серийный номер. С этой целью добавим на созданную ранее форму два компонента Label.
Создадим обработчик события, связанный с созданием формы, при этом в секции uses модуля, связанного с формой, следует сослаться на модуль registry:
void __fastcall TForm1::FormCreate(TObject *Sender)
{TRegistry *Reg;
try
{
Reg=new TRegistry;
Reg->RootKey=HKEY_LOCAL_MACHINE;
AnsiString key="SOFTWARE\\Company\\MyApp\\1.0"; \\ путь до вашего приложения в реестре
Reg->OpenKey(key,false);
AnsiString usr=Reg->ReadString("Name");
AnsiString ser=Reg->ReadString("Serial");
Label1->Caption="Пользователь: "+usr;
Label2->Caption="Серийный номер: "+ser;
Reg->CloseKey();
Reg->Free();
}
catch (...)
{
Label1->Caption="Незарегестрирован"; \\Если же в реестре нет такого раздела, вместо имени пользователя и серийного номера булет выводиться сообщение о том, что пользователь не зарегистрирован.
Label2->Caption="Пожалуйста зарегестрируйтесь";
}
}
Естественно, в начале текста модуля следует вставить строку:
#include <registry.hpp>
Всё это будет работать при условии что вы сделаете инсталлятор, который нужные ветки реестра создаст.
Author of article - [ArtuR] 2007
www.builderhelper.3dn.ru
builder.helper@rambler.ru