L
lwx520416
Unregistered / Unconfirmed
GUEST, unregistred user!
我是在4:3普通屏和分辨率1024x768设计的程序,当时设计时还真没考虑太多,程序是多用户操作,每个用户的屏幕宽度尺寸都不相同(有17寸宽屏、22寸宽屏、24寸宽屏液晶,还有4:3的普通屏。各用户的分辨率也不相同)。在这些不同屏幕上,程序显示的界面真是五花八门;有的界面显示的非常小,有的界面显示超出屏幕。我总不能让用户一定按我设计的分辨率来设置显示器吧?! 我用了如下的程序来设法改变控件尺寸:if (screen.width<>1024) then begin FWidth:=Width; Scaled:=TRUE; Font.Size:=(Width DIV FWidth)*Font.Size; scaleby(screen.width,1024); height:=longint(height)*longint(screen.height) div 768; width:=longint(width)*longint(screen.width) div 1024; end;但效果并不理想,虽然控件随着分辨率不同,改变了尺寸。但还是超出了我设计的界面。不知有没有其它的办法来解决这个问题?请各位帮帮我!