如何得到弹出窗体的内容?

Question

用webbroser做了访问ie的小程序，希望能得到改页面的弹出窗口的内容（“登陆成功”，“登陆失败”等）得到窗体句柄了不知道接下来怎么操作了......
h := findwindow(nil, 'Microsoft Internet Explorer');

Answer 1

源码：找到那个窗口后关掉。现在是如果弹出的窗口的内容是“登陆失败”则程序也要中止..
  h := findwindow(nil, 'Microsoft Internet Explorer');
   if h>0 then
   begin
      postMessage(h,WM_CLOSE,0,0);
   end;