inno如何在Code段控制安装目录 在线等 ( 积分: 50 )

  • 主题发起人 主题发起人 dmzn
  • 开始时间 开始时间
D

dmzn

Unregistered / Unconfirmed
GUEST, unregistred user!
代码:
function NextButtonClick(CurPageID: Integer): Boolean;
begin
  Result := True;
  if CurPageID =wpWelcome then
 DefaultDirName = 'c:/';
  //设置默认的安装路径为c:,可是这么写不对.正确的应该怎么写呢?
end;
 
代码:
function NextButtonClick(CurPageID: Integer): Boolean;
begin
  Result := True;
  if CurPageID =wpWelcome then
 DefaultDirName = 'c:/';
  //设置默认的安装路径为c:,可是这么写不对.正确的应该怎么写呢?
end;
 
再写一个返回函数
[Setup]
DefaultDirName={code:GetDataDir}
代码:
function NextButtonClick(CurPageID: Integer): Boolean;
begin
  Result := True;
  if CurPageID =wpWelcome then
 DefaultDirName = 'c:/';
  //设置默认的安装路径为c:,可是这么写不对.正确的应该怎么写呢?
end;

function GetDataDir(S: String): String;
begin
  { 返回选定的Dir }
  Result := DefaultDirName;
end;
 
好,帮顶


--------签名档---------------------------

比肩国内顶尖源码下载站点 -> 源码我爱你

http://www.source520.com
http://www.source520.net
80G源码电子书免费免注册下载,大量精辟技术文档库随时更新
******************************************************************
附:为了站点持续发展,现有本站近年来收藏的大量大型商业源码低价出售,
详情请进入以下链接查看:
http://www.source520.com/building_delphi.htm

浏览商业代码请从如下URL进入查看实物:
1.商业源码库1: ftp://source520see3:browse@61.152.199.245/
2.商业源码库2: ftp://source520see2:browse@61.152.199.245/
 
后退
顶部