ExpandConstant('{#SetupSetting("AppName")}') in included files

[Abid Hussain]

Hi all,

I have two following files.

setup-base.iss

function GetAppDataDir(Param: String): String;

begin

  Result := ExpandConstant('{autoappdata}\{#SetupSetting("AppName")}');

end;

setup-client.iss

#include "..\setup-client.iss"

#define MyAppName "My App"

[Setup]

AppName={#MyAppName}

[Code]

var

  AppDataDir: String;

procedure InitializeWizard();

begin

  AppDataDir := GetAppDataDir('');

end;

As you see, setup-base.iss is included by setup-client.iss. When the installer is being executed, ExpandConstant('{autoappdata}\{#SetupSetting("AppName")}') evaluates to 'C:\ProgramData\'. 

When {#SetupSetting("AppName")}  is evaluated from inside setup-client.iss everything works fine.

Why does {#SetupSetting("AppName")} evaluates to an empty string?

Regards,

Abid

[Abid Hussain]

The problem remains but I made a mistake when I pasted the code in the message. The correct code:

setup-base.iss

function GetAppDataDir(Param: String): String;

begin

  Result := ExpandConstant('{autoappdata}\{#SetupSetting("AppName")}');

end;

setup-client.iss

#include "..\setup-base.iss"

#define MyAppName "My App"

[Setup]

AppName={#MyAppName}

[Code]

var

  AppDataDir: String;

procedure InitializeWizard();

begin

  AppDataDir := GetAppDataDir('');

end;

Still the question is, why does {#SetupSetting("AppName")} evaluate to an empty string?

[Martijn Laan]

Op 3-5-2021 om 13:23 schreef Abid Hussain:

Why does {#SetupSetting("AppName")} evaluates to an empty string?

As the help file says SetupSetting works on the current preprocessor output which is the preprocessor output up to the line which it is currently processing.

By the time the line with the {#SetupSetting("AppName")} is processed there's has been no Setup section yet, nor is MyAppName defined. So it the evaluation returns an empty string.

In other words, you're including the include file too early.

Greetings,
Martijn

[Luís César Zanetti]

If possible, move your include line to after preprocessing the AppName line in the setup section.

setup-client.iss

#define MyAppName "My App"

[Setup]

AppName={#MyAppName}

#include "..\setup-base.iss"

[Code]

var

  AppDataDir: String;

procedure InitializeWizard();

begin

  AppDataDir := GetAppDataDir('');

end;

--
You received this message because you are subscribed to the Google Groups "innosetup" group.
To unsubscribe from this group and stop receiving emails from it, send an email to innosetup+...@googlegroups.com.
To view this discussion on the web visit https://groups.google.com/d/msgid/innosetup/a265b1f2-01e5-ca1d-0b0a-0d7378a95058%40gmail.com.