请教有关控件的显示问题

Question

我做了一个函数用来显示“程序正在运行，请等待”，同时也可以用这个函数关闭这个提示。显示时函数内创建了一个Panel，这没问题，但是再次调用这个函数关闭这个显示时，我没有办法关闭这个提示的Panel，怎么也找不到它。谁做过这个，帮个忙了，先谢谢了。

Answer 1

你需要一个全局的变量var 
  ThePanel: TPanel;创建的时候
  ThePanel := TPanel.Create(xxx);销毁的时候
  ThePanel.Destroy

Answer 2

var 
  ThePanel: TPanel;创建的时候
  ThePanel := TPanel.Create(self);
  try 
   your code
销毁的时候
  finally
    ThePanel.Free
  end;

Answer 3

var 
  ThePanel: TPanel;创建的时候
  ThePanel := TPanel.Create(self);
  Thepanel.parent:=form1
销毁的时候
    ThePanel.Free
或用：deletecomnonent(Thepanel.name);