在线等:请教牛人牛人高手...来者可能有分
我想在当前MDI主窗体里,显示其它窗体的内容,也就是当点击左边的导航按钮时,右边一框显示将要显示的窗体.
[解决办法]
没太明白
[解决办法]
如果你做的标准的mdi程序,左边有align left的菜单项,你点了它,create新的child窗体并show,不就在你右边的客户区里了么?你倒底想问啥?
[解决办法]
主窗体上放个PANEL之类ALGIN属性设置成ALLEFT
显示CHILD窗体的时候就是你要的这个效果
[解决办法]
在主窗体中初始化第二个窗体。这样运行两个窗体都能显示出来了
然后在主窗体中导航OnClick事件中写那个窗体如何变化
[解决办法]
想轻松实现这样的功能,Delphi可能是做不到的.
[解决办法]
一.用第三方控件,RC3控件包,里面有个控件,是啥名字来忘了,可以做成像WINDOWS一样的导航条,完全可以实现你的要求不过要停靠的窗体的FormStyle不能用MDIChild ,同时还需要设置了停靠的窗体的Position属性,
二.手动画导航面板,再用窗体嵌套的方法,将你要的窗体嵌套到面板上也是可以的
[解决办法]
我说啦,不用这控件也行,你自己画导航条哪...只是效果没那个控件做的好看而...
[解决办法]
说了半天就MPI,那你就不要说成MDI。
[解决办法]
设置parent
[解决办法]
Form2.Align alClient
Form2 设置为自动创建
procedure TForm2.FormCreate(Sender: TObject);
begin
Self.ParentWindow := Form1.Panel1.Handle;
end;
[解决办法]
手误
因该是手动创建
[解决办法]
procedure TForm1.Button1Click(Sender: TObject);
var
fm2 : TForm2;
begin
fm2 := TForm2.Create(Self);
fm2.FormStyle := fsNormal;
fm2.Parent := Self;
fm2.Align := alClient;
fm2.Show;
end;