Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для jameszero

Модератор


Moderator


Сообщения: 4933
Благодарности: 2587

Профиль | Сайт | Отправить PM | Цитировать


ChVL
Если предусматривать поля для ввода регистрационных данных во время установки, то нужно будет "рисовать" эти поля в секции [code], не скажу, что это просто... мануалы почитать придётся.

А с помощью ключей установки регистрацию можно реализовать так:

В скрипт добавляется секция [code]
Код: Выделить весь код
[code]
function GetSerial(Param: String): String;
begin
if ExpandConstant('{param:SERIAL}') = '' then
Result := ExpandConstant('{cm:DemoSerial}')
else Result := ExpandConstant('{param:SERIAL}')
end;

function GetName(Param: String): String;
begin
if ExpandConstant('{param:USER}') = '' then
Result := ExpandConstant('{sysuserinfoname}')
else Result := ExpandConstant('{param:USER}')
end;

function GetOrganisation(Param: String): String;
begin
if ExpandConstant('{param:COMPANY}') = '' then
Result := ExpandConstant('{sysuserinfoorg}')
else Result := ExpandConstant('{param:COMPANY}')
end;
В [CustomMessages] и [Registry] добавляется
Код: Выделить весь код
[CustomMessages]
DemoSerial=1111-2222-3333-4444

[Registry]
Root: HKLM; SubKey: SOFTWARE\Program; ValueType: string; ValueName: Serial; ValueData: {code:GetSerial}
Root: HKLM; SubKey: SOFTWARE\Program; ValueType: string; ValueName: User; ValueData: {code:GetName}
Root: HKLM; SubKey: SOFTWARE\Program; ValueType: string; ValueName: Company; ValueData: {code:GetOrganisation}
Установка программы с регистрацией:

program.exe /SERIAL=9999-8888-7777-6666 /USER=Pupkin /COMPANY=Home

При установке программы без ключей, подхватится демонстрационный серийный номер из секции [CustomMessages], а имя пользователя и название организации будут взяты системные из Windows

-------
XKeen
--
Не было печали, апдейтов накачали.

Это сообщение посчитали полезным следующие участники:

Отправлено: 12:05, 14-02-2008 | #158