FileForums - Blackbox Inno Setup Script

FileForums (https://fileforums.com/index.php)

- Conversion Tutorials (https://fileforums.com/forumdisplay.php?f=55)

- - Blackbox Inno Setup Script (https://fileforums.com/showthread.php?t=94425)

@y_thelastknight

I'm testing v1.8. When test finished I will upload and add your name in credit. However, good job. Thanks.

@sentinelks

I'm testing now. I will upload fixed v1.8.

Quote:

Originally Posted by Kurutucu (Post 419613)

@sentinelks

I'm testing now. I will upload fixed v1.8.

there is nothing to fix i think :p

Quote:

error:
isdoneprogressbar1.Position:=isdoneprogressbar1.Po sition + 10;

what was the error? Po sition??

@y_thelastknight

Code:

if isdoneprogressbar1.Position = 100 then

  isdoneprogressbar1.Position:=0

  isdoneprogressbar1.Position:=isdoneprogressbar1.Position + 10;

  if WizardForm.ProgressGauge.Position = 100 then

  WizardForm.ProgressGauge.Position:=0

  WizardForm.ProgressGauge.Position:=WizardForm.ProgressGauge.Position + 10;

Code:

if isdoneprogressbar1.Position = 100 then

  isdoneprogressbar1.Position:=0;

  isdoneprogressbar1.Position:=isdoneprogressbar1.Position + 10;

  if WizardForm.ProgressGauge.Position = 100 then

  WizardForm.ProgressGauge.Position:=0;

  WizardForm.ProgressGauge.Position:=WizardForm.ProgressGauge.Position + 10;

And splash not work.

HTML Code:

#ifexist "Video.avi"

ExtractTemporaryFile('Video.avi');

#endif

#ifexist "Video.mp4"

ExtractTemporaryFile('Video.MP4');

#endif

#ifexist "Video.mpeg"

ExtractTemporaryFile('Video.mpeg');

#endif

#ifexist "Video.mpg"

ExtractTemporaryFile('Video.mpg');

#endif

#ifexist "Video.wmv"

ExtractTemporaryFile('Video.wmv');

#endif

#ifexist "Video.wmv"

ExtractTemporaryFile('Video.wmv');

#endif

#ifexist "Video.swf"

ExtractTemporaryFile('Video.swf');

#endif

Code:

procedure ISFlash_init(Handle:HWND; Ffile: PAnsiChar); external 'isflash_init@files:ISFlash.dll stdcall';

procedure ISFlash_free; external 'isflash_free@files:ISFlash.dll stdcall';



procedure InitializeWizard();

var

FlashPanel: TPanel;

begin

RedesignWizardForm;

FlashPanel := TPanel.Create(WizardForm);

FlashPanel.Parent := WizardForm;

FlashPanel.Top := WizardForm.OuterNotebook.Height + 1;

FlashPanel.Left := -xxx;

FlashPanel.Height := xxx;

FlashPanel.Width := xxx;

ExtractTemporaryFile('video.swf')



ISFlash_init(FlashPanel.Handle, ExpandConstant('{tmp}\video.swf'));

end;



procedure DeinitializeSetup();

begin

ISFlash_free;

end;

also swf file very useful

Quote:

Originally Posted by Kurutucu (Post 419615)

And splash not work.

oh yeah
find this line

Code:

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';

and change string into AnsiString
simple but forget to change :p

@y_thelastknight

Your edited script need fixes.

1. Slideshow seen only 1.jpg and 2.jpg.

2. Setup giving this error with no setup-1.bin.

http://i44.tinypic.com/317fvad.jpg

Here fixed some bugs. But you need to fix 1 and 2. When you fixed send me with message.

01. there is no 3.jpg in the slide folder :D :(

will chk the error 02 :)

Look at Slides folder. There is 1-8.jpg.

just create a small file data1.bin 1mb and place it in the directory where it will load and the problem is solved ...
and give the extraction directory in [source]
not having a file compress.bat is + very fluid to try that code

@sentinelks

Then run uninstall. You can give this error again.

Quote:

Originally Posted by Kurutucu (Post 419613)

I'm testing now. I will upload fixed v1.8.

update post #1 with the updated, complete 'fixed' version 1.8 ?
you posted some other errors in inno troubleshoot thread .. ??

@pakrat2k2

I will upload. Changed some Instructions :)

thanks for keeping updated :D

Update 1.8

-Added 4 version [Main.iss, Main(precomp.0.43).iss, Main(Compact.Mode).iss, Main(Compact.Mode-precomp.0.43).iss]

-Added original Blackbox Logo font.

-Fixed buttons.

-Fixed font colors.

-Added compact mode.

-Fixed finish page.

-Fixed Kurutucu Compressor.

-Added Framework redist.

-Skin change fixed. You can change with any skin.

-Disabled Nvidia Physx Checkbox. But you can enable it.

-Other checkboxs selected automatic.

-Watch Dogs Original Soundtrack added. ;)