起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 140|回复: 4

【结贴】DockStub中的浮动窗口,怎么屏蔽浮动窗口的“关闭”按钮?**

[复制链接]
发表于 2007-9-13 11:11:55 | 显示全部楼层 |阅读模式
调用的代码如下:
DockStub1.InitControlConfigs(['SelectTimePanel'], ['时间段'], [FPicture], 170, 400, TDockKind.dkFloating,
                               TDockSide.alLeft, false,
                               [TDockWindowButton.wbHide,TDockWindowButton.wbDock,TDockWindowButton.wbAutoHide],                               [TDockKind.dkAutoHide,TDockKind.dkDocking,TDockKind.dkFloating]);

  DockStub1.BeginUpdate;
  try
    DockStub1.AddClient('SelectTimePanel', pnlTime, nil);
  finally
    DockStub1.EndUpdate;
  end;

功能运行后,DockStub中的浮动窗口,怎么屏蔽浮动窗口的“关闭”按钮?

1.png

28.17 KB, 下载次数: 116

回复

使用道具 举报

 楼主| 发表于 2007-9-13 12:08:32 | 显示全部楼层
快沉了,顶一下!
回复 支持 反对

使用道具 举报

发表于 2007-9-13 14:31:26 | 显示全部楼层
procedure TMainForm.Button1Click(Sender: TObject);
begin
  DockStub1.InitControlConfigs(['demo'], ['关联信息'], [nil], 180, 100, TDockKind.dkAutoHide,
    TDockSide.alRight, False,
    [TDockWindowButton.wbAutoHide, TDockWindowButton.wbDock, TDockWindowButton.wbHide],
    [TDockKind.dkAutoHide, TDockKind.dkDocking]);
DockStub1.AddClient('demo', Panel1, nil);

end;
回复 支持 反对

使用道具 举报

发表于 2007-9-19 10:59:02 | 显示全部楼层
??楼主可以了吗?
回复 支持 反对

使用道具 举报

发表于 2007-9-30 09:40:38 | 显示全部楼层
由于长时间没有反馈,先结贴了。

有问题请开新贴。
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-6-28 14:59 , Processed in 0.042847 second(s), 19 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表