5,392
社区成员
发帖
与我相关
我的任务
分享Delphi-RZPageControl控件一个简单问题
首先我将RZPageControl控件的Align属性设置为alTop（靠顶），左边我还有一个RZSizePanel的控件，RZSizePanel的Align属性我设置为alLeft（靠左），此时RZPageControl在RZSizePanel的上面，我想实现的界面是RZSizePanel将左边全部填满，RZPageControl只是靠到RZSizePanel控件且靠顶，但是RZPageControl始终会在RZSizePanel上面，延伸并帖到FORM的左边。请各位大婶儿帮忙啊~！
...全文
请发表友善的回复…
发表回复
wsxcdx 2012-08-29
- 打赏
- 举报
加个panel什么都解决了
hooo 2012-08-28
- 打赏
- 举报
rzSizePanel alLeft
放一个rzPanel alCenter,rzPanel 的borderinner,borderoutter fsnone
rzPageControl alTop 放在 rzPanel 上,是不是你要的呢.
放一个rzPanel alCenter,rzPanel 的borderinner,borderoutter fsnone
rzPageControl alTop 放在 rzPanel 上,是不是你要的呢.
Rubsoft_0825 2012-08-28
- 打赏
- 举报
谢谢，已经解决了，用代码解决的。
//在onResize事件里面
procedure Tfrm_main.RzSizePanel1Resize(Sender: TObject);
begin
//rzPage1的左边距离等于rzSizePanel1的宽度，rzPage1的alTop属性去掉
rzPage1.Left:=rzSizePanel1.Width;
end;
我结贴了
//在onResize事件里面
procedure Tfrm_main.RzSizePanel1Resize(Sender: TObject);
begin
//rzPage1的左边距离等于rzSizePanel1的宽度，rzPage1的alTop属性去掉
rzPage1.Left:=rzSizePanel1.Width;
end;
我结贴了
看那山瞧那水 2012-08-28
- 打赏
- 举报
如果这2个不听话，可以先用普通RzPannel先放置了，然后再把你要东西放在这RzPannel里，设置alClient
Rubsoft_0825 2012-08-28
- 打赏
- 举报
补充一下，我想的是RZSizePanel把RZPageControl挡住，RZPageControl只是靠住RZSizePanel就OK啦，RZSizePanel的属性为alTop会延伸到顶部
