Войти

Показать полную графическую версию : [архив] Скрипты Inno Setup. Помощь и советы [часть 2]


Страниц : 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 [17] 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133

comsun
25-10-2009, 22:59
А "разделенные" можете опубликовать? »

конечно)

до соединения 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
25-10-2009, 23:06
comsun, проверьте, может быть и правильно :biggrin:
[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
25-10-2009, 23:13
Habetdin, СПАСИБО!!!

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

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

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

Habetdin
25-10-2009, 23:47
ошибка та же(((((( »
Весь скрипт можно увидеть? :)
P.S.: прикрепил примеры скриптов с шифрованием, у меня 2й вариант без ошибок работает, остальные так же, как у вас ошибку выдают

comsun
26-10-2009, 01:15
Habetdin, Спасибо за помощь!
P.S.: прикрепил примеры скриптов с шифрованием, у меня 2й вариант без ошибок работает, остальные так же, как у вас ошибку выдают »
проверил ваш [2].iss - ошибка та же(((((((((
Весь скрипт можно увидеть? »
не проблема,но дело не в нём - раздельно друг от друга коды работают,а вместе - не хотят.

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

EN130
26-10-2009, 14:05
chm справка в шапке глючная :( , замените плыз на нормальную :)

Serega
26-10-2009, 15:26
EN130, подробней объясните, что не так?

ошибка та же(((((( »
Надо так:

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

comsun
26-10-2009, 20:32
Serega, СПА-СИ-БО!!!!!!!!!

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

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

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

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

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

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
Язык интерфейса: Английский плюс русификация
Лицензия: бесплатно
инструкция по работе с программой прилагается.

Скачать (http://go.microsoft.com/fwlink/?LinkId=14188)

A1EXXX
27-10-2009, 12:44
Bambaso, :off:

Serega
27-10-2009, 21:16
все страницы пустые, а меню »
Ещё раз скачал Справку, всё нормально отображается. Попробуйте перекачать, возможно вы скачали с ошибкой.

EN130
27-10-2009, 22:19
Serega, После обновления винды, все заработало. Как думаеш, что могло быть не так?

Serega
27-10-2009, 22:35
После обновления винды, все заработало. »
Я думаю, что возможно какой-то глюк системы и просто надо было перезагрузиться...

3Nitro
28-10-2009, 10:34
Здравствуйте,
Помогите сделать такую вещь, или скажите реально ли это вообще.

Можно ли сделать слайдшоу в окне Мастера (когда идет установка) и применить к нему этот эффект
http://restools.hanzify.org/attachments/month_0804/f2008413124011.gif
http://restools.hanzify.org/article.asp?id=80 (прямая ссылка (http://restools.hanzify.org/inno/waterctrl/inno_waterctrl_v2.zip) )?
Ну или хотя-бы статическую картинку вместо слайдшоу но с данной библиотекой/плагином.

Долго уже просидел, ничего не выходит( Очень прошу помочь

И еще, как сделать чтобы при выборе компонентов один из 2 флажков всегда оставался включенным? (на примере - есть 2 флажка, можно включить либо 2 вместе либо по-одиночке, но оба выключить нельзя. При выключении последнего включается другой )

Заранее огромное спасибо)

lmiol
30-10-2009, 05:42
здарвствуйте - все поиски зашли в тупик проблему решить не выходит, подскажите может кто знает

Name: "{userdesktop}\Quake Live"; Filename: {pf}\QuakeLiveFirefoxPrism\Firefox\firefox.exe; Parameters: -app application.ini -override "{userappdata}\WebApps\quake.live@prism.app\override.ini" -webapp quake.live@prism.app; WorkingDir: {pf}\QuakeLiveFirefoxPrism\Profiles\Clear\extensions\refractor@developer.mozilla.org\prism; Tasks: desktopicon; IconFilename: "{userappdata}\id Software\quakelive\home\baseq3\quakelive.dll"; IconIndex: 0; Components: browser

где красным - там стоят кавычки и не комплится инстал, а в ярлыке они стоять должны иначе будет эррор

подскажите как сделать так чтобы кавычки в ярлыке в этом месте прописывались...

Habetdin
30-10-2009, 10:46
lmiol, а так?
Name: "{userdesktop}\Quake Live"; Filename: {pf}\QuakeLiveFirefoxPrism\Firefox\firefox.exe; Parameters: -app application.ini -override ""{userappdata}\WebApps\quake.live@prism.app\override.ini"" -webapp quake.live@prism.app; WorkingDir: {pf}\QuakeLiveFirefoxPrism\Profiles\Clear\extensions\refractor@developer.mozilla.org\prism; Tasks: desktopicon; IconFilename: "{userappdata}\id Software\quakelive\home\baseq3\quakelive.dll"; IconIndex: 0; Components: browser

lmiol
30-10-2009, 11:18
таже ошибка!!!

Habetdin
30-10-2009, 11:23
lmiol, а вот так?
Name: "{userdesktop}\Quake Live"; Filename: {pf}\QuakeLiveFirefoxPrism\Firefox\firefox.exe; Parameters: "-app application.ini -override ""{userappdata}\WebApps\quake.live@prism.app\override.ini"" -webapp quake.live@prism.app"; WorkingDir: {pf}\QuakeLiveFirefoxPrism\Profiles\Clear\extensions\refractor@developer.mozilla.org\prism; Tasks: desktopicon; IconFilename: "{userappdata}\id Software\quakelive\home\baseq3\quakelive.dll"; IconIndex: 0; Components: browser

Wiper
30-10-2009, 15:14
Господа,если кто то делал RePack Call of Duty 4: Modern Warfare-хочу сделать без мульта(вырезать мульт полностью)подскажите какие файлы нужно удалить,а то запарился уже.Заранее спасибо.




© OSzone.net 2001-2012