How to pass parameter from inno setup

Question

0.00/5 (No votes)

See more:

HI,

i want to pass parameter from run section.That parameter is result of function written in code section.

[Code]
var Dbserver := function RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SYSTEM\CurrentControlSet\services\MA Service','DBServer', DBServer);

[run]
Filename: "{app}\Installdb.bat"; Parameters: {code:RegQueryStringValue};

Please the correct the above code.

Posted 21-Jan-16 2:48am

Mangesh9692

Updated 21-Jan-16 2:56am

v3

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Jochen Arndt · Answer 1 · 2016-01-21T03:18:00

Solution 1

The [run] section looks good (besides using the same name as an InnoSetup function) but not your code. It should look like:

Delphi

[Code]
function GetDbServer(Default: String): String;
var 
    DBServer: String;
begin
    result := '';
    if RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SYSTEM\CurrentControlSet\services\MA Service','DBServer', DBServer) then
    begin
        result := DBServer;
    end;
end;

The corresponding [run] section:

[Run]
Filename: "{app}\Installdb.bat"; Parameters: {code:GetDbServer};

But it may be neccessary to add a Check condition to the Filename command to avoid executing it when the registry key is not found.

Posted 21-Jan-16 3:18am

Jochen Arndt

Updated 21-Jan-16 21:00pm

v2

Comments

Mangesh9692 21-Jan-16 23:50pm

Thanks for u r response but its shown error colon(:) expected at var DBServer;

Jochen Arndt 22-Jan-16 3:01am

Oops. It misses the type. See udated solution.

Mangesh9692 22-Jan-16 4:05am

Thanks it working

for %%G in (%*) do (
set /a count+=1
call :exec1 %%~G
)

:exec1
set mapArray[%count%]=%*
After this for loop should continue

Here how to contine for lopp....sorry i dont have idea about batch scripting..

Jochen Arndt 22-Jan-16 4:19am

Sorry, I haven't used batch scripts since many years and therefore don't know much about it today. I suggest to raise a new question for that because it is not related to the setup script and you will probably get helpful replies from others.

When doing so, describe the parameters and what you want to achieve (e.g. with an example).