为什么无法创建label类!(50分)

  • 主题发起人 主题发起人 完颜康
  • 开始时间 开始时间

完颜康

Unregistered / Unconfirmed
GUEST, unregistred user!
create()后发现没有parentWindow 属性
如果用parent.parentWindow=form.handle就出错了
是怎么回事
怎么创建label呢
 
parent:=Self
 
能不能把你的代码贴出来
 
下面这段程序在Delphi5测试通过,
procedure TForm1.FormShow(Sender: TObject);
var
Label1:TLabel;
begin
Label1:=TLabel.Create(self);
Label1.Parent:= Form1;
Label1.Caption:='这是测试程序。';
end;
 
还要设置它的属性的,可以搜索旺上有好多关于如何动态建立元件的文章
 
to;zhuhuan
加了你着句果然就能行了~非常感谢!你能不能告诉我为什么在tlabel中没有label.parentwindow
而得用.parent:=self 呢?那句话是什么意思呀?
to:westboy2000
也很感谢你~你的方法也可以用的~Label1.Parent就是这句!什么意思呀~~

加过分了~~
 
Label是从TGraphicControl里继承的没有HWND, 所以没有ParentWindow,和TEDIT不一样,
Self就是你的窗体Form,
 
后退
顶部