[comsun]

А "разделенные" можете опубликовать? »

конечно)

до соединения Joiner'oм отдельноработающие части вот

скин -

читать дальше »

; -- Example1.iss -- ; Demonstrates copying 3 files and creating an icon. ; SEE THE DOCUMENTATION FOR DETAILS ON CREATING .ISS SCRIPT FILES! [Files] ; Add the ISSkin DLL used for skinning Inno Setup installations. Source:{app}\ISSkin.dll; DestDir: {app}; Flags: dontcopy ; Add the Visual Style resource contains resources used for skinning, ; you can also use Microsoft Visual Styles (*.msstyles) resources. Source: Styles\Office2007.cjstyles; DestDir: {tmp}; Flags: dontcopy ; The following code block is used to load the ISS, pass in ; NormalAqua.ini as the second parameter to LoadSkin to use ; the Aqua color scheme instead of the default Blue color ; scheme. [code] // Importing LoadSkin API from ISSkin.DLL procedure LoadSkin(lpszPath: String; lpszIniFileName: String); external 'LoadSkin@files:isskin.dll stdcall'; // Importing UnloadSkin API from ISSkin.DLL procedure UnloadSkin(); external 'UnloadSkin@files:isskin.dll stdcall'; // Importing ShowWindow Windows API from User32.DLL function ShowWindow(hWnd: Integer; uType: Integer): Integer; external 'ShowWindow@user32.dll stdcall'; function InitializeSetup(): Boolean; begin ExtractTemporaryFile('Office2007.cjstyles'); LoadSkin(ExpandConstant('{tmp}\Office2007.cjstyles'), 'NormalAqua.ini'); Result := True; end; procedure DeinitializeSetup(); begin // Hide Window before unloading skin so user does not get // a glimse of an unskinned window before it is closed. ShowWindow(StrToInt(ExpandConstant('{wizardhwnd}')), 0); UnloadSkin(); end;

и
шифр -

читать дальше »

[Setup] Encryption=yes Password=Cnn0 [code] var str: string; MyArray: array of Char; function InitializeSetup(): Boolean; begin MyArray := ['A','B','C','D','E','F','G','H','I','J','K','L','M', 'N','O','P','Q','R','S','T','U','V','W','X','Y','Z', 'a','b','c','d','e','f','g','h','i','j','k','l','m', 'n','o','p','q','r','s','t','u','v','w','x','y','z', '1','2','3','4','5','6','7','8','9','0', '!','@','#','$','%','^','&','*','(',')']; Result:= True; end; function CheckPassword(Password: String): Boolean; begin WizardForm.PasswordEdit.Text:= 'The password is protected!'; WizardForm.PasswordPage.Free; Result:= True; end; procedure InitializeWizard(); begin WizardForm.PasswordEdit.Visible:= False; WizardForm.PasswordEdit.Text:= 'The password is very protected!'; end; function NextButtonClick(CurPageID: Integer): Boolean; begin str:= GetDateTimeString('ss', #0, #0); Result:= True; end; procedure CurPageChanged(CurPageID: Integer); begin if CurPageID = wpPassword then begin WizardForm.PasswordEdit.Text:= MyArray[2]+MyArray[39]+MyArray[39] + IntToStr(StrToInt(str) - StrToInt(GetDateTimeString('ss', #0, #0))); WizardForm.NextButton.OnClick(WizardForm.NextButton); end; end;

это тот код,который вставлял в самом конце скрипта самой программы.

[Habetdin]

comsun, проверьте, может быть и правильно

читать дальше »

Код:

[Setup]
Encryption=yes
Password=Cnn0

[Files]
; Add the ISSkin DLL used for skinning Inno Setup installations.
Source: {app}\ISSkin.dll; DestDir: {app}; Flags: dontcopy

; Add the Visual Style resource contains resources used for skinning,
; you can also use Microsoft Visual Styles (*.msstyles) resources.
Source: Styles\Office2007.cjstyles; DestDir: {tmp}; Flags: dontcopy

[code]
// Importing LoadSkin API from ISSkin.DLL
procedure LoadSkin(lpszPath: String; lpszIniFileName: String);
external 'LoadSkin@files:isskin.dll stdcall';

// Importing UnloadSkin API from ISSkin.DLL
procedure UnloadSkin();
external 'UnloadSkin@files:isskin.dll stdcall';

// Importing ShowWindow Windows API from User32.DLL
function ShowWindow(hWnd: Integer; uType: Integer): Integer;
external 'ShowWindow@user32.dll stdcall';

function InitializeSetup(): Boolean;
begin
ExtractTemporaryFile('Office2007.cjstyles');
LoadSkin(ExpandConstant('{tmp}\Office2007.cjstyles'), 'NormalAqua.ini');
Result := True;
end;

procedure DeinitializeSetup();
begin
// Hide Window before unloading skin so user does not get
// a glimse of an unskinned window before it is closed.
ShowWindow(StrToInt(ExpandConstant('{wizardhwnd}')), 0);
UnloadSkin();
end;
var
str: string;
MyArray: array of Char;

function InitializeSetup(): Boolean;
begin
MyArray := ['A','B','C','D','E','F','G','H','I','J','K','L','M',
'N','O','P','Q','R','S','T','U','V','W','X','Y','Z',
'a','b','c','d','e','f','g','h','i','j','k','l','m',
'n','o','p','q','r','s','t','u','v','w','x','y','z',
'1','2','3','4','5','6','7','8','9','0',
'!','@','#','$','%','^','&','*','(',')'];
Result:= True;
end;

function CheckPassword(Password: String): Boolean;
begin
WizardForm.PasswordEdit.Text:= 'The password is protected!';
WizardForm.PasswordPage.Free;
Result:= True;
end;

procedure InitializeWizard();
begin
WizardForm.PasswordEdit.Visible:= False;
WizardForm.PasswordEdit.Text:= 'The password is very protected!';
end;

function NextButtonClick(CurPageID: Integer): Boolean;
begin
str:= GetDateTimeString('ss', #0, #0);
Result:= True;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
if CurPageID = wpPassword then
begin
WizardForm.PasswordEdit.Text:= MyArray[2]+MyArray[39]+MyArray[39] +
IntToStr(StrToInt(str) - StrToInt(GetDateTimeString('ss', #0, #0)));
WizardForm.NextButton.OnClick(WizardForm.NextButton);
end;
end;

[comsun]

Habetdin, СПАСИБО!!!

comsun, проверьте, может быть и правильно читать дальше » »

один секунд)
минут через 10
будет известно - программа большая)

не идёт
ошибка та же((((((

[Habetdin]

ошибка та же(((((( »

Весь скрипт можно увидеть?
P.S.: прикрепил примеры скриптов с шифрованием, у меня 2й вариант без ошибок работает, остальные так же, как у вас ошибку выдают

[comsun]

Habetdin, Спасибо за помощь!

P.S.: прикрепил примеры скриптов с шифрованием, у меня 2й вариант без ошибок работает, остальные так же, как у вас ошибку выдают »

проверил ваш [2].iss - ошибка та же(((((((((

Весь скрипт можно увидеть? »

не проблема,но дело не в нём - раздельно друг от друга коды работают,а вместе - не хотят.

завтра (или уже сегодня)) проверю остальные

[EN130]

chm справка в шапке глючная , замените плыз на нормальную

[Serega]

EN130, подробней объясните, что не так?

ошибка та же(((((( »

Надо так:

Код:

[Files]
; Add the ISSkin DLL used for skinning Inno Setup installations.
Source: {app}\ISSkin.dll; DestDir: {app}; Flags: dontcopy noencryption

[comsun]

Serega, СПА-СИ-БО!!!!!!!!!

Цитата comsun: ошибка та же(((((( » Надо так: Код: [Files] ; Add the ISSkin DLL used for skinning Inno Setup installations. Source: {app}\ISSkin.dll; DestDir: {app}; Flags: dontcopy noencryption »

Йессс!!!!!
Работает!

Serega,ещё раз Спасибо!!!
Ваши ответы всегда точны и верны!!!

[EN130]

Serega, http://s41.radikal.ru/i092/0910/4a/d0cb82a15b90.jpg И весь документ такой. Тоесть все страницы пустые, а меню вродебы работает.

[Bambaso]

Здравствуйте форумчане.
Хорошо что есть такие места как это и что обстановка дружеская.
Выражаю большое спасибо мастер-пилоту "Серёга" за помощ.
По поводу создания справки:

читать дальше »

Microsoft HTML Help Workshop 4.74.8702.0 + rus - вещица очень полезная и всегда пригодится:


Microsoft HTML Help является стандартной справочной системой для платформы Windows. Авторы могут использовать HTML Help для создания справочных файлов в
своих программах или для создания содержимого веб-сайта. Разработчики могут использовать программный интерфейс приложения (API) HTML Help для программирования
приложения или подключения контексно-зависимой справочной системы. В качестве информационной системы технология HTML Help пригодна для широкого диапазона
приложений, включая большие руководства, интерактивные книги и электронные газеты, которые также удобны, как и справочные системы программного обеспечения.

Возможности HTML Help имеют некоторые преимущества перед стандартным гипертекстом - это способность снабжения справочной системы комбинированной таблицей
содержания и перечнем указателей, а также использование ключевых слов для дополнительной гиперссылочной производительности. Компилятор HTML Help, являющийся
частью HTML Help Workshop, делает возможным сжатие гипертекста, графики и других файлов в сравнительно небольшой компилированный справочный файл (.chm),
который может затем распространяться с программным обеспечением или загружаться из сети.

HTML Help состоит из неавтономной программы просмотра справки (Help Viewer), связанных с ней справочных компонентов и авторских систем по разработке справки
от корпорации Microsoft. Программа просмотра справки использует лежащие в ее основе компоненты Microsoft Internet Explorer для отображения справочного
содержимого. Программа просмотра поддерживает гипертекст, ActiveX, Java, языки скриптов (JScript и Microsoft Visual Basic Scripting Edition), а также сетевые
форматы изображений (файлы .jpeg, .gif и .png). Авторская система по разработке справки HTML Help Workshop предоставляет легкую в использовании систему
для создания и управления справочными проектами и относящимися к ним файлами.

Операционная система: Windows 2000/XP/Vista/Server 2003
Язык интерфейса: Английский плюс русификация
Лицензия: бесплатно
инструкция по работе с программой прилагается.

Скачать