Войти

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


Страниц : 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 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188

Unhero
12-05-2011, 12:45
Neutron, дело в том, что я эти темы видел и по ссылкам в них ходил, ответа на мой вопрос там нет (

El Sanchez
12-05-2011, 15:44
По умолчанию, если по файлу inf, кликнуть правой кнопкой мыши и нажать установить, обычно, вроде происходит установка, »
Neutron, так можно устанавливать только legacy-драйверы, у которых в inf-файле присутствует секция DefaultInstall. У вас же WDM-драйвер. Для legacy-драйверов подошло бы это:

[Files]
Source: driver\*; DestDir: {tmp}\driver; Flags: deleteafterinstall recursesubdirs createallsubdirs
[Run]
Filename: {tmp}\driver\filename.inf; Verb: install; Flags: shellexec waituntilterminated

Для установки WDM-драйверов нужны сторонние средства, например, утилита devcon:

[Files]
Source: devcon.exe; DestDir: {tmp}; Flags: deleteafterinstall
Source: driver\*; DestDir: {tmp}\driver; Flags: deleteafterinstall recursesubdirs createallsubdirs
[Run]
Filename: {tmp}\devcon.exe; Parameters: "install ""{tmp}\driver\filename.inf"" HWID устройства"; Flags: runhidden



Neutron, то есть определить ключи не возможно? »
Unhero, если разработчик инсталлятора не очистил поле тихой установки в общих настройках инсталляции проекта, то параметр: -silent

ChVL
12-05-2011, 17:28
Как отключить стартовое окно Welcome to...?
Пробовал с помощью такого скрипта:

[сode]
function ShowWindow(hWnd: HWND; nCmdShow: Integer): BOOL;
external 'ShowWindow@user32.dll stdcall delayload';

function InitializeSetup(): Boolean;
var
res: Integer;
begin
ShowWindow(Application.Handle, SW_Hide);
end;
Окно подавляет, но при этом файл не срабатывает (без скрипта всё работает, но с окном, где требуется нажать кнопочку).
Где ошибка?
Т.е. фактически мне нужна тихая установка двойным кликом по файлу (остальные окна отключаются без проблем).

Gnom_aka_Lexander
12-05-2011, 18:03
ChVL, Абсолютно все окна скрыть невозможно после версии 5.39, вроде - окно перед установкой обязательно будет показано, с этим ничего не сделать...

El Sanchez
12-05-2011, 18:19
Лександер, а как же

[Setup]
DisableWelcomePage=yes

? :wink:

insombia
12-05-2011, 18:32
как сделать такое сочитание игр http://i2.fastpic.ru/big/2011/0512/75/567574fea237bc444e2b415cf147c875.png?

ChVL
12-05-2011, 20:05
Лександер,
Похоже, Вы правы. Порылся в архивах и в одном FAQ увидел такое:
Возможна ли быстрая и очень быстрая установка без использования параметров командной строки /SILENT или /VERYSILENT?
Нет и не будет. Если требуется свести к минимуму участие пользователя в установке, используйле директивы Disable* секции [Setup].

El Sanchez,
У меня этих Disable'ов 5 штук прописано. Этот, видимо, появился позже (в моей справке его нет). Не работает, однако. Вместо окна Welcome to... появляется другое: Ready to Install (тоже с кнопочками), несмотря на то, что строка DisableReadyPage=yes имеется. DisableWelcomePage=yes, кстати, является аналогом скрипта:

[сode]
procedure CurPageChanged(CurPageID: Integer);
begin
if CurPageID = wpWelcome then
begin
SendMessage(WizardForm.NEXTBUTTON.Handle, 513, 0, 0)
SendMessage(WizardForm.NEXTBUTTON.Handle, 514, 0, 0)
end;
end;

Gnom_aka_Lexander
12-05-2011, 21:06
Лександер, а как же
Код:
[Setup]
DisableWelcomePage=yes »
А толку? Даже фукция сокрытия страниц (ShouldSkipPage (http://www.krinkels.ru/forum/4-13-567-16-1303551466) ) не поможет - если скрыть абсолютно все страницы, то Риди Пейдж все равно будет показана.

как сделать такое сочитание игр »

ПРимерно так - для секции файлов, по аналогии - реестр прописывать, а так - справка, примеры - в шапке и в самой проге.
[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application
[Files]
;суда кладем игру без языковых файлов
Source: "Игра1 анг\*"; DestDir: {app}\Игра1; Flags: recursesubdirs createallsubdirs; Components: a;
;суда кладем языковые файлы английского языка
Source: "Игра1 анг\*"; DestDir: {app}\Игра1; Flags: recursesubdirs createallsubdirs; Components: a\1;
;суда кладем языковые файлы русского языка
Source: "Игра1 рус\*"; DestDir: {app}\Игра1; Flags: recursesubdirs createallsubdirs; Components: a\2;

;суда кладем игру без языковых файлов
Source: Игра2\*; DestDir: {app}\Игра2; Flags: recursesubdirs createallsubdirs; Components: b;
;суда кладем языковые файлы английского языка
Source: "Игра2 анг\*"; DestDir: {app}\Игра2; Flags: recursesubdirs createallsubdirs; Components: b\1;
;суда кладем языковые файлы русского языка
Source: "Игра2 рус\*"; DestDir: {app}\Игра2; Flags: recursesubdirs createallsubdirs; Components: b\2;

[Components]
Name: a; Description: Игра1; Types: full
Name: a\1; Description: Игра1 анг; Types: full; Flags: exclusive
Name: a\2; Description: Игра1 рус; Types: full; Flags: exclusive

Name: b; Description: Игра2; Types: full
Name: b\1; Description: Игра2 анг; Types: full; Flags: exclusive
Name: b\2; Description: Игра2 рус; Types: full; Flags: exclusive

crashDark
13-05-2011, 00:17
Всем доброго дня!!! Вот у меня один вопрос возник! Как распаковать файлы freeArc?

EvilAlex
13-05-2011, 03:23
Дорого времени суток !

Нужна помощь в исправлении скрипта ...

создав и запустив инстал в строке "Осталось времени:" показывает "Тестовый прогон", а не время до окончания установки !
http://rghost.ru/6159741/thumb.png (http://rghost.ru/6159741.view)

и по оканчанию установки в строке "Время установки" показывает "Тестовый прогон", а не затраченое время !
http://rghost.ru/6159751/thumb.png (http://rghost.ru/6159751.view)

Вот сам скрипт и его файлы - СКРИПТ (http://rghost.ru/6159481)

Поправьте кто может пожалуйста !?
Заранее Благодарю !!!

Gnom_aka_Lexander
13-05-2011, 09:41
EvilAlex, ;#define records найди у себя, после тестовой установки удали точку с запятой перед этой строчкой а файл records.inf, который будет рядом с инсталлом положи рядом со скриптом - и откомпилируй заново - все заработает как надо.
Если к чемуто идет справка, то обязательно нужно ее внимательно прочесть :)

El Sanchez
13-05-2011, 10:43
Даже фукция сокрытия страниц (ShouldSkipPage ) не поможет - если скрыть абсолютно все страницы, то Риди Пейдж все равно будет показана. »
Лександер, да, верно. Хотя можно еще немного изврата:

[Code]
procedure InitializeWizard();
begin
with WizardForm do SetBounds(-Left, -Top, Width, Height);
end;

procedure CurPageChanged(CurPageID: Integer);
begin
PostMessage(WizardForm.NextButton.Handle, 245, 0, 0);
end;

ChVL
13-05-2011, 11:03
El Sanchez,
ИЗврат действительно работает!!

salat
14-05-2011, 03:13
Комрады, просветите.
Как правильно вписывать несколько архивов в скрипте типа:

[Files]
Source: {src}\Data.arc; DestDir: {app}; Flags: external dontcopy
Source: {src}\Data2.arc; DestDir: {app}; Flags: external dontcopy

[Code]
Скрипт ЭТОТ (http://svn.freearc.org/freearc/trunk/Unarc/InnoSetup/FreeArc_Example-Ext.iss) . Там в этой секции нету дефайна куда вписывать пути.

И дальше куда их на распаковку вписывать?
Чет гемороился несколько часов так и не получилось два архива распаковать только один.

и вот еще что.
UnPackError:= UnPack('{#Archives}')
За что отвечает этот параметр и как сюда вписывать также несколько архивов?

Заранее спасибо.

lmiol
14-05-2011, 07:48
у мееня стоит:

[Types]
Name: "full"; Description: "Все компоненты";
Name: "custom"; Description: "Выбрать компоненты"; Flags: iscustom

[Components]
Name: "main"; Description: "блабла"; Types: full custom; Flags: fixed
Name: "plug"; Description: "блабла2"; Types: full custom
Name: "browser"; Description: "блабла3"; Types: full custom
Name: "manual"; Description: "блабла4"; Types: full custom
Name: "anti"; Description: "блабла5"; Types: full custom

а мненеобходимо чтобы пользователь перед выбором компонентов выбирал еще один выбор STANDART и PRO с флагом exclusive (дальше у каждого выбора снова будет выбор "Все компоненты" и "Выбрать компоненты" только у каждого свои)

R.i.m.s.k.y.
14-05-2011, 10:50
ЗЫ все разы что тут писал, все мне помогли, форум фонтастика »
во-первых я за форумом слежу со второй части и что-то не припомню такого сообщения.
во-вторых - нихрена не понятно

Serega
14-05-2011, 20:19
а мненеобходимо »
объясните более подробно, что вы хотите сделать...
во-вторых »
Делаю вам замечание.
Неоднократно замечал за вами, особенно в последнее время, такие сообщения... рекомендую освежить в памяти правила форума и адекватно писать свои ответы.

insombia
14-05-2011, 22:30
Как сделать такие функции в инсталяторе?http://i2.fastpic.ru/big/2011/0514/0d/eadfc310453f28df6437cd165a62240d.jpg

crashDark
14-05-2011, 23:09
Всем доброго вечера, вот я не могу соединить мой скрипт со скриптом FreeArc. Можете пожалуйста решить эту проблему?
Вот ссылка на скрипт FreeArc http://rghost.ru/6384851, вот на мой скрипт http://rghost.ru/6385001.

insombia
15-05-2011, 12:56
Как сделать чтобы в innoultra можно было делать инсталятор с распаковкой фриарков и с айфоном?




© OSzone.net 2001-2012