按照delphi程序默认设计出的程序预览的时候自动显示在桌面的左上方,或者就是设计时窗口的位置,这样显示很乱,视觉感觉不好,如何让自动显示到中间呢?

1,程序position默认属性是poDefaultPosOnly.

如何让窗口显示在电脑屏幕中间_desktop

 

2,默认效果如下:

如何让窗口显示在电脑屏幕中间_任务栏_02

 

实现居中显示效果方法如下:

第一种:通过属性设置:

1,选中需要设置的窗体,在属性里面找到 position, 下拉选择poScreenCenter,保存。

如何让窗口显示在电脑屏幕中间_javascript_03

 

 

2.也可以选择poDesktopCenter.

如何让窗口显示在电脑屏幕中间_居中显示_04

 

3.设置居中后效果如下!

 

如何让窗口显示在电脑屏幕中间_任务栏_05

 

 

两者区别:

 

poDesktopCenter 是除去任务栏后的居中

poScreenCenter 是整个屏幕的居中

 

网友建议:

 

窗体的静态属性中有一个Window的Position吧。其中有一个Desktop Center和Screen Center。建议使用后者。这样能够保持窗体始终在屏幕的中间位置,而不取决于桌面的位置。

 

​​​​

 

 

第二种:通过代码实现:

 

如:

Form1.Position:=poDesktopCenter;

Form1.Position:=poScreenCenter;

​​​​