» Inno Setup (создание инсталяционных пакетов)

YURSHAT
Gnom3
"MsgBox('{#Logo}', mbInformation, MB_OK);"
P.S. В этой строчке ошибка.

baqzar1
Ты притворяешся, чтоль? Про ошибку тебе уже объяснили - пропущена запятая. чтоб помоч тебе, нужно увидеть строчку, в которой ошибка. Если сильно умный, то почему-бы самому эту ошибку не найти?

baqzar1

Цитата:

Line 405:
Column 180:
comma (",") expected . Вот такая ошибка

Ну я не знаю, попробуй пальчиком по монитору поводи, думаю заработает.

SotM
То, что это бот, или блондинка я еще вчера понял и забил... Но скорее всего блондинка

YURSHAT
Уха ха давно так не ржал.

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

пример игра весит 1,4гб а пишется 1,50мб

Цитата:

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

пример игра весит 1,4гб а пишется 1,50мб

Уже обсуждалось и не раз. Читай ...

Цитата:

YURSHAT
Gnom3
"MsgBox('{#Logo}', mbInformation, MB_OK);"
P.S. В этой строчке ошибка.

baqzar1

Цитата:

P.S. В этой строчке ошибка.

покажи значение {#Logo}. Трудно догадаться, чтоль?

Gnom3
Да трудно, я так и не понял что надо сделать.

Цитата:

Да трудно, я так и не понял что надо сделать.

Кто писал скрипт? Если ты, то покажи, чему равно {#Logo} у тебя. если не ты, спроси у того, кто писал этот скрипт. ошибка там, потому что в функции меседжбокса все правильно.

baqzar1
Ну, еще пару страниц и мы все таки выпытаем...

Вот вам пример, сравните со своим кодом. Как уже сказал коллега Gnom3 - ошибка в {#Logo}.


Код: #define Logo "baqzar1"

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

[Code_]

function InitializeSetup: Boolean;
begin
MsgBox('{#Logo}', mbInformation, MB_OK);
Result := True;
end;

YURSHAT
Скрипт писал ник1967(ошибок не было), потом я попросил винт56 вставить мне в скрипт репак инфо, и убрать слева инфо- лого. И появилась эта ошибка. Может мне кинуть скрипт, вы сможете так найти ошибку?

baqzar1

Цитата:

Может мне кинуть скрипт, вы сможете так найти ошибку?

Именно этого мы и добиваемся!

baqzar1

Цитата:

Может мне кинуть скрипт, вы сможете так найти ошибку?

Ты издеваешся? Написано и в шапке, и неоднократно на форуме:
Цитата:

И на будущее: когда у вас какие-то проблемы в коде, чтобы вам их помогли решить - выкладывайте код на форум. Мы не экстрасенсы и не можем знать, что там у вас написано...

baqzar1
http://files.gameworld.kz/r7nv20f5dr.html

vint56
У меня сразу не работало, я ничего не менял. http://rghost.ru/34727761 ссылка на скрипт, посмотрите сами, где там ошибка.

baqzar1

У тебя

Код: #define Logo "Особенности RePack`a:'#13' • Ничего не вырезано\Не перекодировано'#13' • Версия игры: 1.0'#13' • Время Утановки 20 мин. '#13' • Таблетка вшита'#13#10#13' • Автор RePack'a: Alcatraz'#13#10'

YURSHAT
SotM
vint56
Спасибо, "Утановки" уже так было написано уже давно(сразу), я не видел тогда ошибку. Я поставил просто незная символ " ` ", поэтому, он мне и выдавал ошибку.
P.S. Как убрать звук, когда нажимаешь на Repack info чтобы беззвучно было?

baqzar1
Скрипт я не вижу или его часть,но за звук кнопки отвечает


Код: sndPlaySound(ExpandConstant('{tmp}\Click.wav'),$0001);

meekrab
Звук всё-равно есть. http://rghost.ru/34802581 . Может, так посмотрите?

baqzar1
Ну сейчас проверил на скрипте YURSHAT'а то именно отключить можно закоментив строку


Код:
procedure Btn1(hBtn:HWND);
begin
//sndPlaySound(ExpandConstant('{tmp}\Click.wav'), $0001);
MsgBox('{#Logo}', mbInformation, MB_OK);
end;

procedure Repackinfo;
begin
ExtractTemporaryFile('LogoButton.png');
ExtractTemporaryFile('WFEnter.wav');

hAboutBtn:=BtnCreate(WizardForm.Handle,ScaleX(20),ScaleY(320),ScaleX(36),ScaleY(36),ExpandConstant('{tmp}\LogoButton.png'),0,True);
BtnSetEvent(hAboutBtn,1,WrapBtnCallback(@Btn1,1));
BtnSetEvent(hAboutBtn,BtnClickEventID,WrapBtnCallback(@Btn1,1));
// BtnSetEvent(hAboutBtn,BtnMouseEnterEventID,WrapBtnCallback(@WFBtnEnter,1));
BtnSetVisibility(hAboutBtn,True);
BtnSetCursor(hAboutBtn,GetSysCursorHandle(32649));

ImgApplyChanges(WizardForm.Handle);
end;

meekrab
Всё-равно звук есть .
P.S. А возможно ли вообще изменить цвет инсталлятора, например на черный?

baqzar1
Выше я написал на чем я проверял.
У вас то же самое. Закоментил и звука нет.

meekrab
У меня скрипт от ник1967. До этого звука небыло при переключении слайдов инсталла, потом (когда я закоментировал) от появился.
P.S. Так, можно ли изменить цвет инсталлятора?

baqzar1
Можно. Если сбросите все файлы для него посмотрю.

meekrab
Т.е. файлы фона инсталла, иконки игры, вообщем те файлы, чтобы запустить инсталл, да??