Einzelnen Beitrag anzeigen

bernhard_LA

Registriert seit: 8. Jun 2009
Ort: Bayern
1.123 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: XE2 - Inno Setup

  Alt 29. Jan 2012, 10:58
diese Lösung will leider nicht, Source: {code:GetSourceDataDir('x32')}\help\*.*; ist ein ungültiges Prefix, wie sieht denn eine Lösung aus ?


Delphi-Quellcode:



[Code]
function GetSourceDataDir(Param: String): String;
var RootFolder : String;

begin
      RootFolder := 'F:\DVD - Software Release\';


      if param='x32then
                 result := RootFolder;

      if param='binx32then
                 result := RootFolder + 'binx32\';

      if param='x64then
                 result := RootFolder;

      if param='binx64then
                 result := RootFolder + 'binx64\';




[Files]
;copy now the file from source to DestDir

Source: {code:GetSourceDataDir('x32')}\help\*.*; DestDir: {app}\bin\help\; Flags: ignoreversion recursesubdirs createallsubdirs ; Components: IPT
  Mit Zitat antworten Zitat