【结】create

xhong · 发表于 2010-8-25 10:37:21

下面代码报错
procedure TMainForm.Button1Click(Sender: TObject);
var
  lNav: TDataNavigator;
begin
  lNav := TDataNavigator.Create(nil);
  lNav.Parent := Panel1;
end;
但是改成  lNav := TDataNavigator.Create(self);就可以呢

zfang · 发表于 2010-8-25 17:51:16

呵呵，看一下delphi帮助。
其实报错是在你设置它的parent上。

xhong · 发表于 2010-8-26 17:31:45

没明白你的意思，请明示呵呵

zfang · 发表于 2010-8-27 12:20:06

http://hi.baidu.com/cszhi/blog/item/31ff5a7b5eb62ff30bd18754.html

xhong · 发表于 2010-8-27 16:46:02

是这个导致的吗，Create时候传的Owner和设置Parent有关系吗
那为什么换成一个TButton就没事呢

jiahaiming · 发表于 2010-8-27 17:35:07

换成tbutton是什么意思呢？
是TButton.Create(nil)没报错还是TDataNavigator.Create(TButton)没报错？

TDataNavigator创建时会执行4楼的代码。

xhong · 发表于 2010-8-30 09:28:45

你们动手试一下就知道了

xhong · 发表于 2010-9-1 09:25:49

var
  lBtn: TButton;
begin
  lBtn := TButton.Create(nil);
  lBtn.Parent := Panel1;
end;

jiahaiming · 发表于 2010-9-1 10:34:47

最初由 xhong 发布
[B]下面代码报错
procedure TMainForm.Button1Click(Sender: TObject);
var
  lNav: TDataNavigator;
begin
  lNav := TDataNavigator.Create(nil);
  lNav.Parent := P..

以下省略...... [/B]

请问楼主，是抱什么错误啊？

lixin_justep · 发表于 2010-9-1 10:34:51

请进入delphi查看Tbutton的源码。感觉对于可视化控件，比较正常的写法是要传进owner参数，说明这个控件是创建在什么上边

		自动登录	找回密码
密码			立即注册

【结】create

Re: create