如何使弹出的窗口位于windows中央

我做一个弹出窗口，让他位于windows中央。

• · 推荐参考文章：
• 引入第三方组件，好还是坏！
• 十年
• 警惕：中国沦为信息时代的半殖民地(转载）
• 我的计算机专业感悟
• ＲａｔｉｏｎａｌRose与Visio
• JSF是DOA吗？
• 软件配置管理可行性报告
• 意法半导体加入中国开放源计算启动计划
• Terrorat30,000feet
• 基础与细节

· 网友精彩回答：

long   ll_screenh,ll_screenw  
  environment le_env  
   
  getenvironment(le_env)  
   
  ll_screenh   =   pixelstounits(le_env.screenheight,   ypixelstounits!)  
  ll_screenw   =   pixelstounits(le_env.screenwidth   ,   xpixelstounits!)  
   
  as_window.y   =   (ll_screenh   -   as_window.height)   /   2  
  as_window.x   =   (ll_screenw   -   as_window.width   )   /   2