FileForums - yener90's Inno Project Source Codes

Page 23 of 37

« First

Last »

Show 40 post(s) from this thread on one page

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

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

- - yener90's Inno Project Source Codes (https://fileforums.com/showthread.php?t=91563)

KaktoR

04-10-2012 06:09

Quote:

Originally Posted by QfG (Post 407578)

Any Question:

What must i type in the setup.ini, if i will that a *.arc file only installed @english languabe.

For example:

Quote:

[ExtractSettings]
FreeArcFile1={src}\english.arc;DestDir:{app};Disk: 1

This file must only installed if i choose the english language in the installer.

Thanks for help.

For english:

Quote:

[ExtractSettings]
FreeArcFile1={src}\english.arc;DestDir:{app};Disk: 1;Lang:en

For french:

Quote:

[ExtractSettings]
FreeArcFile1={src}\french.arc;DestDir:{app};Disk:1 ;Lang:fr

and so on...

QfG	04-10-2012 06:19

Thanks very much, i'm a noob i see, that this is typed on Page 2 of this thread, forgive me.

seventhorama

11-10-2012 18:47

when i install battlefield 3, this installer give me an error. whats wrong? and is there any way to solve this? thanks

http://cdn-u.kaskus.co.id/87/b6yahkby.jpg

Demonn

11-10-2012 20:03

8.5.70
This method yener90 {src} means that automatically grabs those files from the folder where you installed the game.

yener90

11-10-2012 20:13

Quote:

Originally Posted by Demonn (Post 407909)

8.5.70
This method yener90 {src} means that automatically grabs those files from the folder where you installed the game.

no it from source -> dvd
{app} would be game path

Demonn

11-10-2012 20:48

Yener90 the msi still does not start even with this new method.

Fabioddq

11-10-2012 20:59

yener, please could explain this in more detail, sorry but I don't understand. :o

changed path definition of Launcher of redist files
-> now it possible install msi files + installing files from gamepath

Thanks!

yener90

11-10-2012 21:38

on old version you didnt need to define source path...it was always dvd.
now you can change it.
{src} is dvd
{app} game path

its also now possible to do silent msi installations.
in included files there is physx installation...a silent msi installation.
its hard to define.

Fabioddq

11-10-2012 23:50

Quote:

Originally Posted by yener90 (Post 407915)

Hmm... Ok, I think i get the idea. :D
Thanks!

Joe Forster/STA

12-10-2012 08:56

Quote:

Originally Posted by seventhorama (Post 407903)

when i install battlefield 3, this installer give me an error. whats wrong? and is there any way to solve this?

Copy & paste it as text into a post.

yener90

13-10-2012 10:08

ok next version will have:
- Windows 8 support
- components page support
-> so you will have the possibility to select what you want to have installed

so i next update will take a while...its an easy feature, but making working with Setup.ini will take lot of time.

Fabioddq

13-10-2012 13:00

Quote:

Originally Posted by yener90 (Post 408040)

Thanks for the future update. I was doing a conversion without using checkbox and ProgressBackground to use the operating system itself. Then I noticed that during the installation was not showing the total percentage of the installation.
I was using CI.8.5.7.0.

yener90

14-10-2012 14:44

will analyze the problem.

-> know the problem
if you using system progressbar -> text will be only written to progressbar...
not a real bug xD

next version preview(early state :p)
http://imageshack.us/a/img10/589/preview8580.jpg

if nothing is checked -> next button will be disabled.
i need to update also autorun -> so not all buttons get enabled

biggest problem will be uninstall....
-> if you want to have to install for example mass effect 2 although you installed mass effect 1, you need to uninstall and reinstall...

REV0	14-10-2012 14:53

Quote:

Originally Posted by yener90 (Post 408098)

YES ! Send me already so i can test it !

*Evil Laughs*

LOL

Fabioddq

14-10-2012 21:37

Quote:

Originally Posted by yener90 (Post 408098)

Very nice the new feature yener. I will update my collections! Thanks for this! I go to prepare a conversion with this new version for Doom 3 BFG Edition (My favorite game!) :D

EDIT...

Ok! :D

yener90

14-10-2012 21:50

Thx for your help...but its not required :p
im using translation of inno itself :D

Fabioddq

14-10-2012 21:53

Quote:

Originally Posted by yener90 (Post 408107)

Thx for your help...but its not required :p
im using translation of inno itself :D

Ok, :D Is it possible to install up to three games?

yener90

14-10-2012 22:13

Quote:

Originally Posted by Fabioddq (Post 408109)

Ok, :D Is it possible to install up to three games?

components are 8
-> autorun + setup only supports three shortcuts.

yener90

15-10-2012 00:50

UPDATE 8.5.7.2
- added Components feature
-> decription in tutorial section
- updated autorun
- added future systems support on System Requirement page
-> windows 8 should be supported now

Fabioddq

15-10-2012 08:11

Quote:

Originally Posted by yener90 (Post 408115)

UPDATE 8.5.7.2
- added Components feature
-> decription in tutorial section
- updated autorun
- added future systems support on System Requirement page
-> windows 8 should be supported now

Thanks for the update yener! I have a little doubt:

In my collection of Trine, i have one Data.cab with the two games inside. I have two make to Data.cab's for each separate game?

For example:

Trine: Data1.cab
Trine 2: Data2.cab

and [ExtractSettings]:

FreeArcFile1={src}\Data1.cab;DestDir:{app};Disk:1; Comp:1;
FreeArcFile2={src}\Data2.cab;DestDir:{app};Disk:1; Comp:2;

Thanks in advanced! :D

EDIT...

yes, i do it this and works great! I compress each game in its own folder so as not to mix the case files I installed the two together.
Awesome work yener! Thanks again! :D

Only thing:

If i install one game only, the installer creates the shortcut of the game is not installed yet. Look:

https://lh4.googleusercontent.com/-0.../Shortcurt.jpg

But is not a problem, i just delete the useless shortcut. :D

REV0	15-10-2012 08:38

Quote:

Originally Posted by yener90 (Post 408115)

UPDATE 8.5.7.2
- added Components feature
-> decription in tutorial section
- updated autorun
- added future systems support on System Requirement page
-> windows 8 should be supported now

Thanks for update yener, two things:

1. Just a thought, maybe if we keep uninstall files of original installation, we can delete the specific component without deleting completely ?

2. is srep still functional ? I made a run but got unidentified compression method error in the very beginning of setup

yener90

15-10-2012 16:03

Quote:

Originally Posted by Fabioddq (Post 408131)

Only thing:

If i install one game only, the installer creates the shortcut of the game is not installed yet. Look:

But is not a problem, i just delete the useless shortcut. :D

i realized it^^
will bring out hotfix for this.

yener90

16-10-2012 00:41

UPDATE 8.5.7.3
- fixed shortcut for components

Fabioddq

16-10-2012 07:48

Quote:

Originally Posted by yener90 (Post 408157)

UPDATE 8.5.7.3
- fixed shortcut for components

Thanks for fix yener! Works great! :D

BAMsE

16-10-2012 09:50

3 Attachment(s)

Hi yener90, long time making no sign, but now I have an idea. What about active zones for buttons. Now it's determined by image resolution, but what when I need smaller one? Look at the splash bottom

Attachment 4491
Attachment 4492
Attachment 4493

Have nice day

yener90

16-10-2012 09:59

if you come...then with great ideas :p
im thing how to make this possible....
maybe extra position selection for this??

BAMsE

16-10-2012 10:22

Well... idea is mine, realization is yours :p

The most comfortable solution is detecting button text dimensions and automatically creating active zone, but it's quite complicated. The easiest solution is adding new variables describing vertical and horizontal amplification from the center of button text (what is already implemented)

yener90

16-10-2012 19:13

Quote:

Originally Posted by BAMsE (Post 408182)

comfortable yes...but im using limited inno code :p

johnnyusa

17-10-2012 00:49

yener, i have a few questions if i may.

Let's say i want all Components unchecked by default when starting the Installer.

I've modified the code to look like this:

Code:

    ComponentsPage.ID:

    begin

      SelectComponentsLabel.Show

      ComponentsDiskSpaceLabel.Show;

      Components1.Checked := False;

      Components2.Checked := False;

      Components3.Checked := False;

      Components4.Checked := False;

      if not FileExists(ExpandConstant('{tmp}\Checkbox.png')) then begin

      Components1.Visible := Components1V;

      Components2.Visible := Components2V;

      Components3.Visible := Components3V;

      Components4.Visible := Components4V;

      Components5.Visible := Components5V;

      Components6.Visible := Components6V;

      Components7.Visible := Components7V;

      Components8.Visible := Components8V;

      end;

      BtnSetVisibility(Components1Check,Components1V);

      BtnSetVisibility(Components2Check,Components2V);

      BtnSetVisibility(Components3Check,Components3V);

      BtnSetVisibility(Components4Check,Components4V);

      BtnSetVisibility(Components5Check,Components5V);

      BtnSetVisibility(Components6Check,Components6V);

      BtnSetVisibility(Components7Check,Components7V);

      BtnSetVisibility(Components8Check,Components8V);

      Components1Label.Visible := Components1V;

      Components2Label.Visible := Components2V;

      Components3Label.Visible := Components3V;

      Components4Label.Visible := Components4V;

      Components5Label.Visible := Components5V;

      Components6Label.Visible := Components6V;

      Components7Label.Visible := Components7V;

      Components8Label.Visible := Components8V;

    end;

Maybe you have another solution?

Also, i want to add some conditional checks. For example. If i check Component2, Component3 should uncheck automatically and if i check Component3, Component2 should uncheck automatically.

I've modified the following code:

Code:

procedure UpdateComponentsPage;

var TempInt: Integer; TempStr:String;

begin

TempInt := 0;

if Components1.Checked then

TempInt := TempInt + GetIniInt('ComponentsSettings', 'Component1Size', 0,0,0, ExpandConstant('{tmp}\Setup.ini'));

//if Components2.Checked then

//TempInt := TempInt + GetIniInt('ComponentsSettings', 'Component2Size', 0,0,0, ExpandConstant('{tmp}\Setup.ini'));

//if Components3.Checked then

//TempInt := TempInt + GetIniInt('ComponentsSettings', 'Component3Size', 0,0,0, ExpandConstant('{tmp}\Setup.ini'));



//*************** Teste **************///



if Components2.Checked then

                       begin

                        Components3.Checked:=False;

                        BtnSetChecked(Components3Check,False);

                        TempInt := TempInt + GetIniInt('ComponentsSettings', 'Component2Size', 0,0,0, ExpandConstant('{tmp}\Setup.ini'));

                       end;                    

if Components3.Checked then

                       begin

                        Components2.Checked:=False;

                        BtnSetChecked(Components2Check,False);

                        TempInt := TempInt + GetIniInt('ComponentsSettings', 'Component3Size', 0,0,0, ExpandConstant('{tmp}\Setup.ini'));

                       end;



//*************** Teste **************///

............... ................

But doesnt work like i want it to work.

Any hints? Thanks in advance.

yener90

17-10-2012 01:05

default state false:

Code:

Components1:= TCheckBox.Create(WizardForm);

with Components1 do

begin

Parent:= WizardForm;

Left:= NewLeftPositionCP; 

Top:= TextPositionTop + 130 + MoveDirectoryInfo;

Width:= 13;

Height:= 13;

TabOrder:= 0;

Checked:= Components1V; -> change to false

Visible:= Components1V;

OnClick:= @ComponentsClick;

...

BtnSetChecked(Components1Check,True); -> Change To false

end;

inverting buttons(make sure you defined correctly in previous step):

Code:

procedure Components2CheckClick(hBtn:HWND);

begin

if Components2.Checked = False then

Components2.Checked:= True else

Components2.Checked:= False;

BtnSetChecked(Components2Check,Components2.Checked)

Components3.Checked:= not Components2.Checked; 

BtnSetChecked(Components3Check,not Components2.Checked)

end;



procedure Components3CheckClick(hBtn:HWND);

begin

if Components3.Checked = False then

Components3.Checked:= True else

Components3.Checked:= False;

BtnSetChecked(Components3Check,Components3.Checked)

Components2.Checked:= not Components3.Checked; 

BtnSetChecked(Components2Check,not Components3.Checked)

end;



same changes for Components2LabelOnClick and Components3LabelOnClick

johnnyusa

17-10-2012 01:06

Thanks alot man. I'll try right away <3

EDIT: Works very well. Thanks again!

yener90

17-10-2012 02:53

UPDATE 8.5.7.4
- advanced buttons -> now you can define touch position
-> NOT NECESSARY
for better description look here:
http://imageshack.us/a/img202/9290/setposition.jpg

Th3Raven

17-10-2012 03:45

THX Yener90 SIR .:D
I will try this new update as soon as i finish my Doom 3 BFG Edition C.I. :p

Fabioddq

17-10-2012 05:49

Quote:

Originally Posted by yener90 (Post 408218)

UPDATE 8.5.7.4
- advanced buttons -> now you can define touch position
-> NOT NECESSARY
for better description look here:
http://imageshack.us/a/img202/9290/setposition.jpg

Thanks for the update yener. I will test these new features soon. Will drop like a bomb in my conversion of Doom 3 BFG. :p:D

johnnyusa

18-10-2012 11:34

Hello again yener, i hope you can help me again with one problem :)

i've used your latest CI v8.5.7.4 to build an installation using:

Code:

#define ProgramFiles

#define Internal

The files have around 6gb, the problem is, after successful compiling. When i run setup.exe, it takes a few minutes for the setup window to open. If i look in TaskManager, setup.exe is shown as "Not responding", but if after a few minutes, the setup window appears and i can install the files.

I've tried another method using:

Code:

#define ProgramFiles

;#define Internal

And this time, when i run setup.exe, the installer window is shown like it should. Almost instantly.

In my 3rd try to find the problem, i've tried the 1st method:

Code:

#define ProgramFiles

#define Internal

,but with some minimal files to install. around 20mb.

This time when i ran setup.exe, all is fine, the installer window is shown very fast .. etc.

To sum this up, when i've used #define Internal, for large amount of files, around 6gb, the setup had problems with very slow loads. But when i've used #define Internal with small amount of files, around 20mb, the setup had no problems. Also, if i dont use #define Internal, i have no problems even with 6gb+ files.

What is the problem? I really want to make the setup work with #define Internal for larger files.

Thanks in advance, as always ;)

kassane

20-10-2012 07:20

Incredible yener90, just got a little time off, and you made good progress ... CI 8.5.7.4 tested and approved!!!

thx :D

johnnyusa

20-10-2012 11:38

Back again with some questions yener, i suppose you didnt reply to my previous problem because you don't know the answer or my description was too vague.

Anyway, what im trying to do now, is to implement one password page in your awesome script. But it seems my scripting skills are sucky at the moment, but i have an excuse, im beginner.

Anyway, let's proceed with my problems:

The below code is in [SETUP]

Quote:

; Password setup
Encryption=false
Password=123456

#define EncryptPass
#define i Len(SetupSetting("Password"))
#for {i; i > 0; i--} EncryptPass = EncryptPass + Copy(SetupSetting("Password"), i, 1)

The below code is in [CODE]

Quote:

Function DecryptPass(Password: String): String;
var n: Integer;
Begin
for n:= Length(Password) Downto 1 do Result:= Result + Copy(Password, n, 1)
End;

Function CheckPassword(Password: String): Boolean;
Begin
Result:= (GetMD5OfString(Password) = DecryptPass('{#EncryptPass}'))
if not Result then exit;
PasswordText.Caption:= WizardForm.PasswordEdit.Text
WizardForm.PasswordEdit.Text:= DecryptPass('{#EncryptPass}')
PasswordText.Show
End;

Procedure PasswordEditOnKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
Begin
WizardForm.Nextbutton.Enabled:= CheckPassword(WizardForm.PasswordEdit.Text)
End;

This is the password page:

Quote:

////////////////////// PasswordPage //////////////////////

PasswordEditLabel := TLabel.Create(WizardForm);
with PasswordEditLabel do begin
AutoSize:=False;
Top:= TextPositionTop + 97 + MoveDirectoryInfo;
if Wizardform.RightToLeft then
Left := InstallerWidth - TextPositionWidth - TextPositionLeft + TextSpaceFromBorder + 7
else
Left:= TextPositionLeft + TextSpaceFromBorder + 7 ;
Width:= TextPositionWidth - 2* TextSpaceFromBorder - 14;
//SetBounds(ScaleX(127), ScaleY(308), ScaleX(446),16);
WordWrap:= True;
ShowAccelChar := False;
Transparent:=True;
Font.Name:= SetupFont;
Font.Size:= 10 + SetupFontSize;
Font.Color:=SetupFontColor;
//Font.Style:=[fsBold];
//Caption := MinimizePathName(WizardForm.PasswordEditLabel.Text , PasswordEditLabel.Font, PasswordEditLabel.Width);
//Caption:= WizardForm.PasswordEdit.Text;
Parent := WizardForm;
OnMouseMove:=@MainAreaMouseMove;
OnMouseDown:=@MainAreaMouseDown;
end;

PasswordText:=TPanel.Create(WizardForm)
with PasswordText do begin
WizardForm.PasswordEdit.OnKeyUp:= @PasswordEditOnKeyUp
PasswordText.SetBounds(WizardForm.PasswordEdit.Lef t, WizardForm.PasswordEdit.Top, WizardForm.PasswordEdit.Width, WizardForm.PasswordEdit.Height)
PasswordText.Font.Style:= [fsBold]
PasswordText.Alignment:=taLeftJustify
PasswordText.BevelOuter:= bvNone
PasswordText.BorderStyle:= bsSingle
PasswordText.Parent:= WizardForm.PasswordPage
PasswordText.Hide
end;

with Wizardform.PasswordEdit do begin
if Wizardform.RightToLeft then
Left := InstallerWidth - TextPositionWidth - TextPositionLeft + TextSpaceFromBorder
else
Left:= TextPositionLeft + TextSpaceFromBorder;
Top:= TextPositionTop + 95 + MoveDirectoryInfo;
Width:= TextPositionWidth - 2* TextSpaceFromBorder ;
Parent:=Wizardform
end;

////////////////////// PasswordPage //////////////////////

Quote:

wpPassword:
begin
Wizardform.PasswordEdit.Show
PasswordEditLabel.Show
end;

if CurPageID = wpPassword then if PasswordText.Caption = '' then
begin
WizardForm.Nextbutton.Enabled:= CheckPassword(WizardForm.PasswordEdit.Text);
if FileExists(ExpandConstant('{tmp}\Button.png')) then begin
NextBtnEnable(Wizardform.NextButton.Enabled)
end;
end;

Now, what i want to do is to enable the NEXT button when i enter the correct password. The problem is, even if i input the correct password, the NEXT button is Disabled. Any assistance please? Thanks in advance as always.

pakrat2k2

20-10-2012 11:45

you need to run Setup.cab Cryptor.exe to input the password into setup.cab file then ( I think it gives you the encrypted password that needs to be entered in setup.ini ) Hope its right as dont use that feature YET.

johnnyusa

20-10-2012 11:47

No man, im not talking about password protecting the cab file, im talking about password protection inside the setup.

yener90

20-10-2012 12:43

why password protected setup? o.o

All times are GMT -7. The time now is 13:14.

Page 23 of 37

« First

Last »

Show 40 post(s) from this thread on one page