Go Back   FileForums > Game Backup > PC Games > PC Games - CD/DVD Conversions > Conversion Tutorials

Reply
 
Thread Tools Display Modes
  #1  
Old 21-02-2018, 01:37
ZakirAhmad ZakirAhmad is offline
Registered User
 
Join Date: Sep 2015
Location: Kmr
Posts: 290
Thanks: 56
Thanked 54 Times in 37 Posts
ZakirAhmad is on a distinguished road
I added isdone support to a generic script. I need some help please

I have little knowledge of inno scripts. I added isdone support. I just made it look like fitgirls script. Now i want to add wintb.dll support but i am getting errors.
My scripts only lacks "create desktop icon " and " dont create start icon" in select dir page, if possible please add that too. Thanks in advance.
I am uploading only .iss file as my internet speed is too damn slow (only 15kbps).
Attached Files
File Type: zip PRIME.zip (3.9 KB, 21 views)
Reply With Quote
Sponsored Links
  #2  
Old 21-02-2018, 03:34
ZakirAhmad ZakirAhmad is offline
Registered User
 
Join Date: Sep 2015
Location: Kmr
Posts: 290
Thanks: 56
Thanked 54 Times in 37 Posts
ZakirAhmad is on a distinguished road
I added wintb support..
now remains the win dir part, if anybody is then please help me add it.
Reply With Quote
  #3  
Old 21-02-2018, 06:31
KaktoR's Avatar
KaktoR KaktoR is offline
Lame User
 
Join Date: Jan 2012
Location: From outer space
Posts: 3,621
Thanks: 954
Thanked 5,905 Times in 2,183 Posts
KaktoR is on a distinguished road
What you mean with "win dir part" ?

For icons create first variables then functions and procedures

Example:

Code:
var
StartMenuIcons, DesktopIconCheckBox: TNewCheckBox;


function CreateIcons: Boolean;
begin
  Result := DesktopIconCheckBox.Checked;
end;

procedure StartMenuIconsClick(Sender: TObject);
begin
  if StartMenuIcons.Checked = True then begin
    WizardForm.GroupEdit.Enabled := False;
    WizardForm.GroupBrowseButton.Enabled := False;
  end else begin
    WizardForm.GroupEdit.Enabled := True;
    WizardForm.GroupBrowseButton.Enabled := True;
  end;
end;
Then checks for Icons
Code:
[Icons]
Name: "{group}\{#AppName}"; Filename: "{app}\{#AppExec}"; Check: CreateIcons
Name: "{commondesktop}\{#AppName}"; Filename: "{app}\{#AppExec}"; Check: CreateIcons
After this you have to place it in WizardForm like this

Code:
procedure InitializeWizard();
begin

StartMenuIcons := TNewCheckBox.Create(WizardForm);
  with StartMenuIcons do begin
    Parent := WizardForm.SelectDirPage;
    Left := ScaleX(8);
    Top := ScaleY(150);
    Width := ScaleX(240);
    Height := ScaleY(17);
    Caption := 'Create Start menu icons';
    OnClick := @StartMenuIconsClick; //Which action should be performed when OnClick (=clicked)
  end;

  DesktopIconCheckBox := TNewCheckBox.Create(WizardForm);
  with DesktopIconCheckBox do begin
    Parent := WizardForm.SelectDirPage;
    Left := ScaleX(8);
    Top := ScaleY(170);
    Width := ScaleX(240);
    Height := ScaleY(17);
    Caption := 'Create Desktop icon';
  end;

end;
For left/top/width/height you can also use SetBounds(Left, Top, Width, Height);.
__________________
Haters gonna hate
Reply With Quote
The Following User Says Thank You to KaktoR For This Useful Post:
ZakirAhmad (21-02-2018)
  #4  
Old 21-02-2018, 07:01
ZakirAhmad ZakirAhmad is offline
Registered User
 
Join Date: Sep 2015
Location: Kmr
Posts: 290
Thanks: 56
Thanked 54 Times in 37 Posts
ZakirAhmad is on a distinguished road
Quote:
Originally Posted by KaktoR View Post
What you mean with "win dir part" ?

For icons create first variables then functions and procedures

Example:

Code:
var
StartMenuIcons, DesktopIconCheckBox: TNewCheckBox;


function CreateIcons: Boolean;
begin
  Result := DesktopIconCheckBox.Checked;
end;

procedure StartMenuIconsClick(Sender: TObject);
begin
  if StartMenuIcons.Checked = True then begin
    WizardForm.GroupEdit.Enabled := False;
    WizardForm.GroupBrowseButton.Enabled := False;
  end else begin
    WizardForm.GroupEdit.Enabled := True;
    WizardForm.GroupBrowseButton.Enabled := True;
  end;
end;
Then checks for Icons
Code:
[Icons]
Name: "{group}\{#AppName}"; Filename: "{app}\{#AppExec}"; Check: CreateIcons
Name: "{commondesktop}\{#AppName}"; Filename: "{app}\{#AppExec}"; Check: CreateIcons
After this you have to place it in WizardForm like this

Code:
procedure InitializeWizard();
begin

StartMenuIcons := TNewCheckBox.Create(WizardForm);
  with StartMenuIcons do begin
    Parent := WizardForm.SelectDirPage;
    Left := ScaleX(8);
    Top := ScaleY(150);
    Width := ScaleX(240);
    Height := ScaleY(17);
    Caption := 'Create Start menu icons';
    OnClick := @StartMenuIconsClick; //Which action should be performed when OnClick (=clicked)
  end;

  DesktopIconCheckBox := TNewCheckBox.Create(WizardForm);
  with DesktopIconCheckBox do begin
    Parent := WizardForm.SelectDirPage;
    Left := ScaleX(8);
    Top := ScaleY(170);
    Width := ScaleX(240);
    Height := ScaleY(17);
    Caption := 'Create Desktop icon';
  end;

end;
For left/top/width/height you can also use SetBounds(Left, Top, Width, Height);.
sorry bro SelectDirPage.

Bro i also want to change srepinit virtual memory to percentage value. but the cls.ini is overwritten by srepinit function of of isdone. Please help me here.
i also how can i add in info page of setup like FItgirl.

thanks
Reply With Quote
  #5  
Old 21-02-2018, 10:00
KaktoR's Avatar
KaktoR KaktoR is offline
Lame User
 
Join Date: Jan 2012
Location: From outer space
Posts: 3,621
Thanks: 954
Thanked 5,905 Times in 2,183 Posts
KaktoR is on a distinguished road
Try something like this

Code:
SaveStringToFile(ExpandConstant('{tmp}\cls.ini'), '[Srep]'+#13#10+'Memory=75%'+#13#10+'TempPath='+ExpandConstant('{app}'), True);
__________________
Haters gonna hate
Reply With Quote
  #6  
Old 21-02-2018, 10:10
ZakirAhmad ZakirAhmad is offline
Registered User
 
Join Date: Sep 2015
Location: Kmr
Posts: 290
Thanks: 56
Thanked 54 Times in 37 Posts
ZakirAhmad is on a distinguished road
Quote:
Originally Posted by KaktoR View Post
Try something like this

Code:
SaveStringToFile(ExpandConstant('{tmp}\cls.ini'), '[Srep]'+#13#10+'Memory=75%'+#13#10+'TempPath='+ExpandConstant('{app}'), True);
where can i write this bro.
Reply With Quote
  #7  
Old 21-02-2018, 10:20
KaktoR's Avatar
KaktoR KaktoR is offline
Lame User
 
Join Date: Jan 2012
Location: From outer space
Posts: 3,621
Thanks: 954
Thanked 5,905 Times in 2,183 Posts
KaktoR is on a distinguished road
Code:
#ifdef srep2
  ExtractTemporaryFile('cls-srep.dll');
  ExtractTemporaryFile('CLS.ini');
  SaveStringToFile(ExpandConstant('{tmp}\CLS.ini'), '[Srep]'+#13#10+'Memory=75%'+#13#10+'TempPath='+ExpandConstant('{app}'), True);
#endif
__________________
Haters gonna hate
Reply With Quote
  #8  
Old 21-02-2018, 18:59
ZakirAhmad ZakirAhmad is offline
Registered User
 
Join Date: Sep 2015
Location: Kmr
Posts: 290
Thanks: 56
Thanked 54 Times in 37 Posts
ZakirAhmad is on a distinguished road
Thanks bro, I will try it. One last thing. How can i Format text like FItgirl in infobefore page of inno setup.
Reply With Quote
  #9  
Old 21-02-2018, 22:44
KaktoR's Avatar
KaktoR KaktoR is offline
Lame User
 
Join Date: Jan 2012
Location: From outer space
Posts: 3,621
Thanks: 954
Thanked 5,905 Times in 2,183 Posts
KaktoR is on a distinguished road
Use .rtf file

[Setup]
InfoBeforeFile=Info.rtf
__________________
Haters gonna hate
Reply With Quote
  #10  
Old 22-02-2018, 02:48
ZakirAhmad ZakirAhmad is offline
Registered User
 
Join Date: Sep 2015
Location: Kmr
Posts: 290
Thanks: 56
Thanked 54 Times in 37 Posts
ZakirAhmad is on a distinguished road
thanks

i added SaveStringToFile function to script but their r now two entries of srep in script. one of srepinit function another of savestring to function.
Reply With Quote
  #11  
Old 08-10-2019, 23:05
sakila(playboy) sakila(playboy) is offline
Registered User
 
Join Date: Jun 2019
Location: Srilanka
Posts: 15
Thanks: 16
Thanked 8 Times in 6 Posts
sakila(playboy) is on a distinguished road
i want add a Time counter like fitgirl help me plz
Reply With Quote
Reply

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Ultimate Conversion Compressor (UCC) vollachr Conversion Tutorials 55 26-04-2021 09:27
altef_4's installer altef_4 Conversion Tutorials 243 12-11-2018 15:02
yener90's Inno Project Source Codes yener90 Conversion Tutorials 1475 21-10-2014 09:50
Biathlon 2006 Problems... Please help! RamGuy General Gaming 1 10-04-2006 03:23



All times are GMT -7. The time now is 05:52.


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