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

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

Аватара для WindoStroy

Пользователь


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

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


ChVL,

вот может поможет:


Цитата:
Простенький способ криптования инсталлятора c использованием подсчета хеша MD5 "обманных" символов. (Пароль будет находиться в памяти). Требуется ISCrypt.dll в одной папке с Inno Setup

Цитата:
[Setup]
AppName=Pass
AppVerName=Pass
DefaultDirName={pf}\Pass
Uninstallable=No
Encryption=Yes
;MD5 сумма, подсчитанная ниже
Password=449f2546d2a51b20442c5025c43f126f

[Files]
Source: "C:\1.txt"; DestDir: "{app}"

[code]
procedure InitializeWizard();
var
MD5: String;
begin
//Подсчитываем сумму слагаемых в MD5 калькуляторе, на примере сумма MD5 "````" равна 449f2546d2a51b20442c5025c43f126f
MD5 := GetMD5OfString(''+'`'+'``'+'`')
WizardForm.PasswordEdit.Visible:= False;
//Вставляем то, что складываем
WizardForm.PasswordEdit.Text:= MD5;
end;

//Как обычно нажимаем страницу с пассом
procedure CurPageChanged(CurPageID: Integer);
begin
if CurPageID = wpPassword then
WizardForm.NextButton.OnClick(WizardForm.NextButton);
end;
(с) Kindly
Это сообщение посчитали полезным следующие участники:

Отправлено: 23:15, 15-03-2008 | #200