Blackbox Inno Setup Script

[rxlord]

hey i know how to use slideshow feature but plz tell me how to use video feature i mean how to enable video and disable slideshow and where to place the video we wanna play and what name should be of video

[Shanilka]

Thanks for the Setup script!

When I compile the setup and run it,it stops working in 2 seconds at the installing page
WHY? MY PC OS is win8 Pro 64bit

[shubhransh]

Hello I am Newbie in Adding Skins but wanted to add this blackbox skin Please Create a Tutorial in easy steps

[sathishgamerguy]

Hi In Innosetup I want Know How To Change The COmpression Methods
And How To Convert To A bin File Without Using Commands

how to add the video what format it is

Don't Double-post, edit your last post if no one has posted after you ( by pakrat2k2)

[pakrat2k2]

Originally Posted by sathishgamerguy

Hi In Innosetup I want Know How To Change The COmpression Methods
And How To Convert To A bin File Without Using Commands

simple goto HELP in INNO and look them up.

[sentinelks]

add a second progress bar kurutucu, it is very nice for the version no SlideShow

#define SecondProgressBar
  #ifdef SecondProgressBar
  LabelPct2: TLabel;
  ISDoneProgressBar2:TNewProgressBar;
  #endif
#ifdef SecondProgressBar
  if CurrentPct<=1000 then ISDoneProgressBar2.Position := CurrentPct;
  LabelPct2.Caption := IntToStr(CurrentPct div 10)+'.'+chr(48 + CurrentPct mod 10)+'%';
#endif
  LabelCurrFileName.Caption:=' Extracting File: '+MinimizePathName(CurrentFile, LabelCurrFileName.Font, LabelCurrFileName.Width-ScaleX(100));
  LabelTime1.Caption:=' Time Elapsed: '+TimeStr2;
  LabelTime2.Caption:='Time Remaining: '+TimeStr1;
 #ifdef SecondProgressBar
  ISDoneProgressBar2.Hide;
  LabelPct2.Hide;
  #endif
  #ifdef SecondProgressBar
   PBTop:=PBTop+ScaleY(25);
  ISDoneProgressBar2 := TNewProgressBar.Create(WizardForm);
  with ISDoneProgressBar2 do begin
    Parent   := WizardForm;
    Height   := 25;
    Left     := ScaleX(77);
     Top      := PBTop+ScaleY(8);
    Width    := ScaleX(500);
    Max      := 1000;
  end;
  LabelCurrFileName := TLabel.Create(WizardForm);
  with LabelCurrFileName do begin
    Parent   := WizardForm;
    AutoSize := False;
    Width    := ISDoneProgressBar2.Width+ScaleX(30);
    Left     := ISDoneProgressBar2.Left;
    Top      := PBTop-20;
  end;

  LabelTime1 := TLabel.Create(WizardForm);
  with LabelTime1 do begin
    Parent   := WizardForm;
    AutoSize := False;
    Width    := ISDoneProgressBar2.Width div 2;
    Left     := ISDoneProgressBar2.Left;
    Top      := PBTop + ScaleY(30);
  end;
  LabelTime2 := TLabel.Create(WizardForm);
  with LabelTime2 do begin
    Parent   := WizardForm;
    AutoSize := False;
    Width    := LabelTime1.Width+ScaleX(40);
    Left     := 400;
    Top      := LabelTime1.Top;
  end;
  LabelPct2 := TLabel.Create(WizardForm);
  with LabelPct2 do begin
    Parent    := WizardForm;
    AutoSize  := true;
    Font.Height:=-24;
    Left      := ISDoneProgressBar2.Left -33 + ISDoneProgressBar2.Width div 2;
    Top       := ISDoneProgressBar2.Top + ScaleY(70);
  end;
  #endif

[Kurutucu]

@sentinelks

No. But thanks for the info

[HellRazor]

Originally Posted by sathishgamerguy

Plz upload Video Or Images tutorial how to use CIU

Plz learn to read. If you bothered to check you would have found out that CI and CIU aren't that different. And there is a sticky about CI.
http://fileforums.com/showthread.php?t=92805

This thread is about Blackbox script.

[trakiinas]

hello guys, I'm having trouble extracting my files' SETUP-2.bin, SETU-3.bin, SETUP-4.bin.

I did everything right, but this installer only extracted the "SETUP-1.bin"

What do I have to do for everyone to be extracted?



PS: Sorry for my bad english, I'm Brazilian and use google translator.

[pakrat2k2]

what script are you using ?

LOL helps to READ what topic I was in

[Kurutucu]

Originally Posted by trakiinas

hello guys, I'm having trouble extracting my files' SETUP-2.bin, SETU-3.bin, SETUP-4.bin.

I did everything right, but this installer only extracted the "SETUP-1.bin"

What do I have to do for everyone to be extracted?



PS: Sorry for my bad english, I'm Brazilian and use google translator.

Check Archives.ini. Example:

if not ShowChangeDiskWindow ('Please Insert Disk To Continue...', ExpandConstant('{src}'),'Setup-1.bin') then break;
if not ISArcExtract ( 0, 25, ExpandConstant('{src}\Setup-1.bin'), ExpandConstant('{app}'), '', false, '', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}'), False) then break;
if not ShowChangeDiskWindow ('Please Insert Disk 2 To Continue...', ExpandConstant('{src}'),'Setup-2.bin') then break;
if not ISArcExtract ( 0, 25, ExpandConstant('{src}\Setup-2.bin'), ExpandConstant('{app}'), '', false, '', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}'), False) then break;
if not ShowChangeDiskWindow ('Please Insert Disk 3 To Continue...', ExpandConstant('{src}'),'Setup-3.bin') then break;
if not ISArcExtract ( 0, 25, ExpandConstant('{src}\Setup-3.bin'), ExpandConstant('{app}'), '', false, '', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}'), False) then break;
if not ShowChangeDiskWindow ('Please Insert Disk 4 To Continue...', ExpandConstant('{src}'),'Setup-4.bin') then break;
if not ISArcExtract ( 0, 25, ExpandConstant('{src}\Setup-4.bin'), ExpandConstant('{app}'), '', false, '', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}'), False) then break;

[trakiinas]

MURUTUCU, thank you for helping me, but now I'm having trouble installing "DirectX".

Appears the error: command line option invalid.


What do I do?

I also can not change the installation directory.

Thank you for your patience.

[y_thelastknight]

Originally Posted by trakiinas

I also can not change the installation directory.

You have already installed in that dir..unintall the old installation before installing this

[trakiinas]

Originally Posted by y_thelastknight

You have already installed in that dir..unintall the old installation before installing this

OOO Thanks man!!

Now the error "DirectX" how to solve?

[y_thelastknight]

What command line are you using???