delphi 窗口置顶的问题

用SetWindowPos可以使本窗口置顶，但是一旦弹出窗口，就不行了，譬如messageDlg一下就不行了，我想让这些弹出窗口和messageDlg一起置顶，有谁碰到过这样的问题，请赐教了，谢谢！！！

解决方案 »

  1.   

    自己做个messageDlg就行了,这是简单有效的办法.
      

  2.   

    那郁闷了，程序都是写好的，有大量的messageDlg呢，我没法修改呢
      

  3.   

    有个更简单的方法，在对象浏览器里，把窗口的FormStyle属性改为fsStayOnTop即可
      

  4.   

    to hys_427  这个也是一样的，一弹出窗口就不行了
      

  5.   

    把窗口的FormStyle属性改为fsStayOnTop
      

  6.   

    你的主窗体还要setFocus一下！
      

  7.   

    messageDlg是delphi窗体用showmodal显示出来的
    你看下showmodal源码就知道为什么不置顶了
    全部替换成WINAPI MessageBox吧