INNO TROUBLESHOOT - Questions Here

[altef_4]

Originally Posted by Logrim

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..

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

[Logrim]

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

///////////////////////////////////////////////////////////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

///////////////////////////////////////////////////////////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;
////////////////////////////////////////////////////////////////////////////////////////////////

[altef_4]

Originally Posted by Logrim

i understand you altef 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

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

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.

[Logrim]

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

[Logrim]

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

[altef_4]

Originally Posted by Logrim

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.

Originally Posted by Logrim

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.

[Logrim]

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

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?

[altef_4]

Originally Posted by Logrim

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?

Originally Posted by Logrim

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;

[Logrim]

Altef, see m.p please.. i'm lost with that ..

[reiji777]

why inno sometimes shows need to restart page in the end of installation? although I've already put all the right parameters
is there any way to suppress no restart page at all cost?

[justinbieber500]

hmm reiji Page finally pressing need.

[dienszge]

Hallo everyone..
sorry i'm newbie. and i come from indonesia
i want to try conversion..
can you give me script (InstallerScript.iss and LangScript.iss) language indonesian
please.. thx bahasa
sorry my bad english..

[Cesar82]

PS: Text translated with Google Translate.
Please. I need help.

In need of a code that satisfied the following properties of an executable:
Copyright, Company Name, File Description, File Version, Product Version, InternalName, Original Filename, Product Name.
I found a code on the internet and is not working with Unicode Inno Setup. Tested Inno Setup Version Ansi worked.
In unicode inno he cuts the information.

I have attached the script's code for those with more experience can analyze and give me some corrections.

Added one second scrip to compare the differences.
This second script detects only the description of the executable.
However this works in unicode version of Inno Setup.

[Logrim]

One question.. how to put in a custom message, the name of a game set in an ini?, i mean,

"welcome to the installation of "name stored in external ini"

[Razor12911]

[Code]

RazorLabel.Caption:=FmtMessage(ExpandConstant({cm:WelcomeMessage}), [GetIniString('Application', 'Name', '', ExpandConstant('{tmp}\Setup.ini')]);

[CustomMessages]
WelcomeMessage=Welcome to the %1 Setup Wizard