这个问题要分两种情况,我分别给出解决方案。至于分数,“吐血”是不必的,比“吐
血”少点就行了,嘿嘿!
调用对话框的“示意”代码如下:
begin
代码段1
[red]调用对话框[/red]
代码块2
end
其中“代码块2”一般是处理对话框的结果。
1、假如上面的这些代码,是在客户端执行,也就是说你用javascript(或VBscript)编写,
那么十分简单,其中的“调用对话框”用ShowModalWindow(别用open)即可。
2、如果上面的代码是在服务器端执行,也就是说使用delphi来写,你不能直接那样写,因
为你希望程序停留在“调用对话框”那里,直到用户关闭对话框才执行“代码块2”,这
一点你做不到(因为我们只能用show,而show停不住!)。
用Intraweb开发,想实现“服务器端执行的对话框”,你必须改变程序编写的方式。我
在实际开发中经常调用对话框,我的方法是很多方法中的一种,我的思路如下:
1 将“代码块2”放在主叫窗口的另一个函数或者事件里,比如我就定义了一个afterDlg
事件;
2 “代码块2”需要的“上下文信息”在调用对话框之前,即“代码块1”里要保存,如
保存在窗口的成员变量里。
3 对话框窗口关闭时调用主叫窗口的afterDlg
4 afterDlg根据上下文、对话框窗口的内容做些事情,并隐藏或注销对话框,最后显示
自己。
仅供参考!
别忘了给分。