急:不同分辨率下的界面显示如何处理??
急:不同分辨率下的界面显示如何处理??还有相同分辨率下宽屏又如何处理?
先谢谢各位了!
[解决办法]
根据用户,根据习惯,根据项目作相应的调整,如计算器的窗口不能调大小一样,大家还不是一样的习惯了。
[解决办法]
先获取分辨率 再分别实现
[解决办法]
我一般是主窗体默认最大化,然后各个功能模块就根据实际情况固定一个大小。全部都不可改变的。
[解决办法]
多用align属性吧。我的做法是设计一个特殊的容器,它会自动调整子控件的位置和大小。
[解决办法]
对你俩无语...
回答LZ问题:
除非你的界面是固定大小的,否则想要兼容的话,要分别取出不同的分辨率,字体大小再缩放处理的
[解决办法]
我在四楼给出了一个解决方案,也是我目前用的方案。
function setformpos(form:tform):boolean;begin case screen.Width of 640: begin // end; 800: begin form.Left :=0; form.Top :=0; result:=true; end; 1024: begin form.Left :=(screen.width -form.Width) div 2; form.Top :=(screen.Height -form.Height ) div 2; result:=true; end; end;end;.....procedure Tfrm_main.FormResize(Sender: TObject);begin image1.Height:=clientheight-statusbar1.Height; image1.Width :=clientwidth; image1.Left :=0; image1.Top :=0;end;