大家都来帮帮忙，inno实在不会了。

小弟制作迅雷的补丁，想做到如下的效果：
1.补丁启动时检测迅雷是否运行在
2.检测迅雷版本
经过在论坛里面的搜索得到下面的两个代码：
1.function InitializeSetup(): boolean;
var
IsAppRunning: boolean;
begin
Result:= true;
IsAppRunning:= IsModuleLoaded('thunder.exe'); //你的程序文件名
while IsAppRunning do
begin
if MsgBox('应用程序正在运行，继续安装前请先关闭它！'#13'要继续安装吗？', mbConfirmation, MB_OKCANCEL) = IDOK then
IsAppRunning:= IsModuleLoaded('thunder.exe') //你的程序文件名
else
begin
IsAppRunning:= false;
Result:= false;
end;
end;
end;
2.function InitializeSetup(): Boolean;
var
tdver: string;
begin
tdver:= '';
RegQueryStringValue( HKLM, 'SOFTWARE\Thunder Network\ThunderOem\thunder_backwnd', 'Version', tdver);
if CompareStr(tdver, '5.9.15.1274') > 0 then
begin
Result:= false;
MsgBox('迅雷的版本不对，请勿使用本补丁 !', mbInformation, MB_OK);
end
else
Result:= true;
end;
可是结果是两个代码放到一起却无法执行，弹出错误，请问如何解决？