5,388
社区成员
发帖
与我相关
我的任务
分享怎样使得FORM的大小适应屏幕的分辨率？
如何通过代码来控制FORM的大小适应屏幕的分辨率，使得界面在最大化的状态下始终充满屏幕！？
...全文
请发表友善的回复…
发表回复
fujiefeng 2004-03-28
- 打赏
- 举报
好像就用Scaled属性可以搞定吧
Northwindrocker 2004-03-28
- 打赏
- 举报
谢谢！先试试！
ailibuli 2004-03-28
- 打赏
- 举报
屏幕的宽和高：
ScreenWidth := GetDeviceCaps(GetDC(GetDesktopWindow), HORZRES);
ScreenHeight:= GetDeviceCaps(GetDC(GetDesktopWindow), VERTRES);
ScreenWidth := GetDeviceCaps(GetDC(GetDesktopWindow), HORZRES);
ScreenHeight:= GetDeviceCaps(GetDC(GetDesktopWindow), VERTRES);
lijinghe1 2004-03-28
- 打赏
- 举报
Left := 0;
Top :=0;
Width := Screen.WorkAreaWidth;
Height := Screen.WorkAreaHeight;
Top :=0;
Width := Screen.WorkAreaWidth;
Height := Screen.WorkAreaHeight;
