IntraWeb实现MessageBox的功能(100分)

用IntraWeb如何实现如下功能？我只知道有个WebApplication.ShowMessage……
--------------------------------------------------------------
if MessageBox(0, '确认删除当前记录吗？', '删除确认', mb_YESNO+mb_iconquestion) = mrYes then
begin
// do something
end
else
begin
// do other things
end;
--------------------------------------------------------------

[yellow]不好意思，我知道怎么做了……[/yellow]

完了，还得问这个问题

我知道的做法是在button的confirmation属性设值就可以了，但这样只是在最先就出现confirm对话框，然后执行server端的代码；如果我要先执行一段server端的代码，然后出confirm对话框，并在[确定]后再执行server端代码，又应该怎么写呢？
例如：
begin
// do something
if (...) then
begin
exit;// 如果没有EXIT，我就可以把confirmation放在最前面了
end;
// show messagebox(confirmation)
// do other thing
end;

用ArcIWDlgMessageBox 控件，示例在INTRAWEB目录中的Arcana目录中有。