我想在程序中做一个功能,当点击实现该功能的按钮时,可以弹出一个子窗体在界面窗体的最左边,这个子窗体有一个叉叉,可以关闭它。我主要是想在这个子窗体中用TTreeView控件做一个树形结构列表,代替菜单,点击其中的命令,在右边的部分形成一个编辑页面。左右两部分之间有一个Spliter,可以改变两部分的相对大小。当然这整个界面是位于一个MDI子窗体中的.
最难实现的是这个可以关闭的子窗体的实现。也许代码不多。
请高手们不吝赐教!!!
最难实现的是这个可以关闭的子窗体的实现。也许代码不多。
请高手们不吝赐教!!!
解决方案 »
- 快折腾疯了,用IdHTTP Post数据,模拟登录
- 如何提取XML字符串中的数据供grid的使用???
- 心情不爽,放分了
- 请教DELPHI的哪四个认证,广东哪处有授权(ATA授权的)???
- 有没有在北京太极华青佩诚软件科技有限公司混的?
- delphi开发的程序vc能用吗?我是新手
- ****100分求助****:在应用程序服务器增加了方法,实现代码在哪里写???
- 养成良好的程序设计风格//zswang
- 初级Delphi问题
- 报表打印出现1899-12-30!!!!请帮我一把。
- 关于Mscomm组件的问题
- delphi中的子窗体 能被限定在一个位置吗?能通过程序控制其大小吗?能动态控制其显示和隐藏吗?
1、使用停放功能:
a.在主窗体的左面放置一个panel(panel1)控件,设置dragkind=dkDock;dragmode=dmAutomatic;docksite=true;
b.创建子窗体(form2),同样设置dragkind=dkDock;dragmode=dmAutomatic;
c.主窗体按钮click事件,
form2.ManualDock(panel1);
2、使用API函数setwindowlong,代码段如下:
Windows.SetParent(fForm.Handle2, panel1.Handle);
Form2.BoundsRect:=panel1.ClientRect;
form2.show;
actionL=cafree;
formname:=nil;
建立窗体
if not assigned(formname) then application.createform(Tfromname,formname);