求助高手！关于界面的问题，急啊！(100分)

Y

yoyo_monster

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-06

• #1

我做了一个代码管理系统，现在马上要交了，可是在他们机子分辨率低，我的程序界面惨不忍睹！请问怎么适应分辨率的调整或者有没有自动修改控件大小的控件。最好不要调整用户的分辨率。
我做的窗口大概分为三个面板，左边的是alleft，右边的alright,中间的alclient，主要是中间的有问题

 

Y

yoyo_monster

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-06

• #2

怎么没人回答阿？急死了，我记得大富翁上有人说过有几个控件可以方便实现这个的啊。
没人知道吗？

 

C

cck20040410

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-06

• #3

我也正碰上这种分辨率的问题。关注一下！

 

M

muhx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-06

• #4

比较难
Delphi的空间都是按照像素来确定位置和大小的
如果要根据分辨率自动调节
我的办法是根据分辨率手写程序设置没个控件的位置和大小，以1024×768为基准，其余分辨率乘以相应的比例

 

L

lngdtommy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-06

• #5

//网上抄的，自己试试哈。。。
procedure TForm1.Create(Sender.TObject);
var
FWidth:integer;
begin
if(Screen.width<> 800)then

begin

FWidth:=Width;
Scaled:=TRUE;
Font.Size:=(Width DIV FWidth)*Font.Size;//字体大小调整
ScaleBy(Screen.Width,800);
//控件大小调整
Height:=longint(Height)*longint(Screen.Height)DIV 600;

Width:=longint(Width)*longint(Screen.Width)DIV 800;//窗口大小调整
end;
end;

 

X

xyz500

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-07

• #6

是在没办法就把自己的开发环境的分辨率设成跟用户的最低的一样
然后更改分辨率适应其它的高分辨率的电脑

 

Y

yoyo_monster

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-09

• #7

to Ingdtommy : 我试过，貌似不行啊

 

清

清新空气

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-09

• #8

这样说吧!一般很难适应各种分辨率,除非你的界面都是Grid,要莫就是做多种分辨率的界面,程序运行时和分辨率改变时,判断用户的分辨率,从而显示不同的效果,
其实我个人觉得做一个800*600的就可以了,用户调成640*480或是1024*768或是更高,都应该问题不大.

 

可

可视化

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-09

• #9

多放几个面板试试，不一定好用
结构 左——居中
居中上再用 左——居中 或 右——居中

 

Y

yoyo_monster

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-19

• #10

多人接受答案了。