大家都来看看吧：如何将程序中 生成的子窗口 用一个 工具条来管理，就像Windows中的任务栏一样？

Question

我知道怎样在生成一个窗口的时候 在工具栏上添加一个相应的按钮！但是我不知道1. 怎样在关闭掉子窗口的时候同时删掉相应的按钮？？？2. 右键单击按钮的时候应弹出一个 Close菜单，但是怎么知道 右键点中了按钮没有呢？谢谢！

Answer 1

1、toolbutton1.Free;
2、设置toolbutton的dropdownmenu属性

Answer 2

1.关掉子窗体时button1.Visible:=false;
2.procedure TForm1.Button1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  if button = mbright then
  begin
//your code  end;
end;
//接分

Answer 3

to ： upingking() 
谢谢！
分一定会给的，请放心。只是第一个问题您误会了我的意思。
不论是Button的Invisible或者Free都可以实现，我问的时什么时候执行这句话。或者说，我怎么在代码中知道 窗口何时被 Close掉？？？

Answer 4

有点误会你的意思，你问怎么在代码中知道 窗口何时被 Close掉？？？那么你的窗体是怎样被显示的呢？
你试试在子窗体的onclose事件中或者onhide中写

Answer 5

TO：wweijie() 很感谢你的热情回答。我想在主窗口中截获 这些Close消息，如果在子窗口中写，那么每个子窗口都要写，太麻烦，所以我想在主窗口来截获这些消息，这样处理代码只用写一次。