如何记录对摸态对话旷的按键消息

Question

if application.MessageBox('12345','info',
                       Mb_applModal + Mb_iconQuestion + Mb_yesno) = idyes then
begin
//用户按健yes 
end else 
begin
end //用户按健no                   

Answer 1

这样好了：
   对话框弹出后  用户选择 yes 则做标记：比如 对话框.tag:=1
                    选择 no  则做标记：比如 对话框.tag:=0
   等对话框关闭后 检查一下这个 tag 就行了

Answer 2

如何记录对摸态窗口做的动作（也就是接受到WINDOW的消息）