Inno Setup 知识 函数大全

CodeClasses.iss   这个文件 界面控件

procedure URLLabelOnClick(Sender: TObject);   //打开网址代码
var
  ErrorCode: Integer;
begin
  ShellExecAsOriginalUser('open', 'http://www.innosetup.com/', '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
end;

4.相关注册表操作函数

原型：

function RegKeyExists(const RootKey: Integer; const SubKeyName: String): Boolean;

说明：

如果指定的注册表键存在，则返回 True。

示例：

begin
  if RegKeyExists(HKEY_CURRENT_USER, 'Software\Jordan Russell\Inno Setup')then
  begin
    // 键存在
  end;
end;
原型：

function RegValueExists(const RootKey: Integer; const SubKeyName, ValueName: String): Boolean;

说明：

如果指定的注册表键和值存在，则返回 True。

示例：

begin
  if RegValueExists(HKEY_CURRENT_USER, 'Console', 'WindowSize')then
  begin
    // 值存在
  end;
end;

原型：

function RegGetSubkeyNames(const RootKey: Integer; const SubKeyName: String; var Names: TArrayOfString): Boolean;

说明：

打开指定的注册表键并读取子键名到指定的字串排列名。如果成功返回 True，否则返回 False。

示例：

var
  Names: TArrayOfString;
  I: Integer;
  S: String;
begin
  if RegGetSubkeyNames(HKEY_CURRENT_USER, '“控制面板”', Names)then
  begin
    S := '&#