[Tukash]

Jerichoman
смотри!вначале прекомп их разжимает, меняет расширеие файла, потом он его распаковывает и получается оригинальный файл, вот проверь)) так что он меняет расширение для того что-бы лучше сожмать, а потом обратно переименовывает!

[Jerichoman]

Tukash
Все, понял. ОГРОМНОЕ тебе человеческое спс

[Tukash]

Jerichoman
рад что хоть кому-то могу помочь))
ЗЫ, кто-нибудь подскажет скрипт для изменения окна инсталялтора? а то шрифтами уже запарился менять)))

[serega355]

Доброго времени суток!!
Обращаюсь ко всем пользователям. Если кто-нибудь знает как решить проблему, подскажите. Вот есть скрипт, с помощью него создаю инсталлятор, ставлю игру, потом удаляя её с помощью деинсталлятора из меню ПУСК, выводится сообщение:
Ошибка
Файл протокола для деинсталляции "D\Игромания\Grand Theft Auto Racing Driver\unins000.dat" не распознан данной версией программы-деинсталлятора. Деинсталляция невозможна.

Скрипт:
; Скрипт создан при помощи мастера создания скриптов.
; СМ. ДОКУМЕНТАЦИЮ ДЛЯ ИЗУЧЕНИЯ ДЕТАЛЕЙ ОТНОСИТЕЛЬНО СОЗДАНИЯ ФАЙЛОВ СКРИПТА INNO SETUP!

[Setup]
AppName=Grand Theft Auto Racing Driver
AppVerName=Grand Theft Auto Racing Driver 1.5
AppPublisher=Rockstar Games
AppPublisherURL=http://rockstargames.ru/
AppSupportURL=http://rockstargames.ru/
AppUpdatesURL=http://rockstargames.ru/
DefaultDirName={pf}\Rockstar Games\Grand Theft Auto Racing Driver
Encryption=yes
DefaultGroupName=Grand Theft Auto Racing Driver
AllowNoIcons=yes
LicenseFile=D:\Игромания\Grand Theft Auto Racing Driver\ReadMe\Readme\License.txt
InfoBeforeFile=D:\Игромания\Grand Theft Auto Racing Driver\ReadMe\Readme\info.txt
InfoAfterFile=D:\Игромания\Grand Theft Auto Racing Driver\ReadMe\Readme\files.txt
OutputDir=D:\Инсталлятор GTA RD
OutputBaseFilename=setup
SetupIconFile=D:\Игромания\Grand Theft Auto Racing Driver\data\Icons\app.ico
Password=1345O-9087H-0967K-3555R
DiskSpanning=yes
SlicesPerDisk=1
DiskSliceSize=999975555
DiskClusterSize=4096
ReserveBytes=0
Compression=lzma/ultra
SolidCompression=yes
Uninstallable=yes
UninstallFilesDir={pf}\Rockstar Games\Grand Theft Auto Racing Driver
UninstallLogMode=append
UninstallRestartComputer=no
UpdateUninstallLogAppName=yes
UninstallStyle=classic
WizardImageFile=D:\Игромания\Grand Theft Auto Racing Driver\data\Icons\GTA RD.bmp
WizardImageStretch=yes
[Languages]
Name: "russian"; MessagesFile: "compiler:Default.isl"

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

[Files]
Source: "D:\Игромания\Grand Theft Auto Racing Driver\gta_sa.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "D:\Игромания\Grand Theft Auto Racing Driver\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
; ОТМЕТЬТЕ: Не используйте "Флажки: Проигнорировать версию" на любых общедоступных системных файлах

[Icons]
Name: "{group}\Grand Theft Auto Racing Driver"; Filename: "{app}\gta_sa.exe"; WorkingDir: {app};
Name: "{group}\{cm:ProgramOnTheWeb,Grand Theft Auto Racing Driver}"; Filename: "http://rockstargames.ru/"
Name: "{group}\{cm:UninstallProgram,Grand Theft Auto Racing Driver}"; Filename: "{app}\unins000.exe"
Name: "{commondesktop}\Grand Theft Auto Racing Driver"; Filename: "{app}\gta_sa.exe"; WorkingDir: {app}; Tasks: desktopicon
Name: "{userappdata}\Microsoft\Internet Explorer\Quick Launch\Grand Theft Auto Racing Driver"; Filename: "{app}\gta_sa.exe"; WorkingDir: {app}; Tasks: quicklaunchicon

[Run]
Filename: "{app}\gta_sa.exe"; WorkingDir: {app}; Description: "{cm:LaunchProgram,Grand Theft Auto Racing Driver}"; Flags: nowait postinstall skipifsilent

[UninstallRun]
Filename: "{app}\unins000.exe"; WorkingDir: {app}; RunOnceId: "DeleteProgram"

Если знаете подскажите, как сделать чтобы одна картинка использовалась в окне приветствия, а в окне окончания установки другая.
Заранее Благодарен.

[Tukash]

serega355
перед созданием репака, удали из папки с игрой старый unins000.exe и unins000.dat!
и

Код:

[UninstallRun]
Filename: "{app}\unins000.exe"; WorkingDir: {app}; RunOnceId: "DeleteProgram"

ненужен!

[Serega]

я скачал ispack-5.3.7-unicode и теперь у меня не работает скин »

У вас ISSkin v.3.0.0.0 от [19.01.2010]? Если нет, то скачать можете из шапки темы Скрипты Inno Setup. Помощь и советы или с сайта, это решит вашу проблему.

[Serega]

А оно заносит какую-то хрень в реестр, не то что надо... »

Всё правильно она заносит. Просто строка конвертируется в HEX данные.
Попробуйте запишите Reg1:= 'mariolast' и вы увидите в реестре "Data"=hex:6d,61,72,69,6f,6c,61,73,74.

кто-нибудь подскажет скрипт для изменения окна инсталялтора? »

Код:

  WizardForm.ClientHeight:= высота
  WizardForm.ClientWidth:= ширена

[YURSHAT]

Serega,

Код:

WizardForm.ClientWidth:= ширена

правильно ширИна

[Tukash]

YURSHAT
твой скрипт скажи как отсюда полностью убрать шрифт?
пишу это: PageNameLabel.Font.Size := 0; ему пох...

Код:

var
  PageNameLabel,PageDescriptionLabel:TLabel;

procedure InitializeWizard();
begin
  WizardForm.PageNameLabel.Hide;
  WizardForm.PageDescriptionLabel.Hide;
  WizardForm.WizardSmallBitmapImage.Align:=true;

  PageNameLabel := TLabel.Create(WizardForm);
  PageNameLabel.Left := ScaleX(25);
  PageNameLabel.Top := ScaleY(10);
  PageNameLabel.Width := ScaleX(300);
  PageNameLabel.Height := ScaleY(14);
  PageNameLabel.AutoSize := False;
  PageNameLabel.WordWrap := True;
  PageNameLabel.Font.Color := clBlack;
  PageNameLabel.Font.Style := [fsBold];
  PageNameLabel.Transparent := True;
  PageNameLabel.Parent := WizardForm.MainPanel;

  PageDescriptionLabel := TLabel.Create(WizardForm);
  PageDescriptionLabel.Left := ScaleX(40);
  PageDescriptionLabel.Top := ScaleY(25);
  PageDescriptionLabel.Width := ScaleX(475);
  PageDescriptionLabel.Height := ScaleY(30);
  PageDescriptionLabel.AutoSize := False;
  PageDescriptionLabel.WordWrap := True;
  PageDescriptionLabel.Font.Color := clBlack;
  PageDescriptionLabel.Transparent := True;
  PageDescriptionLabel.Parent := WizardForm.MainPanel;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
  PageNameLabel.Caption := WizardForm.PageNameLabel.Caption;
  PageDescriptionLabel.Caption := WizardForm.PageDescriptionLabel.Caption;
end;

и еще такой вопрос, есть-ли такой -же скрипт но для WizardImage.bmp?? хочу сделать WizardImage.bmp чуть шире!

[mash]

Спасибо, я скачал, но не получается все равно, то ли что то не так делаю (мне нужен обычный скин Black), но внизу пишет тоже самое. Но главное, Демо из Codejock Software тоже без скина получается на ispack-5.3.7-unicode