inno安装程序中如何弹出对话框？(50分)

Y

yong2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-08

• #1

在inno安装程序中我在主程序安装完成后，调用一个exe文件，想在执行这个exe文件时
先弹出对话框，如"下面要执行XXX程序",该如何做，谢谢。

 

K

kezhiyong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-15

• #2

My Inno Setup Extensions 3.06
[Run]
Filename: "{app}filename&pathdir";Flags: waituntilidle;StatusMsg: 正在安装导入数据库文件
FileName: "{app}/DRV/InstOrUnstDogDrv.exe";
Parameters: "/u/i";
StatusMsg: 正在安装驱动程序文件......
FileName: "{app}/Flash_6_AX.exe";
Parameters: "/Q";
StatusMsg: 正在安装注册Active文件......

 

Y

yong2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-15

• #3

kezhiyong:
我想弹出个对话框，象showmessage一样或可以有确定，取消确认键，
并不是显示文字在主屏幕上,望解答，谢谢！

 

K

kezhiyong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-15

• #4

//My Inno Setup Extensions 3.06

代码:

procedure DeInitializeSetup();
begin
 MsgBox(text,1,MB_OKCANCEL) ;
InstExec(Path&filename,paramstr,Path,true,true,SW_SHOWMINNOACTIVE,ErrorCode)
end;

 

Y

yong2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-16

• #5

kezhiyong:
怎样在[Run]里调用

代码:

里的DeInitializeSetup();
如我要在
FileName: "{app}/DRV/InstOrUnstDogDrv.exe";
Parameters: "/u/i";
StatusMsg: 正在安装驱动程序文件......
之前弹出对话框，应该怎么做。
再次感谢！

 

K

kezhiyong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-16

• #6

[Run]
FileName: "{app}/MyProg.exe";
Parameters: "/u/i";
StatusMsg: 正在安装驱动程序文件......;check:CheckOK

代码:

function CheckOK:Boolean;
begin
if MsgBox('text',1,MB_OKCANCEL)=IDOK then
 result:=true else
 result:=false;
end;

 

Y

yong2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-16

• #7

kezhiyong：
非常感谢多次解答。