怎么实现窗体的不同形式的分布？？

[changly00]

请问怎样实现窗体的不同形式的分布？如层叠，平铺，横铺，竖列。。。？

[fansnaf]

mdi

[DWGZ]

TileMode := tbVertical;(tbHorizontal)
Tile;

[tjff2000]

用Mdi子窗体。
procedure TForm1.cascade1Click(Sender: TObject);
begin
cascade;
end;

procedure TForm1.horizontaltile1Click(Sender: TObject);
begin
tilemode:=tbhorizontal;
tile;
end;

procedure TForm1.verticaltile1Click(Sender: TObject);
begin
tilemode:=tbvertical;
tile;
end;