你的安装程序使用什么打包的,如果使用IS则可以设定BPl文件的安装路径

解决方案 »

  1.   

    两个函数,你可以用用:
    function GetEnvironmentVar(const Name: string; var Value: string; Expand: Boolean): Boolean;
    var
      R: DWORD;
    begin
      R := GetEnvironmentVariable(PChar(Name), nil, 0);
      SetLength(Value, R);
      R := GetEnvironmentVariable(PChar(Name), PChar(Value), R);
      Result := R <> 0;
      if not Result then
        Value := ''
      else
      begin
        SetLength(Value, R);
        if Expand then ExpandEnvironmentVar(Value);
      end;
    end;function SetEnvironmentVar(const Name, Value: string): Boolean;
    begin
      Result := SetEnvironmentVariable(PChar(Name), PChar(Value));
    end;
      

  2.   

    用打包程序可以做到,选择Groups and Files  项打开,然后按NEW  GROUP,出
    现对话框在GROUP  NAME  中 输入c:\comm,按OK后返回选中C:\comm,按Insert File,然后
    将文件选中....
    记注给....
      

  3.   

    我用的是SetupBuild,居然让我自己改注册表
      

  4.   

    用InstallShield做安装程序就可以