关于webbrowser中弹出对话框的自动确认功能的实现 ( 积分: 200 )

Avalon富翁言之有理，虽然这个问题没有得到富翁们的答复前自行解决了问题，但之前我也从大富翁的资料里确实学习到了不少知识，感谢那些无私的、热心的富翁们。
本问题重新整理后如下：
EmbeddedWB中如何自动对弹出的confirm对话框进行确认？
目前在提交过程中，会弹出一个confirm对话框，确定后才能完成提交。我是这样处理的：
先填充必要的input，然后click提交，即submit，这时会弹出一个confirm对话框，需要确定后才能完成提交

function TForm1.WBShowMessage(HWND: Cardinal; lpstrText,
lpstrCaption: PWideChar; dwType: Integer; lpstrHelpFile: PWideChar;
dwHelpContext: Integer; var plResult: Integer): HRESULT;
begin
Result:=S_OK;
end;

结果是对话框不出现了，但提交也失败了
如果这个方法不行的话，应该用什么方法实现自动提交？
后来试过在onshowmessage/onshowdialog/timerontimer事件中调用sendmessage、postmessage的方法，模拟过鼠标单击、回车等消息，都只能起到关闭对话框的作用，而关闭对话框后不能继续提交。查了不少资料后，发现有用formelement.submit的方法，但其只能起到action的刷新作用，直接用ole进行submit也只是起到刷新的作用，由于对网页编程知识了解甚少，在此只是猜测可能是因为参数不正确的原因。后来在某群里问这个问题，一大虾(‘长征’)给了我提示，遂将result:=S_OK换成mrok和mryes，也不行，也只能起到关闭对话框的作用，这时，发现函数中有个plResult的var，用plResult:=mrYes一试，搞定！具体原理还需各位大虾的分析
在分析过程中还发现，对话框首先响应onshowmessage过程，若此过程无处理，则继续响应onshowdialog过程

由于‘长征’大虾的启发而解决此问题，若无异议，本贴分数将主要结给‘长征’大虾，其它富翁酌情结分

楼主这才200分 我都烂在锅里快1000了
丢出去的分 泼出去的水啊
楼主自问自答 咱们也得留下的经验给大家啊 就这么把问题删了不厚道吧

csdn上的贴子在没有跟贴前可以删除的，大富翁的却是不行
我的问题是关于webbrowser编程的，如果有需要待我整理之后贴上，其实很简单的一个问题

告诉你一个好办法
把标题该一该:
"散分喽,散分喽,各位街坊邻居快来顶哦,刚出炉的小子大甩分哦"
"走过路过,不要错过,机不可失,失不再来哦".

---其实把分送给那些初学者问问题用也不错哦,说不定
到时给你个"大富翁雷锋奖".

晕了，不是已经解决了？怎么又变成待解决的了？长征大虾的回答也被删除了，版主出来说明下啊？难倒认为我是在倒分？聊天记录贴文本的又怕您会说是作弊，富翁上如果能够贴图的话，我可以贴上qq群里的聊天记录图片作为证据，这绝对不是倒分！我一开始要收回分数，版主不收，删贴倒是挺麻利的。。。晕4
说明：‘长征’是该富翁在群内的昵称，之前我并不知道他的id，是贴出来之后问了他的id，让他过来接分的。

大富翁搬服务器,丢失了几天的数据而已,让长征再来领次分吧

我来了

本来有总结的，后来把标题和内容都删了，不好意思，就这样结了。