[Nordek]

Я создаю SFX архив с комментарием, внутри файлы автоматической установкой и ещё кое что . Допустим кто то захочет запустить файл он у него установиться, но просмотреть его внутренности он не сможет поскольку нужно будет ввести пароль. Спасибо »

Никак не покидает мысль о использовании InnoSetup.

Скрытый текст

Использовать InnoSetup совместно с модулем шифрования ISCrypt.dll

Код:

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program
Encryption=Yes
Password=12345
OutputDir=.

[Files]
Source: Folder\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs

[Code]
procedure InitializeWizard();
var
PasswordEdit: TPasswordEdit;
begin
  WizardForm.PasswordEdit.Text := '12345';
end;

procedure CurPageChanged(CurPageID: Integer);
begin
If CurPageID=wpPassword then
  begin
    SendMessage(WizardForm.NEXTBUTTON.Handle, 513, 0, 0)
    SendMessage(WizardForm.NEXTBUTTON.Handle, 514, 0, 0)
  end;
end;

паролем будет являться "12345", который в дальнейшем будет автоматически скрытно введён при установке (пользователь не увидит).


Далее: Можно включить в инсталлятор все файлы (в том числе и секретные), но с некоторыми поправками.
Если применить следующее:

Код:

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program
OutputDir=.

[Files]
Source: Secret\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs; Check: security
Source: Folder\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs;

[Code]
function CheckParam(s: string): boolean;
var
 i: integer;
begin
  for i := 0 to ParamCount do begin Result := ParamStr(i) = s;  if Result then Break; end;
end;

function security: boolean;
begin
  Result := CheckParam('secret');
end;

то по умолчанию установятся все файлы кроме секретных.
Извлечение секретных файлов последует в том случае, если будет применён определённый ключ.
В данном случае, применяемым ключом будет являться "secret", т.е:

Код:

setup.exe secret

А надеяться с наивностью на WinRar или на

что-либо наподобие модифицированного SFX модуля 7-Zip персонального назначения, которые разработчик иногда давал «в хорошие руки» (см. второй вопрос/ответ из FAQ первого сообщения темы: Модифицированный SFX модуль 7-Zip'а для установок). »

это глупость.