如何讓窗口顯示在電腦屏幕中間

按照delphi程序默認設計出的程序預覽的時候自動顯示在桌面的左上方，或者就是設計時窗口的位置，這樣顯示很亂，視覺感覺不好，如何讓自動顯示到中間呢？

1，程序position默認屬性是poDefaultPosOnly.

 

2，默認效果如下：

 

實現居中顯示效果方法如下：

第一種：通過屬性設置：

1，選中需要設置的窗體，在屬性里面找到 position, 下拉選擇poScreenCenter,保存。

 

 

2.也可以選擇poDesktopCenter.

 

3.設置居中后效果如下！

 

 

 

兩者區別：

 

poDesktopCenter 是除去任務欄后的居中
poScreenCenter 是整個屏幕的居中

 

網友建議：

 

窗體的靜態屬性中有一個Window的Position吧。其中有一個Desktop Center和Screen Center。建議使用后者。這樣能夠保持窗體始終在屏幕的中間位置，而不取決於桌面的位置。

 

參考網友回答：http://bbs.csdn.net/wap/topics/70111919

 

 

第二種：通過代碼實現：

 

如：

Form1.Position:=poDesktopCenter;

Form1.Position:=poScreenCenter;

參考答案來源：http://bbs.csdn.net/topics/90517539