INNO TROUBLESHOOT - Questions Here

[pakrat2k2]

you have to do it, it uses your files. either that or use the conversions posted in index for those 2 games.

[ayateknik]

Hello, my problem inno setup screen with the following codes to hide the full-screen image as it appears in the add file with no problem putting skin alone
I am not receiving the same error when I add music files to the game but the game is opening splash and splash skin file does not delete the music does not play but instead of attaching the stand-alone splash splash splash in both the music at the same time coming, but this time I was not at the same time both the music and the system properties of skin and splash how can I use a combination of modules which alone all that I wrote the game setup screen, I want a large modules add dll files and codes
still getting the error


; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

#define MyAppName "Angy Birds"
#define MyAppVersion "1.0"
#define MyAppPublisher "Rovivo"
#define MyAppURL "www.Rovivo.com"
#define MyAppExeName "AngryBirds.exe"

[ISFormDesigner]
WizardForm=FF0A005457495A415244464F524D003010B3040 00054504630F10B5457697A617264466F726D0A57697A61726 4466F726D0C436C69656E744865696768740368010B436C696 56E74576964746803F1010C4578706C696369744C656674020 00B4578706C69636974546F7002000D4578706C69636974576 96474680301020E4578706C69636974486569676874038E010 D506978656C73506572496E636802600A54657874486569676 874020D00F10C544E65774E6F7465626F6F6B0D4F757465724 E6F7465626F6F6B00F110544E65774E6F7465626F6F6B50616 7650B57656C636F6D65506167650D4578706C6963697457696 4746803F1010E4578706C6963697448656967687403390100F 10C544269746D6170496D6167651157697A6172644269746D6 170496D61676505576964746803F4010D4578706C696369745 76964746803F4010000F10E544E65775374617469635465787 40D57656C636F6D654C6162656C3208576F726457726170080 743617074696F6E120000000007456E61626C6564080756697 369626C65080000F10E544E6577537461746963546578740D5 7656C636F6D654C6162656C3108576F7264577261700807456 E61626C6564080B506172656E74436F6C6F720807566973696 26C6508000000F110544E65774E6F7465626F6F6B506167650 9496E6E6572506167650D4578706C69636974576964746803F 1010E4578706C6963697448656967687403390100F10C544E6 5774E6F7465626F6F6B0D496E6E65724E6F7465626F6F6B00F 110544E65774E6F7465626F6F6B506167650B4C6963656E736 5506167650D4578706C69636974576964746803A1010E45787 06C6963697448656967687403ED000000F110544E65774E6F7 465626F6F6B506167650D53656C656374446972506167650D4 578706C69636974576964746803A1010E4578706C696369744 8656967687403ED000000F110544E65774E6F7465626F6F6B5 06167650F53656C6563745461736B73506167650D4578706C6 9636974576964746803A1010E4578706C69636974486569676 87403ED00000000F1065450616E656C094D61696E50616E656 C00F10C544269746D6170496D6167651657697A617264536D6 16C6C4269746D6170496D616765044C6566740200055769647 46803F40106486569676874023C0C4578706C696369744C656 67402000D4578706C69636974576964746803F4010E4578706 C69636974486569676874023C0000F10E544E6577537461746 9635465787414506167654465736372697074696F6E4C61626 56C044C65667402F803546F70021708576F726457726170080 7456E61626C6564080E506172656E7453686F7748696E74080 756697369626C65080C4578706C696369744C65667402F80B4 578706C69636974546F7002170000F10E544E6577537461746 963546578740D506167654E616D654C6162656C044C6566740 20003546F70020005576964746802710648656967687402140 7456E61626C6564080E506172656E7453686F7748696E74080 756697369626C6508074F6E436C69636B0712506167654E616 D654C6162656C436C69636B0C4578706C696369744C6566740 2000B4578706C69636974546F7002000D4578706C696369745 76964746802710E4578706C696369744865696768740214000 000000000


[Setup]
WizardSmallImageFile=C:\Users\VALX\Desktop\Adsız.b mp
WizardImageFile=C:\Users\VALX\Desktop\Fon.bmp
; 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={{7A0207A0-B136-4EEC-9C43-BBE448A54BC4}
AppName={#MyAppName}
AppVersion={#MyAppVersion}
;AppVerName={#MyAppName} {#MyAppVersion}
AppPublisher={#MyAppPublisher}
AppPublisherURL={#MyAppURL}
AppSupportURL={#MyAppURL}
AppUpdatesURL={#MyAppURL}
DefaultDirName={pf}\{#MyAppName}
DefaultGroupName={#MyAppName}
DisableProgramGroupPage=yes
OutputDir=C:\Users\VALX\Desktop
OutputBaseFilename=Angy Birds
Compression=lzma
SolidCompression=yes

[Languages]
Name: default; MessagesFile: compilerefault.isl

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

[Files]
Source: C:\Users\VALX\Desktop\Yeni klasör\Yeni klasör (2)\Rovio\Angry Birds\AngryBirds.exe; DestDir: {app}; Flags: ignoreversion
Source: C:\Users\VALX\Desktop\Yeni klasör\Yeni klasör (2)\Rovio\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs
; NOTE: Don't use "Flags: ignoreversion" on any shared system files
Source: Dreams.cjstyles; DestDir: {app}
Source: ISSkin.dll; DestDir: {app}
Source: Splash.png; DestDir: {tmp}; Flags: dontcopy
Source: isgsg.dll; DestDir: {tmp}; Flags: dontcopy

[Icons]
Name: {group}\{#MyAppName}; Filename: {app}\{#MyAppExeName}
Name: {group}\{cm:ProgramOnTheWeb,{#MyAppName}}; Filename: {#MyAppURL}
Name: {group}\{cm:UninstallProgram,{#MyAppName}}; Filename: {uninstallexe}
Name: {commondesktop}\{#MyAppName}; Filename: {app}\{#MyAppExeName}; Tasks: desktopicon

[Run]
Filename: {app}\{#MyAppExeName}; Description: {cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}; Flags: nowait postinstall skipifsilent

[Code]
{ RedesignWizardFormBegin } // Don't remove this line!
// Don't modify this section. It is generated automatically.
procedure PageNameLabelClick(Sender: TObject); forward;

procedure RedesignWizardForm;
begin
with WizardForm.WizardBitmapImage do
begin
Width := ScaleX(500);
end;

with WizardForm.WelcomeLabel2 do
begin
WordWrap := False;
Caption := '';
Enabled := False;
Visible := False;
end;

with WizardForm.WelcomeLabel1 do
begin
WordWrap := False;
Enabled := False;
ParentColor := False;
Visible := False;
end;

with WizardForm.WizardSmallBitmapImage do
begin
Left := ScaleX(0);
Width := ScaleX(500);
Height := ScaleY(60);
end;

with WizardForm.PageDescriptionLabel do
begin
WordWrap := False;
Enabled := False;
ParentShowHint := False;
Visible := False;
Left := ScaleX(-8);
Top := ScaleY(23);
end;

with WizardForm.PageNameLabel do
begin
Enabled := False;
ParentShowHint := False;
Visible := False;
OnClick := @PageNameLabelClick;
Left := ScaleX(0);
Top := ScaleY(0);
Width := ScaleX(113);
Height := ScaleY(20);
end;

{ ReservationBegin }
// This part is for you. Add your specialized code here.

{ ReservationEnd }
end;
// Don't modify this section. It is generated automatically.
{ RedesignWizardFormEnd } // Don't remove this line!

procedure PageNameLabelClick(Sender: TObject);
begin

end;

procedure InitializeWizard();
begin
RedesignWizardForm;
end;


procedure LoadSkin(lpszPath: String; lpszIniFileName: String);
external 'LoadSkin@files:isskin.dll stdcall';

function InitializeSetup(): Boolean;
begin
ExtractTemporaryFile('Dreams.cjstyles');
LoadSkin(ExpandConstant('{tmp}\Dreams.cjstyles'), '');
Result := True;
end;
[*Code]
// p2:String -- Inno Setup (Kein UNICODE)
// p2:AnsiString -- Inno Setup (UNICODE)

procedure ShowSplashScreen(p1:HWND;p2:AnsiString;p3,p4,p5,p6 ,p7:integer;p8:boolean;p9:Cardinal;p10 :integer); external 'ShowSplashScreen@files:isgsg.dll stdcall delayload';
procedure Splash();
begin
ExtractTemporaryFile('isgsg.dll');
ExtractTemporaryFile('Splash.png');
ShowSplashScreen(WizardForm.Handle,ExpandConstant( '{tmp}')+'\Splash.png',1000,3000,1000,0,255,False, $FFFFFF,10);
end;

procedure InitializeWizard();
begin
Splash();
end;

[Andre Jesus]

Hello.

I loaded 4 images .jpg (with botva2.dll) to use like background on my installer, however, the images just stay in welcome page (ID wpWelcome) one upon another.
How can i set each image like background in your respective page?

This is my idea:
image 1.jpg like bagkground on Welcomepage (wpWelcome)
image 2.jpg like background on Readypage (wpReady)
image 3.jpg like background on Installpage (wpInstalling)
image 4.jpg like background on Finishedpage (wpFinished)

This is my script.

#include "Install\botva2.iss"

[Setup]
AppName=Game Setup
AppVerName=Game Setup
OutputDir=.
DefaultDirName={pf}\Game Setup
OutputBaseFilename=Game Setup
DisableProgramGroupPage=yes
DisableDirPage=yes
Compression=none
;lzma2/Ultra64
SolidCompression=no
SetupIconFile=Install\ico.ico
;SlicesPerDisk=1
;DiskSliceSize=1073741824
;DiskSpanning=yes
      
[Files]
;Source: Game Setup\*; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: Install\*; Flags: dontcopy

Code
var
h:HWND;

procedure LoadSkin(lpszPath: String; lpszIniFileName: String);external 'LoadSkin@files:isskin.dll stdcall';
procedure UnloadSkin();external 'UnloadSkin@files:isskin.dll stdcall';

procedure InitializeWizard();
begin
ExtractTemporaryFile('botva2.dll');
ExtractTemporaryFile('1.jpg');
ExtractTemporaryFile('2.jpg');
ExtractTemporaryFile('3.jpg');
ExtractTemporaryFile('4.jpg');
ExtractTemporaryFile('glass.png');
ExtractTemporaryFile('skin.cjstyles');
LoadSkin(ExpandConstant('{tmp}\skin.cjstyles'), '');

with WizardForm do begin
Position:=poScreenCenter; 
InnerNotebook.Hide;
OuterNotebook.Hide;
WelcomeLabel1.Hide;
WelcomeLabel2.Hide;
FinishedLabel.Hide;
FinishedHeadingLabel.Hide;
PageDescriptionLabel.Hide; 
PageNameLabel.Hide;
Bevel.Hide;
BorderStyle:= bsDialog;
ClientWidth:=600 
ClientHeight:=400
CancelButton.SetBounds(520,360,60,30);
NextButton.SetBounds(450,360,60,30);
BackButton.SetBounds(380,360,60,30);
end;

h:=WizardForm.Handle;
ImgLoad(h,ExpandConstant('{tmp}\1.jpg'),0,0,600,400,True,True);
ImgLoad(h,ExpandConstant('{tmp}\2.jpg'),0,0,600,400,True,True);
ImgLoad(h,ExpandConstant('{tmp}\3.jpg'),0,0,600,400,True,True); 
ImgLoad(h,ExpandConstant('{tmp}\4.jpg'),0,0,600,400,True,True);
ImgLoad(h,ExpandConstant('{tmp}\glass.png'),20,130,560,220,True,True); 
ImgApplyChanges(WizardForm.Handle);
end;

procedure DeinitializeSetup();
begin
gdipShutdown;
UnloadSkin();
end;

[Brazilica]

Can someone teach me how to add registry entries on my conversion?

[JacksMafia]

guys i have small problem here i have reg key it's already done but there is only one problem in here it is

Root: HKLM; SubKey: SOFTWARE\Electronic Arts\Electronic Arts\Red Alert 3; ValueType: string; ValueName: CD Drive; ValueData: J:\; Flags: uninsdeletevalue uninsdeletekeyifempty

what i should write instead of this red letter which indicates where the game was installed from?

any ideas?!!

thanks

[pakrat2k2]

your matching drive letter for cdrom-drive

[JacksMafia]

yeah i know that i was asking about this
the original setup detect where the game was installed from and i want my setup to do the same and write this in the reg file

[pakrat2k2]

that one value is insignificant, whole line can be deleted from reg section. doesnt matter where it was installed from.

[Andre Jesus]

Hello guys.

How can i use a new font (font.ttf) that i don´t have in my system, on the inno setup?

Example of font that i don´t have in my system.
http://www.1001freefonts.com/image.p...o%20The%20Hand

The script to this case is the same in the post # 138.

Thanks in advanced.

[Razor12911]

[Files]
Source: Font.ttf; DestDir: {tmp}; Flags: dontcopy;

[Code]
#ifdef UNICODE
#define A "W"
#else
#define A "A"
#endif

const
FR_PRIVATE = $10;

function AddFontResource(lpszFilename:string;fl:dword;pdv:i nteger): Integer; external 'AddFontResourceEx{#A}@gdi32.dll stdcall';
function RemoveFontResource(lpszFilename:string;fl:dword;pd v:integer): BOOL; external 'RemoveFontResourceEx{#A}@gdi32.dll stdcall';

procedure InitializeWizard;
begin
ExtractTemporaryFile('Font.ttf');
AddFontResource(ExpandConstant('{tmp}\Font.ttf'), FR_PRIVATE, 0);
end;

procedure DeinitializeSetup;
begin
RemoveFontResource(ExpandConstant('{tmp}\Font.ttf' ), FR_PRIVATE, 0);
end;

__________________________________________________ ______________

Glad could help with font.

Work on ANSI and UNICODE

Sorry for bad english.

[Razor12911]

Originally Posted by Andre Jesus

Hello.

I loaded 4 images .jpg (with botva2.dll) to use like background on my installer, however, the images just stay in welcome page (ID wpWelcome) one upon another.
How can i set each image like background in your respective page?

This is my idea:
image 1.jpg like bagkground on Welcomepage (wpWelcome)
image 2.jpg like background on Readypage (wpReady)
image 3.jpg like background on Installpage (wpInstalling)
image 4.jpg like background on Finishedpage (wpFinished)

This is my script.

#include "Install\botva2.iss"

[Setup]
AppName=Game Setup
AppVerName=Game Setup
OutputDir=.
DefaultDirName={pf}\Game Setup
OutputBaseFilename=Game Setup
DisableProgramGroupPage=yes
DisableDirPage=yes
Compression=none
;lzma2/Ultra64
SolidCompression=no
SetupIconFile=Install\ico.ico
;SlicesPerDisk=1
;DiskSliceSize=1073741824
;DiskSpanning=yes
      
[Files]
;Source: Game Setup\*; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: Install\*; Flags: dontcopy

Code
var
h:HWND;

procedure LoadSkin(lpszPath: String; lpszIniFileName: String);external 'LoadSkin@files:isskin.dll stdcall';
procedure UnloadSkin();external 'UnloadSkin@files:isskin.dll stdcall';

procedure InitializeWizard();
begin
ExtractTemporaryFile('botva2.dll');
ExtractTemporaryFile('1.jpg');
ExtractTemporaryFile('2.jpg');
ExtractTemporaryFile('3.jpg');
ExtractTemporaryFile('4.jpg');
ExtractTemporaryFile('glass.png');
ExtractTemporaryFile('skin.cjstyles');
LoadSkin(ExpandConstant('{tmp}\skin.cjstyles'), '');

with WizardForm do begin
Position:=poScreenCenter; 
InnerNotebook.Hide;
OuterNotebook.Hide;
WelcomeLabel1.Hide;
WelcomeLabel2.Hide;
FinishedLabel.Hide;
FinishedHeadingLabel.Hide;
PageDescriptionLabel.Hide; 
PageNameLabel.Hide;
Bevel.Hide;
BorderStyle:= bsDialog;
ClientWidth:=600 
ClientHeight:=400
CancelButton.SetBounds(520,360,60,30);
NextButton.SetBounds(450,360,60,30);
BackButton.SetBounds(380,360,60,30);
end;

h:=WizardForm.Handle;
ImgLoad(h,ExpandConstant('{tmp}\1.jpg'),0,0,600,400,True,True);
ImgLoad(h,ExpandConstant('{tmp}\2.jpg'),0,0,600,400,True,True);
ImgLoad(h,ExpandConstant('{tmp}\3.jpg'),0,0,600,400,True,True); 
ImgLoad(h,ExpandConstant('{tmp}\4.jpg'),0,0,600,400,True,True);
ImgLoad(h,ExpandConstant('{tmp}\glass.png'),20,130,560,220,True,True); 
ImgApplyChanges(WizardForm.Handle);
end;

procedure DeinitializeSetup();
begin
gdipShutdown;
UnloadSkin();
end;

Use Procedure CurpageChanged

[Andre Jesus]

Originally Posted by Razor12911

Use procedure CurPageChanged

Dear Razor12911.

I tried several ways and could not, can you give me an example please?

[Andre Jesus]

Originally Posted by Razor12911

[Files]
Source: Font.ttf; DestDir: {tmp}; Flags: dontcopy;

[Code]
#ifdef UNICODE
#define A "W"
#else
#define A "A"
#endif

const
FR_PRIVATE = $10;

function AddFontResource(lpszFilename:string;fl:dword;pdv:i nteger): Integer; external 'AddFontResourceEx{#A}@gdi32.dll stdcall';
function RemoveFontResource(lpszFilename:string;fl:dword;pd v:integer): BOOL; external 'RemoveFontResourceEx{#A}@gdi32.dll stdcall';

procedure InitializeWizard;
begin
ExtractTemporaryFile('Font.ttf');
AddFontResource(ExpandConstant('{tmp}\Font.ttf'), FR_PRIVATE, 0);
end;

procedure DeinitializeSetup;
begin
RemoveFontResource(ExpandConstant('{tmp}\Font.ttf' ), FR_PRIVATE, 0);
end;

__________________________________________________ ______________

Glad could help with font.

Work on ANSI and UNICODE

Sorry for bad english.

Thank you very much for your response friend.
I will try use this code and return the result.

[Razor12911]

[Code]

var

Image1, Image2, Image3, Image4: Longint;

procedure InitializeWizard();
begin

h:=WizardForm.Handle;
Image1:=ImgLoad(h,ExpandConstant('{tmp}\1.jpg'),0, 0,600,400,True,True);
Image2:=ImgLoad(h,ExpandConstant('{tmp}\2.jpg'),0, 0,600,400,True,True);
Image3:=ImgLoad(h,ExpandConstant('{tmp}\3.jpg'),0, 0,600,400,True,True);
Image4:=ImgLoad(h,ExpandConstant('{tmp}\4.jpg'),0, 0,600,400,True,True);
ImgLoad(h,ExpandConstant('{tmp}\glass.png'),20,130 ,560,220,True,True);
ImgSetVisibility(Image1,False);
ImgSetVisibility(Image2,False);
ImgSetVisibility(Image3,False);
ImgSetVisibility(Image4,False);
ImgApplyChanges(WizardForm.Handle);
end;

procedure Components(CurPageID: Integer);
begin
ImgSetVisibility(Image1,False);
ImgSetVisibility(Image2,False);
ImgSetVisibility(Image3,False);
ImgSetVisibility(Image4,False);
case CurPageID of
wpWelcome:
begin
ImgSetVisibility(Image1,True);
end;
wpReady:
begin
ImgSetVisibility(Image2,True);
end;
wpInstalling:
begin
ImgSetVisibility(Image3,True);
end;
wpFinish:
begin
ImgSetVisibility(Image4,True);
end;
end;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
Components(CurPageID);
ImgApplyChanges(WizardForm.Handle);
end;

[Razor12911]

Originally Posted by ayateknik

Hello, my problem inno setup screen with the following codes to hide the full-screen image as it appears in the add file with no problem putting skin alone
I am not receiving the same error when I add music files to the game but the game is opening splash and splash skin file does not delete the music does not play but instead of attaching the stand-alone splash splash splash in both the music at the same time coming, but this time I was not at the same time both the music and the system properties of skin and splash how can I use a combination of modules which alone all that I wrote the game setup screen, I want a large modules add dll files and codes
still getting the error

[...]

To use splash on this

#ifdef UNICODE
procedure ShowSplashScreen(p1:HWND;p2:AnsiString;p3,p4,p5,p6 ,p7:integer;p8:boolean;p9:Cardinal;p10 :integer); external 'ShowSplashScreen@files:isgsg.dll stdcall delayload';
#else
procedure ShowSplashScreen(p1:HWND;p2:string;p3,p4,p5,p6,p7: integer;p8:boolean;p9:Cardinal;p10:integer); external 'ShowSplashScreen@files:isgsg.dll stdcall delayload';
#endif