pascalscript

问题 I am trying to create a MsgBox with three buttons and three outcomes, but am unable to see how I can create the third outcome? I currently have the following code for a two button MsgBox , which works perfectly: if ((strExistingInstallPath <> '') and (strExistingVersion = '2.5.3')) then begin if SuppressibleMsgBox('Setup has detected that ' + strMyAppName + ' ' + strExistingVersion + '.' + strExistingBuild + ' is installed.' + #13#10 + #13#10 + 'The existing version must be removed before

问题 I would like to create installer for mod of the game. And I need to detect where is installed the game. I know where is path of the game in registry. But the game can be in another launchers - Steam, GOG. How to detect in order? For example: If I have steam version need to detect path of installation from registry for steam If I have GOG version need to detect path of installation from registry for GOG If I have both versions (Steam and GOG) then default path of installation will be for steam

问题 SCENARIO I have created an installer that will installs a Malware application for educative purposes, the installer contains these two tasks: [Tasks] Name: hidden; Description: Hidden mode; GroupDescription: Installation Mode Name: visible; Description: Visible mode; GroupDescription: Installation Mode This means, performs a hidden installation for the user (hidden dirs and files and make uninstallabe the installer), or a visible installation (normal dirs and files and Uninstallable=True).

问题 I want to create an installer with Inno Setup, my first time using this tool. What I’m trying to do is wrapping an existing installer of an existing software with a more detailed self-made installer (meaning a Setup.exe inside a Setup.exe). What works for me after researching so far is asking the installer (Inno Setup *.exe) to run the included installer (actual software setup). Why do I need another installer wrapped around? Because I want to give it some extra functions. On particular thing

问题 I have a bunch of checkboxes on a page, and all of those are conditionally visible, and the Top position is defined relative to the previous checkbox, e.g. CheckBox4.Top := CheckBox3.Top + CheckBox3.Height + 5; When at least one of the components is set to be invisible, the result looks like this: What I'd like the checkboxes to do, is to shift upwards, if the previous one is set to invisible. Prog3 should be right underneath Prog1 , or, if both Prog2 and Prog3 are hidden, Prog4 should be

问题 I am using this code from the answer by Martin Prikryl to Custom Uninstall page (not MsgBox). How to modify the first page of this code to show a "Welcome"-like page on the OuterNotebook page (i.e. without the MainPanel header)? 回答1: You create the page as any other, except that its parent will be the UninstallProgressForm.OuterNotebook , not the .InnerNotebook . Tricky part is not how to create the page, but how to implement the Next / Back buttons. The Next button on the "welcome" page must

问题 I need to search for an IP address with Listening Port to look up for others PC on LAN (try to discovery MySQL server) and get the results IP who has that port listening. Something similar to this code to test sockets but working in Inno Setup: program pfinger; uses sockets,errors; Var Addr : TInetSockAddr; S : Longint; Sin,Sout : Text; Line : string; begin Addr.sin_family:=AF_INET; { port 79 in network order } Addr.sin_port:=79 shl 8; { localhost : 127.0.0.1 in network order } Addr.sin_addr

问题 On the WizardForm.InstallingPage , the WizardForm.FilenameLabel automatically truncates the string containing the file path, to include the drive letter at the beginning, followed by the maximum displayable path, truncating from the top level of the path, to fit the size of the label, so that the file name is always shown e.g. C:\...\LongFilePathNameWithMultipleSubDirectories\Filename.ext . I have looked at the Length , Pos , Copy and ExtractFileDrive String Functions, but given that there

问题 I have a setup script that allows the user to specify where they would like to install my application. It is in the form of a Pascal script within the [Code] block. var SelectUsersPage: TInputOptionWizardPage; IsUpgrade : Boolean; UpgradePage: TOutputMsgWizardPage; procedure InitializeWizard(); var AlreadyInstalledPath: String; begin { Determine if it is an upgrade... } { Read from registry to know if this is a fresh install or an upgrade } if RegQueryStringValue(HKLM, 'Software\Microsoft

问题 I'm making a validation in my Inno Setup installer to check whether or not a Microsoft update is installed on the machine, if not, I'm showing a simple message box telling the user that the update is required, this is the message code: MsgBox( 'Your system requires an update supplied by Microsoft. ' + 'Please follow this link to install it: ' + 'http://www.microsoft.com/downloads/details.aspx?FamilyID=1B0BFB35-C252-43CC-8A2A-6A64D6AC4670&displaylang=en', mbInformation, MB_OK); I want to make