FileForums

FileForums (https://fileforums.com/index.php)
-   Conversion Tutorials (https://fileforums.com/forumdisplay.php?f=55)
-   -   ASIS: Advanced Simple Installer Script (https://fileforums.com/showthread.php?t=99481)

abror 28-05-2022 23:01

Quote:

Originally Posted by Cesar82 (Post 497013)
Insert something like this in CurStepChanged.

Code:

procedure CurStepChanged(CurStep: TSetupStep);
var
 
ResultCode: Integer;
begin
  if
CurStep = ssDone then
  begin
   
ShellExec('open', 'https://www.fileforums.com', '', '', SW_SHOWNORMAL, ewNoWait, ResultCode);
    ShellExec('open', ExpandConstant('{app}\game.exe'), '', '', SW_SHOWNORMAL, ewNoWait, ResultCode);
  end;
end;


Hi Cesar82, thanks for helping me yesterday...

I want to ask again what compression method is the best

So far I'm using [1] Srep + Lzma I'm compressing a 200 mb file to 60 mb but last night I compressed WWE 2K22 with 10 Hours only cut very little from 49.8 GB to 49.3 GB

I read on the internet every game has a different compression method.. Do you know what the difference is?

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~

Edit: if you want to know the compression method please open the link https://fileforums.com/showthread.php?t=99554 Thanks @KaktoR for telling

fabrieunko 31-05-2022 10:19

hello, I just realized there is an error in the image below in the red frame, it should indicate a number instead of mb?

but I can't find where it is. can you help me? I am using version 7.3.3

https://zupimages.net/up/22/22/tvwm.jpg

Cesar82 31-05-2022 12:09

1 Attachment(s)
Quote:

Originally Posted by fabrieunko (Post 497071)
hello, I just realized there is an error in the image below in the red frame, it should indicate a number instead of mb?

but I can't find where it is. can you help me? I am using version 7.3.3

https://zupimages.net/up/22/22/tvwm.jpg

Check if you have correctly configured the keys referring to the size of each component in the [ComponentsSettings] section of the Settings.ini file as:
Code:

Component1.Size=4.15 GB
In the ASIS theme configuration it is displaying correctly, so there must be some configuration missing.

fabrieunko 31-05-2022 13:19

Code:

;; requires at least two components to enable page.
;; if components is used the global size will be ignored.
Component1.Name=Sniper Ghost Warrior 1
Component1.ItemType=CHECK
Component1.Size=7.17 GB
Component1.Level=0
Component1.Checked=1
Component1.Enabled=1

Component2.Name=Sniper Ghost Warrior 2
Component2.ItemType=CHECK
Component2.Size=8.66 GB
Component2.Level=0
Component2.Checked=1
Component2.Enabled=1

Component3.Name=Sniper Ghost Warrior 3 Season Pass Edition
Component3.ItemType=CHECK
Component3.Size=53.5 GB
Component3.Level=0
Component3.Checked=1
Component3.Enabled=1

I think so it's good I don't see any error.

Cesar82 31-05-2022 19:04

I really think ASIS needs a little fix in the source code.
The label "MB" in Inno Setup languages is not constant in all languages.
Edit ASIS "Script.iss" and add the lines highlighted in RED (Place the lines in the same order as below).
Code:

function FormatDiskSpaceLabel(Labl: String; Size: Extended): String;
begin
 
Result := Labl;
  StringChangeEx(Result, '[mb] MBs', '[size]', True);
  StringChangeEx(Result, '[mb] Мб', '[size]', True);
  StringChangeEx(Result, '[mb] Mo', '[size]', True);

  StringChangeEx(Result, '[mb] MB', '[size]', True);
  StringChangeEx(Result, '[size]', FormatBytes(Size, 2, False), True);
end;


fabrieunko 31-05-2022 20:48

many thanks this worked

kuyhaa 08-06-2022 00:51

hi, firstly thank you so much for this great script. i have little question for batch setting

how to show info in caption label when batch run after install, show the text in label caption, ex : " wait finishing proses" on compact mode

thanks

KaktoR 08-06-2022 07:58

Code:

procedure CurStepChanged(CurStep: TSetupStep);
...
  if (CurStep = ssPostInstall) then
  begin
    if not IsDoneError then
    begin
      #if UseBatch
        if FileExists(ExpandConstant('{#BatchFileName}')) then
          WizardForm.FilenameLabel.Caption := 'Waiting for batch...';
          Exec2(ExpandConstant('{#BatchFileName}'), '', True);
      #endif

https://i.imgur.com/eeDNbRv.png

Cesar82 08-06-2022 17:15

@KaktoR, I think you forgot the begin end.
Code:

procedure CurStepChanged(CurStep: TSetupStep);
...
  if (CurStep = ssPostInstall) then
  begin
    if not IsDoneError then
    begin
      #if UseBatch
        if FileExists(ExpandConstant('{#BatchFileName}')) then
        begin
          WizardForm.FilenameLabel.Caption := 'Waiting for batch...';
          Exec2(ExpandConstant('{#BatchFileName}'), '', True);
        end;
      #endif


kuyhaa 08-06-2022 18:34

worked thanks @kaktor & @Cesar82

and 1 question again

when the batch running, i want the prosses hidden/silent ( only see on task manager and text 'Waiting for batch prosses...' ) without window cmd,

have setting ?

Cesar82 08-06-2022 20:11

Quote:

Originally Posted by kuyhaa (Post 497159)
worked thanks @kaktor & @Cesar82

and 1 question again

when the batch running, i want the prosses hidden/silent ( only see on task manager and text 'Waiting for batch prosses...' ) without window cmd,

have setting ?

try
Code:

Exec2(ExpandConstant('{#BatchFileName}'), '', False);

kuyhaa 08-06-2022 22:49

Quote:

Originally Posted by Cesar82 (Post 497161)
try
Code:

Exec2(ExpandConstant('{#BatchFileName}'), '', False);

big thanks , :D

KaktoR 09-06-2022 06:04

Quote:

Originally Posted by Cesar82 (Post 497158)
@KaktoR, I think you forgot the begin end.
Code:

procedure CurStepChanged(CurStep: TSetupStep);
...
  if (CurStep = ssPostInstall) then
  begin
    if not IsDoneError then
    begin
      #if UseBatch
        if FileExists(ExpandConstant('{#BatchFileName}')) then
        begin
          WizardForm.FilenameLabel.Caption := 'Waiting for batch...';
          Exec2(ExpandConstant('{#BatchFileName}'), '', True);
        end;
      #endif


Thanks, already fixed it here (I made already extensive changes in the script).

Me be like
https://i.imgur.com/GRych1M.jpg

abror 10-06-2022 02:19

can the pause button be removed?

KaktoR 13-06-2022 05:35

Quote:

Originally Posted by abror (Post 497175)
can the pause button be removed?

Yes


All times are GMT -7. The time now is 12:59.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions Inc.
FileForums @ https://fileforums.com