[SeDmY]

Друзья, все пытаюсь создать простой репак и не получается(((((( Подскажите в чем косяк и что не правильно делаю:

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

Код:

[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppId={{B425585C-AD85-49A1-9A1A-1BABDC3F2F4F}
AppName=Terminator Salvation
AppVerName=Terminator Salvation
AppPublisher=Night Angel
DefaultDirName=E:\Games\Evolved Games\Terminator Salvation\Terminator Salvation
DefaultGroupName=Terminator Salvation
AllowNoIcons=true
OutputDir=C:\Users\SeDmY\Desktop\Новая папка
OutputBaseFilename=setup
SetupIconFile=C:\Users\SeDmY\Desktop\icon.ico
Compression=lzma/ultra64
SolidCompression=true
InternalCompressLevel=ultra64
WizardImageFile=C:\Users\SeDmY\Desktop\Terminator\left.bmp
WizardSmallImageFile=E:\Games\Evolved Games\Terminator Salvation\splash_screen.bmp

[Languages]
Name: english; MessagesFile: compiler:Default.isl
Name: russian; MessagesFile: compiler:Languages\Russian.isl

[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked

[Files]
Source: E:\Games\Evolved Games\Terminator Salvation\TerminatorSalvation.exe; DestDir: {app}; Flags: ignoreversion
Source: E:\Games\Evolved Games\Terminator Salvation\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: {group}\Terminator Salvation; Filename: {app}\TerminatorSalvation.exe
Name: {group}\{cm:UninstallProgram,Terminator Salvation}; Filename: {uninstallexe}
Name: {commondesktop}\Terminator Salvation; Filename: {app}\TerminatorSalvation.exe; Tasks: desktopicon

[Run]
Filename: {app}\TerminatorSalvation.exe; Description: {cm:LaunchProgram,Terminator Salvation}; Flags: nowait postinstall skipifsilent

Вылазит ошибка:

[semiono]

Prototype:
function IntToStr(i: Longint): String;
Что с этим делать?

Код:

  F := ExpandConstant('{reg:HKLM32\Software\VST,VSTPluginsPath|{syswow64}\Plugins}\Trilogy\Trilogy.inf');
  SetArrayLength(S, 12);

....
  S[09] := 'HKLM,"Software\Classes\Trilogy","Value3",0x24001,"' + IntToStr(V3) + '"'
...
  SaveStringsToFile(F, S, False);
end;

Что не так ?
Я не разбираюсь в типах данных делфи, вопрос был выше, я думаю мне тут надо преобразовать данные....
Но что делать с функциями...
function Chr(B: Byte): Char;
function Ord(C: Char): Byte;
function Copy(S: String; Indx, Count: Integer): String;
function Length(s: String): Longint;
function Lowercase(S: String): String;
function Uppercase(S: String): String; хоть покажите примеры?
А лучше мой вопрос разрешите #1839 |

[S.T.R.E.L.O.K.]

SeDmY, добавь что-то подобное:

Код:

[setup]
DiskSpanning=true
DiskSliceSize=666666666

где DiskSliceSize - размер файла setup-x.bin в байтах, максимальный размер 2100000000

[SeDmY]

SeDmY, добавь что-то подобное: Код: [setup] DiskSpanning=true DiskSliceSize=666666666 где DiskSliceSize - размер файла setup-x.bin в байтах, максимальный размер 2100000000 »

Так, посмотрим-с) Мысль уловил)

[SeDmY]

Программа во время компиляции выдает сообщение о сбое и выключается... блин, на том же месте практически, где выдавала ошибку(((



Глюк программы в 7-ке или косяк в скрипте!?

[S.T.R.E.L.O.K.]

SeDmY, 7-ka 64-разрядная? если нет, то сделайте сжатие просто ultra, а не ultra64.

если всё таки 64-разрядная, всё равно попробуйте переставить на ultra, ради теста

internalCompressLevel=ultra
Compression=lzma/ultra

[SeDmY]

SeDmY, 7-ka 64-разрядная? если нет, то сделайте сжатие просто ultra, а не ultra64. если всё таки 64-разрядная, всё равно попробуйте переставить на ultra, ради теста internalCompressLevel=ultra Compression=lzma/ultra »

Да, 7-ка 64-разрядная! Сейчас проверю, спс!))

[МИШАНЧИК]

Подскажите пожалуйста!
Как в [Components] сделать чтоб четбокс не был выбран по умолчанию?
В справке не нашёл.

[Farquaad]

Подскажите, pls, как изменить значение параметра в [Setup] в зависимости от выбора юзера, например
[Setup]
DefaultDirName={code:DefDest}\AppName

где

function DefDest(Param: String): String;
begin
if InstallMode then {InstallMode задается юзером в диалоге в InitializeWizard }
Result := ExpandConstant('{pf}')
else
Result := ExpandConstant('{sd}');
end;

Проблема в том, что DefDest вызывается еще до появления окна InnoSetup и соответственно до выбора юзера
или есть способ переопределить переменные Setup позже ?

[mash]

Подскажите пожалуйста, можно ли сделать так:
Если в реестре ключ, скажем:
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Nls\CodePage]
"1250"="c_1250.nls"
то в конце инсталляциии требуется перезагрузка.
Если:
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Nls\CodePage]
"1250"="c_1251.nls"
то тогда без перезагрузки.
Если можно, то пожалуйста помогите с написанием скрипта, я очень в этом не силен.
Заранее спасибо!

Или такой вопрос, можно ли сделать чтоб инсталлятор считывал значение в реестре, например:
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Nls\CodePage]
"10001"=""
"10002"=""
"10003"=""
"10004"=""
и запускал файл rus.reg (незаметно для пользователя во время установки)?
Если таких значений нет(или другие), соответственно не запускал бы его.