PDA

Показать полную графическую версию : Скрипты 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

Edison007
27-06-2011, 14:22
ARS_23
Я знаю))) надо использовать Surface.dll

insombia
27-06-2011, 14:25
Edison007 где его скачать или найти скрипт к нему?

ARS_23
27-06-2011, 14:27
Edison007,
ну спасибо за ответ)
а где его взять и что писать в скрипт все равно неизвестно

leshcat
28-06-2011, 10:38
Интересно,

А Инно умеет устанавливать драйверы?

insombia
28-06-2011, 10:52
leshcat ну да если указать правильные файлы драйвера

leshcat
28-06-2011, 11:34
тоесть возможно принудительное обновление видео-драйвера после установки игры?

insombia
28-06-2011, 11:56
leshcat нет в секцию files нужно указывать все файлы которые относятся к драйверу и драйвер создаёт папки ещё в некоторых папках в винде

leshcat
28-06-2011, 12:34
А есть какой-нибудь пример скрипта инсталлятора драйвера? В паках такого нет.

Rikill
28-06-2011, 20:14
Доброго времени суток, есть ли у кого-нибудь скрипты для версии от Restools чтобы оценить все возможности. Шапку читал :)
Лександер, спасибо, но думал что ещё что-нибудь есть интересное
Внимательно: Абсолютно все примеры идут в архивах. читать и искать ты так и не научился. »
да я ж говорою всё это смотрел и тестил, я спросил есть ли что-нибудь ещё?!

Gnom_aka_Lexander
28-06-2011, 20:27
Rikill, Терь сюда флудить пришел? Примеры всех возможностей расширенной версии идут в архивах с расширенной версией.
Одно радует, здесь модерация строже, чем на руборде и нафлудить целую тему в одно лицо всякими глупостями тебе просто не дадут.
Внимательно: Абсолютно все примеры идут в архивах. читать и искать ты так и не научился.

insombia
28-06-2011, 21:06
Подскажите скрипт для 3-Д инсталятора кто знает

Edison007
28-06-2011, 21:09
insombia
Его нет в открытом доступе! И никто тебе его не даст!

No4noylis
28-06-2011, 21:13
Можно ли както дабавить свой шрифт в весь текст инсталлятора????????7

insombia
28-06-2011, 21:19
Edison007 жаль

Gnom_aka_Lexander
28-06-2011, 21:21
No4noylis, Можно.

#define Font "Zombie.ttf"
#define FontName "DS Zombie Cyr"

[Setup]
AppName=My Program
AppVerName=My Program
DefaultDirName={pf}\My Program
OutputDir=.

[Languages]
Name: "rus"; MessagesFile: "compiler:Languages\Russian.isl"

[Files]
Source: {#Font}; Flags: dontcopy;

[_Code]
var
IsCustomFontInstalled: boolean;
FontName: string;

function AddFontResource(FileName: PAnsiChar): Integer; external 'AddFontResourceA@gdi32.dll stdcall';
function RemoveFontResource(FileName: PAnsiChar): BOOL; external 'RemoveFontResourceA@gdi32.dll stdcall';

function InitializeSetup(): Boolean;
begin
ExtractTemporaryFile('{#Font}');
IsCustomFontInstalled:=AddFontResource(ExpandConstant('{tmp}')+'\{#Font}')>0;
if IsCustomFontInstalled then SendMessage(HWND_BROADCAST,$1D,0,0);
if FontExists('{#FontName}') then FontName:='{#FontName}' else FontName:='Arial';
Result:= True;
end;

Procedure InitializeWizard();
begin
WizardForm.Font.Name:= FontName;
end;

procedure DeInitializeSetup();
begin
WizardForm.Free;
if IsCustomFontInstalled then
if RemoveFontResource(PAnsiChar(ExpandConstant('{tmp}')+'\{#Font}')) then SendMessage(HWND_BROADCAST,$1D,0,0);
end;
Положить рядом со скриптом файл шрифта Zombie.ttf, либо любой другой, но тогда поправить в скрипте - #define Font "Zombie.ttf" - файл шрифта, #define FontName "DS Zombie Cyr" имя шрифта

No4noylis
29-06-2011, 11:21
1) А как изменить размер инсталлятора????
2) И удалять страници из инсталлятора???? (Если не трудно, напишите ID всех его страниц) И соответственно как потом переименовать кнопку далее в установить????

R.i.m.s.k.y.
29-06-2011, 12:07
А как изменить размер инсталлятора »
[Setup]
DiskSpanning=yes
SlicesPerDisk=3
DiskSliceSize=1566000000
И удалять страници из инсталлятора »
пропускать можно
*[*Code]
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;

//CurPage может принимать значения
//wpWelcome, wpLicense, wpPassword, wpInfoBefore, wpUserInfo, wpSelectDir, wpSelectComponents, wpSelectProgramGroup, wpSelectTasks, wpReady, wpPreparing, wpInstalling, wpInfoAfter, wpFinished

все находится в справке и шапке за 5 минут

Rikill
29-06-2011, 14:01
No4noylis, а так же можно удалять страницы так:
[setup]
DisableDirPage=true
DisableFinishedPage=true
DisableProgramGroupPage=true
DisableReadyMemo=true
DisableReadyPage=true
DisableStartupPrompt=true
DisableWelcomePage=true

No4noylis
29-06-2011, 14:30
А как изменить размер инсталлятора »
Код:
[Setup]
DiskSpanning=yes
SlicesPerDisk=3
DiskSliceSize=1566000000 »

Спасибо, но я имел ввиду размер окна инсталлятора??? :)

Rikill
29-06-2011, 14:42
No4noylis, выражайся точнее
procedure InitializeWizard();
with WizardForm do begin
Width:=ScaleX(559);
Height:=ScaleY(404);
Position:=poScreenCenter;
end;
пробуй




© OSzone.net 2001-2012