如果trview的节电不多的话，可以采用notebook控件
如果多的话，我采用的方法是在右侧界面放一个panel，所有其他的窗口都以它为父控件
动态创建：
procedure TmainForm.createForm(className: string);
var
formclass:Tformclass;
begin
formclass:=Tformclass(findclass('T'+className));
if assigned(tempform00) then
begin
tempform00.Close;
tempform00.free;
end;
formflag:=className;
tempform00:=formclass.Create(containPanel);
tempform00.parent:=containPanel;
tempform00.Align:=alClient;
end;
