在Form上自上至下地并排放2个TPanel,Panel1和Panel2是紧靠的,它们的Align设为alTop,想用代码方式在它们中间或Panel1前插入1个Panel3,怎样做?3Q
原来:
----------------------
| |
| Panel1 |
| |
----------------------
| |
| Panel2 |
| |
----------------------
现在:
----------------------
| |
| Panel1 |
| |
----------------------
| |
| Panel3 |
| |
----------------------
| |
| Panel2 |
| |
----------------------
或
----------------------
| |
| Panel3 |
| |
----------------------
| |
| Panel1 |
| |
----------------------
| |
| Panel2 |
| |
----------------------
原来:
----------------------
| |
| Panel1 |
| |
----------------------
| |
| Panel2 |
| |
----------------------
现在:
----------------------
| |
| Panel1 |
| |
----------------------
| |
| Panel3 |
| |
----------------------
| |
| Panel2 |
| |
----------------------
或
----------------------
| |
| Panel3 |
| |
----------------------
| |
| Panel1 |
| |
----------------------
| |
| Panel2 |
| |
----------------------
Panel2-->Align-->alBottom
Panel1往上拉
Panel2往下拉
中间放个Panel3
Panel2-->Align-->alClient
Panel3-->Align-->alClient //这里写错了
^_^
alNone,alCustom(无,自定义)
alTop(靠上)
alBottom(靠下)
alLeft(靠左)
alRight(靠右)
alClient(填满)
Panel3.Align := alTop;
Panel3.Top := Panel2.Top - 2;
在前面插,将panel2换成panel1就可以了。