？Control '' has no parent window.为什么会产生这样的问题？(非常急！！！不惜一切分数）

Question

你是动态创建这个控件的吗？如果是，应该在创建之后设定它的Parent，如：
  Control1.Parent := AnotherControl;
但属性为fsMDIChild的窗体除外。

Answer 1

你动态创建控件的时候没有指定Parent属性，像下面这样就可以了。
procedure TForm1.Button1Click(....)
var
  AButton:TButton;
begin
  AButton:=TButton.Create(self);
  AButton.Parent:=Form1;
  .....
  .....
  .....
end;

Answer 2

谢谢回答!我的窗体是normal风格，modal显示。这个问题有时出现，有时不出现，感觉痕棘手，项目下周就测试了。

Answer 3

我也遇到过类似的问题，后来我查出来的结果是这样，你可参考
当时出现的是关闭应用程序关闭的时候系统提示 panel has no parent window
我设计了一个Exe文件动态调用*.dll 编译的时候选的是让exe调用BPL包，在我自己的机器上很好，但是在用于另外程序员调试DLL的时候出现了你所提到的问题，追查的结果是这样，我自己用 了Delphi 5 的一号升级包，而其他程序员没有用，用了升级包升级之后就好了