重载 CreateParams 方法即可
声明:
procedure CreateParams(var Params: TCreateParams);override;
procedure TForm2.CreateParams(var Params: TCreateParams); begin inherited; Params.WndParent := 0; end;
posted on 2010-04-10 09:13 zimmerk 阅读(1600) 评论(0) 收藏 举报