FileForums

FileForums (https://fileforums.com/index.php)
-   Conversion Tutorials (https://fileforums.com/forumdisplay.php?f=55)
-   -   INNO TROUBLESHOOT - Questions Here (https://fileforums.com/showthread.php?t=93193)

y_thelastknight 30-12-2013 08:08

no bro i need like this, but it not working.

procedure AboutButtonOnClick(Sender: TObject);
begin

If CurPageID=wpWelcome then
begin
MsgBox('Hello.', mbInformation, MB_OK);
end;

If CurPageID=wpSelectDir then
begin
MsgBox('Hello.', mbInformation, MB_OK);
end;

end;

altef_4 30-12-2013 09:56

Quote:

Originally Posted by y_thelastknight (Post 427851)
no bro i need like this, but it not working.

procedure AboutButtonOnClick(Sender: TObject);
begin

If CurPageID=wpWelcome then
begin
MsgBox('Hello.', mbInformation, MB_OK);
end;

If CurPageID=wpSelectDir then
begin
MsgBox('Hello.', mbInformation, MB_OK);
end;

end;

Code:

[code]
var
 
PageID: integer;

procedure CurPageChanged(CurPageID: integer);
begin
 
PageID:=CurPageID;
end;

procedure AboutButtonOnClick(Sender: TObject);
begin
case
PageID of
 
wpWelcome: MsgBox('wpWelcome', mbInformation, MB_OK);
  wpLicense: MsgBox('wpLicense', mbInformation, MB_OK);
  wpPassword: MsgBox('wpPassword', mbInformation, MB_OK);
  wpInfoBefore: MsgBox('wpInfoBefore', mbInformation, MB_OK);
  wpUserInfo: MsgBox('wpUserInfo', mbInformation, MB_OK);
  wpSelectDir: MsgBox('wpSelectDir', mbInformation, MB_OK);
  wpSelectComponents: MsgBox('wpSelectComponents', mbInformation, MB_OK);
  wpSelectProgramGroup: MsgBox('wpSelectProgramGroup', mbInformation, MB_OK);
  wpSelectTasks: MsgBox('wpSelectTasks', mbInformation, MB_OK);
  wpReady: MsgBox('wpReady', mbInformation, MB_OK);
  wpPreparing: MsgBox('wpPreparing', mbInformation, MB_OK);
  wpInstalling: MsgBox('wpInstalling', mbInformation, MB_OK);
  wpInfoAfter: MsgBox('wpInfoAfter', mbInformation, MB_OK);
  wpFinished: MsgBox('wpFinished', mbInformation, MB_OK);
end;
end;


y_thelastknight 30-12-2013 12:34

thanks works fine.

reiji777 02-01-2014 13:30

Quote:

Originally Posted by y_thelastknight (Post 426855)
hi fellow Member

Check my Attached exe and tell me how is it?

http://img404.imageshack.us/img404/9127/7f48.jpg

how to make like this m8?

y_thelastknight 03-01-2014 04:56

1 Attachment(s)
Quote:

Originally Posted by reiji777 (Post 427927)
how to make like this m8?

script.
http://img404.imageshack.us/img404/9127/7f48.jpg

Vatsal Singh 03-01-2014 05:12

How to add splash in yener90's script (CIU 1.0.0.6).Thank in advance

y_thelastknight 03-01-2014 06:39

Quote:

Originally Posted by Vatsal Singh (Post 427937)
How to add splash in yener90's script (CIU 1.0.0.6).Thank in advance

put the splash.png file in setup.cab file..it works.

Logrim 03-01-2014 07:16

Three little question,, help me please :D..

1. When unninstall, how to delete the main folder of the installer? the folder is empty but still in program files.. i try with deltree in CurUninstallStepChanged, and with [UninstallDelete] and nothing works.

2. Same problem that the fist, but when cancel the installation. This is worst.. because when cancel, the main folder AND subdirectories still there.

3. The shit png in unninstall doest show.. i think i put in the incorrect line, but i'm a little lost..

My unninstall code is this:

Quote:

procedure InitializeUninstallProgressForm;
var
img:Longint;
UnsStatusLabel, UnsGameNameLabel: Tlabel;

begin
FileCopy(ExpandConstant('{app}\Background.png'), ExpandConstant('{tmp}\Background.png'), True);
FileCopy(ExpandConstant('{app}\isskinU.dll'), ExpandConstant('{tmp}\isskinU.dll'), True);
FileCopy(ExpandConstant('{app}\{#Skin}'), ExpandConstant('{tmp}\{#Skin}'), True);
FileCopy(ExpandConstant('{app}\botva2.dll'), ExpandConstant('{tmp}\botva2.dll'), True);
FileCopy(ExpandConstant('{app}\CallbackCtrl'), ExpandConstant('{tmp}\CallbackCtrl'), True);
FileCopy(ExpandConstant('{app}\UninstData.ini'),Ex pandConstant('{tmp}\Setup.ini'),False);
LoadSkinUninst(ExpandConstant('{tmp}\{#Skin}'), '');

with UninstallProgressForm do begin
BorderStyle := bsNone;
AutoScroll := False;
ClientWidth := ScaleX(650);
ClientHeight := ScaleY(400);
Position:= poScreenCenter;
UninstallProgressForm.InnerNotebook.SetBounds(0,0, 650,400);
UninstallProgressForm.OuterNotebook.SetBounds(0,0, 650,400);

Bevel.Hide;
StatusLabel.Hide;
MainPanel.Hide;
WizardSmallBitmapImage.Hide;
CancelButton.Visible:=True;

ProgressBar.SetBounds(ScaleX(185), ScaleY(374), ScaleX(455), ScaleY(15));

UnsStatusLabel:= TLabel.Create(UninstallProgressForm.InstallingPage );
UnsStatusLabel.SetBounds(ScaleX(15), ScaleY(374), ScaleX(200), ScaleY(30));;
UnsStatusLabel.AutoSize:= False;
UnsStatusLabel.WordWrap:= True;
UnsStatusLabel.Transparent:= True;
UnsStatusLabel.Font.Color:= clSilver;
UnsStatusLabel.Font.Size:= 8
UnsStatusLabel.Font.Name := 'Verdana'
UnsStatusLabel.Caption:= 'Estado de la desinstalación:';
UnsStatusLabel.Parent:= UninstallProgressForm.InstallingPage;

UnsGameNameLabel:= TLabel.Create(UninstallProgressForm.InstallingPage );
UnsGameNameLabel.SetBounds(ScaleX(15), ScaleY(6), ScaleX(500), ScaleY(15));
UnsGameNameLabel.AutoSize:= False;
UnsGameNameLabel.WordWrap:= True;
UnsGameNameLabel.Transparent:= True;
UnsGameNameLabel.Font.Color:= clSilver;
UnsGameNameLabel.Font.Size:= 9
UnsGameNameLabel.Font.Name := 'Verdana'
UnsGameNameLabel.Caption:= 'Desinstalando archivos, por favor espere...';
UnsGameNameLabel.Parent:= UninstallProgressForm.InstallingPage;
end;
end;

procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
if CurUninstallStep = usUninstall then
begin
DelTree('{app}', True, True, True);
RegDeleteKeyIncludingSubkeys(HKLM, ExpandConstant('Software\{code:GamePublisher}\{cod e:GameName}'));
img:=ImgLoad(UninstallProgressForm.Handle,ExpandCo nstant('{tmp}\Background.png'),10,27,630,335,True, True);
ImgApplyChanges(UninstallProgressForm.Handle);
end;
end;

Logrim 03-01-2014 10:32

Anyone knows which is the name of this window in innosetup, and if its posible modify it?

http://i41.tinypic.com/qsmro8.png

y_thelastknight 03-01-2014 17:51

Quote:

Originally Posted by Logrim (Post 427946)
Anyone knows which is the name of this window in innosetup, and if its posible modify it?

http://i41.tinypic.com/qsmro8.png

There is No name for this window i think :p
Yup you can create a form for it and call it..you can edit the form however you want it.

reiji777 03-01-2014 18:21

1 Attachment(s)
Quote:

Originally Posted by y_thelastknight (Post 427936)

the drive letter on the left and the bar won't show up m8. please help

Logrim 04-01-2014 03:16

y_TheLastKnight please.. can you tell me with and example? thought i have resolved, but this morning i'm little silly :D.. all that i want is remove the border.. "bsNone".. and change the buttons with botva2, same that change in wizarform.

Darkangel5 06-01-2014 05:24

sorry to use google translation to translate

I need your service.
I am trying to make an autorun and I would like to know:

how to use the roundedcorner

how to scroll a text to a point defined

thank you

sentinelks 06-01-2014 05:46

Quote:

Originally Posted by reiji777 (Post 427966)
the drive letter on the left and the bar won't show up m8. Please help


use inno ansi

y_thelastknight 06-01-2014 07:09

Quote:

Originally Posted by Logrim (Post 427972)
y_TheLastKnight please.. can you tell me with and example? thought i have resolved, but this morning i'm little silly :D.. all that i want is remove the border.. "bsNone".. and change the buttons with botva2, same that change in wizarform.

ask razor about this.. i just know that..thats all :p


All times are GMT -7. The time now is 04:42.

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