爱
爱与和平
Unregistered / Unconfirmed
GUEST, unregistred user!
开始想在窗体上方一个panel控件,并且左右居中
我就让panel.left:=round((form1.width-panel.width)/2);可是但image的初始宽度超过了
窗体宽度,移动滚动条后在缩放,image就不居中了.
后来我想干脆相对屏幕居中,结果还是一样
p:=screen.ActiveForm.ScreenToClient(form1.ClientToScreen(point(panel1.Left ,panel1.Width )) );
panel1.Left :=round((screen.Width-p.X )/2);
而且,如果在初始化时panel1的宽度大于窗体的宽度调试时就报错,sigh
我就让panel.left:=round((form1.width-panel.width)/2);可是但image的初始宽度超过了
窗体宽度,移动滚动条后在缩放,image就不居中了.
后来我想干脆相对屏幕居中,结果还是一样
p:=screen.ActiveForm.ScreenToClient(form1.ClientToScreen(point(panel1.Left ,panel1.Width )) );
panel1.Left :=round((screen.Width-p.X )/2);
而且,如果在初始化时panel1的宽度大于窗体的宽度调试时就报错,sigh