Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/delphi/9.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
从Inno Setup安装程序的文件夹中读取Delphi程序中的文件_Delphi_Installation_Inno Setup - Fatal编程技术网

从Inno Setup安装程序的文件夹中读取Delphi程序中的文件

从Inno Setup安装程序的文件夹中读取Delphi程序中的文件,delphi,installation,inno-setup,Delphi,Installation,Inno Setup,我想为我使用DelphiCommunityEdition编写的桌面应用程序制作一个安装程序(使用InnoSetup)。代码包含在我的C驱动器上打开文本文件的语句: var filename: string; begin filename := 'C:\Program Files (x86)\Text_for_BC.txt'; StringList1 := TStringList.Create; StringList1.LoadFromFile(fileName); 只要.ex

我想为我使用DelphiCommunityEdition编写的桌面应用程序制作一个安装程序(使用InnoSetup)。代码包含在我的C驱动器上打开文本文件的语句:

var
  filename: string;
begin
  filename := 'C:\Program Files (x86)\Text_for_BC.txt';
  StringList1 := TStringList.Create;
  StringList1.LoadFromFile(fileName); 
只要.exe和文本文件存在于我的计算机上,程序就可以正常运行。但是,如果我尝试通过使用Inno Setup构建安装程序与朋友共享该程序,上述代码将阻止成功安装,因为文本文件的路径(Inno Setup要求我提供的路径)在我自己的计算机之外不存在


我应该如何编写上述代码以避免“未找到文件”错误

将两个文件部署到Inno安装程序中的同一目录

并让您的程序从其自己的目录加载该文件:

filename:=ExtractFilePath(ParamStr(0))+'Text\u for_BC.txt'