有没有使form中的可视控件自动适应屏幕分辨率的控件(100分)

  • 主题发起人 主题发起人 sunyunlan
  • 开始时间 开始时间
S

sunyunlan

Unregistered / Unconfirmed
GUEST, unregistred user!
同样的问题。编程如何实现。劳烦相告,谢谢。
 
  不需要什么控件,试验以下scale属性form1.scale(20,10),将窗体放大
到原始大小的2倍(20/10),这样在显示的时候只需探测屏幕分辨率,与设计时
的分辨率比较,就可以实现窗体上所有控件自动适应屏幕分辨率。
 
如果你用的是Delphi5或C++Builder5的话,将Form的Scaled设为true即可,
这样Form及其上的控件都适应屏幕的分辨率了
测分辨率的方法是:
GetDeviceCaps(GetDC(frmMain->Handle),HORZRES); //横
GetDeviceCaps(GetDC(frmMain->Handle),VERTRES); //纵
可测出是 640x480 , 800x600 , 1024x768 ......
 
谢谢大家。
 
后退
顶部