FileForums - INNO TROUBLESHOOT

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)

Quote:

Originally Posted by Logrim (Post 429719)

Thanks,, it works,, but i think i dont know how to make the mask well.. can toy explain in little words altef? i'm not new to photoshop, but making mask yup :D..

just open your image.png in paint and press "save as", then choose bmp and set it to monochrome.

Quote:

Originally Posted by danswano (Post 429720)

First try to make the archive a little bit big so you can see the actual process.
create 2 folders that contains multiple big files
for example program1 program2 and program3 folders.
Now let's say we want to extract program 2.
You will notice that the installer displaying program1 folder and it's content and program 2 and 3 but it only extract program2 actually.
Extracting the whole archive takes as much as time to extract one folder.
It's like unpacking the whole archive on the fly but not letting the unwanted files to be copied to the destination folder.
Hope i clarified what i meant. :)

then maybe this some bug in ISDone.dll, i tested on small archive ~100 mb, and saw what all files in archive are processed but extracts only choose folder.

Quote:

Originally Posted by Logrim (Post 429719)

Thanks,, it works,, but i think i dont know how to make the mask well.. can you explain me in little words altef? i'm not new to photoshop, but making mask yup :D..

Edit 1. i start the script by zero, and put your example in the fist place with my background and mask.. it work... but with the same edges bug.. its my mask, i know :d.. i dont know how to make it well.. When i make mask before for other works, i only set the visible space in black and the rest in white... here dont work that :D.

function CreateFormFromImage change size of form to full size of image, maybe problem in this. Try to change sizes of both forms to full size of png image

Quote:

Originally Posted by Logrim (Post 429719)

Use GIMP to enhance edges. Grow BMP black part by 1 pixel then you're good to go.

Quote:

Originally Posted by altef_4 (Post 429725)

function CreateFormFromImage change size of form to full size of image, maybe problem in this. Try to change sizes of both forms to full size of png image

I see all files processed by ISDone as well and i know that it extracts only what i specified but it takes a long time to extract one folder of a big archive like if it's extracting all the files.

Thanks, razor and altef, work perfectly now,, the problem was the sizes.

Was extrange,, i'm graphic designer and this never happend to me in my work. :P.. I thought the mask in inno were being made differently. I'm trying to make a general installer for all my conversions, and i think I have already achieved. Minimalist and yet easy to locate.

i have a problem... before i setting the example of the mask of Altef, all work perfectly when unninstall.. Now, inno give me an error "cannot call "EXTRACTEMPORALYFILESIZE", funtion during uninstall. I never touch nothing in the unninstall section,, only add the mask functions and procedures..

Quote:

Originally Posted by Logrim (Post 429802)

this function works only in install process, it extracts file from setup.exe to memory, in uninstall process this file isn't present and thats why this error appears, to fix this you must copy all nessesary files (images libraries and other) from temporary folder (first extract it to this folder) to your installation folder in final stage of installation, then in a uninstall process, copy this files back into temp folder and use them from it, also in uninstaller you must use standart botva2.dll functions (load images from disk), i hope you understand me ;)

i understand you altef :D thwe problem is i think i have all in unninstall correctly, but dont work.. this is my uninnstall:

Quote:

///////////////////////////////////////////////////////////UNNINSTALL STAGE
procedure InitializeUninstallProgressForm;
var
UnsFileStatusLabel: Tlabel;
begin
FileCopy(ExpandConstant('{app}\UninstData.ini'),Ex pandConstant('{tmp}\Setup.ini'),False);
FileCopy(ExpandConstant('{app}\b2p.dll'), ExpandConstant('{tmp}\b2p.dll'), True);
FileCopy(ExpandConstant('{app}\botva2.dll'), ExpandConstant('{tmp}\botva2.dll'), True);
FileCopy(ExpandConstant('{app}\CallbackCtrl'), ExpandConstant('{tmp}\CallbackCtrl'), True);
FileCopy(ExpandConstant('{app}\Uninstall.png'), ExpandConstant('{tmp}\Uninstall.png'), True);

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

Bevel.Hide;
StatusLabel.Hide;
MainPanel.Hide;
WizardSmallBitmapImage.Hide;

ProgressBar.SetBounds(10,170,580,15);

UnsFileStatusLabel:= TLabel.Create(UninstallProgressForm.InstallingPage );
UnsFileStatusLabel.Parent:= UninstallProgressForm.InstallingPage;
UnsFileStatusLabel.SetBounds(40,10,500,15);
UnsFileStatusLabel.AutoSize:= False;
UnsFileStatusLabel.WordWrap:= True;
UnsFileStatusLabel.Transparent:= True;
UnsFileStatusLabel.Font.Name := 'Verdana';
UnsFileStatusLabel.Font.Style:= [fsBold];
UnsFileStatusLabel.Font.Size:= 8;
UnsFileStatusLabel.Font.Color:= clGray;
UnsFileStatusLabel.Caption:= ExpandConstant('{cm:UnsFileStatusLabel}');
end;
end;

procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
if CurUninstallStep = usUninstall then
begin
img:=ImgLoad(UninstallProgressForm.InstallingPage. Handle,ExpandConstant('{tmp}\Uninstall.png'),0,0,6 00,190,True,True);
ImgApplyChanges(UninstallProgressForm.InstallingPa ge.Handle);
DelTree(ExpandConstant('{app}'), True, True, True);
RegDeleteKeyIncludingSubkeys(HKLM, ExpandConstant('Software\{code:GamePublisher}\{cod e:GameName}'));
end;
end;

add this is the setup part

Quote:

///////////////////////////////////////////////////////////UNINSTALL SOURCE FILES
Source: dllfiles\botva2.dll; DestDir: {app}; Attribs: hidden system; Flags: ignoreversion;
Source: dllfiles\CallbackCtrl.dll; DestDir: {app}; Attribs: hidden system; Flags: ignoreversion;

Source: Setup\Uninstall.png; DestDir: {app}; Attribs: hidden system; Flags: ignoreversion;
Source: Setup\Setup.ico; DestDir: {app}; Attribs: hidden system; Flags: ignoreversion;
////////////////////////////////////////////////////////////////////////////////////////////////

Quote:

Originally Posted by Logrim (Post 429806)

i understand you altef :D thwe problem is i think i have all in unninstall correctly, but dont work.. this is my uninnstall:

add this is the setup part

add this functions

Code:

function ImgLoadU(Wnd :HWND; FileName :PAnsiChar; Left, Top, Width, Height :integer; Stretch, IsBkg :boolean) :Longint; external 'ImgLoad@{tmp}\botva2.dll stdcall delayload';



procedure ImgApplyChangesU(h:HWND); external 'ImgApplyChanges@{tmp}\botva2.dll stdcall delayload';



procedure gdipShutdownU; external 'gdipShutdown@{tmp}\botva2.dll stdcall delayload';

and remove b2p.dll(it's not work in uninstaller),
correct this

Code:

FileCopy(ExpandConstant('{app}\CallbackCtrl.dll'), ExpandConstant('{tmp}\CallbackCtrl.dll'), True);

chenge ImgLoad to ImgLoadU, ImgApplyChanges to ImgApplyChangesU
add to DeInitializeUninstall - gdipShutdownU;

try it, it's must work.

Thanks man, work perfectly now :D.. sorry for my questions, when i think the code is finish i discover something new...

One silly question.. why the image load before the rest of the things?. i mean.. the main background load.., the rest of the component load AFTER, and during two seconds the main screen is empty..

and.. how can i add a custom progress bar and a custom edit? i dont want to usee isskin.. thanks

Quote:

Originally Posted by Logrim (Post 429825)

One silly question.. why the image load before the rest of the things?. i mean.. the main background load.., the rest of the component load AFTER, and during two seconds the main screen is empty..

Maybe you use ImgApplyChanges more than one time? try to use it only in the end of procedure|function.

Quote:

Originally Posted by Logrim (Post 429825)

and.. how can i add a custom progress bar and a custom edit? i dont want to usee isskin.. thanks

to create custom progress bar just load two images one on another, and change width|visible part of top image. to create custom edit create img like edit and TLabel inside of this image.

altef i only have one ImgApplyChanges for wizardform,, only this at the start of "procedure InitializeWizard":

Quote:

ExtractTemporaryFile('Mask.bmp');
SetRgn(WizardForm.Handle,'Mask.bmp',657, 379);
img :=ImgLoad(WizardForm.Handle,ExpandConstant('{tmp}\ Background.png'),0,0,0,0,False,True);
ImgApplyChanges(WizardForm.Handle);
CreateFormFromImage(NewForm.Handle,ExpandConstant( '{tmp}\Background.png'));
OldMainProc:=SetWindowLong(WizardForm.Handle, -4, WrapFormCallback(@WizardFormProc,4));
NewForm.Show;
WizardForm.BringToFront;

and.. i dont understand well how to add progress bar and edit... for progress bar i add in setup part two png, and extract it in initialize setup. but how to apply them to the standard progress bar?

Quote:

Originally Posted by Logrim (Post 429830)

altef i only have one ImgApplyChanges for wizardform,, only this at the start of "procedure InitializeWizard":

maybe i don't understand you right, can you give more information?

Quote:

Originally Posted by Logrim (Post 429830)

and.. i dont understand well how to add progress bar and edit... for progress bar i add in setup part two png, and extract it in initialize setup. but how to apply them to the standard progress bar?

hide standart progress bar and calculate progress to width of your custom img.
e.g. standart progress=10% of maximum 100% then width of your img will be
progress:=CurProgress(10%)*100/MaxProgress(100%);
imgWidth=FullWidthOfImg(you set it when create img)*progress/100;