靠，我连CREATE 一个LABEL都写不了了，大家帮忙

Question

在FORM上动态CREATE一个LABEL，写了以后怎么也不出来，我的代码是
TmpLabel := TLabel.Create(form1);
with TmpLabel do
begin
  name := 'Label1' ;
  caption := 'MyLabel';
  top := 100 ;
  left:= 100;
  width := 60 ;
  height:= 12 ;  
end;
 各位老大，这样写哪里不对，怎么就是FORM上看不到LABEL啊。

Answer 1

var
  TmpLabel:TLabel;
begin
TmpLabel := TLabel.Create(form1);
with TmpLabel do
begin
  TmpLabel.parent:=form1;
  name := 'Label1' ;
  caption := 'MyLabel';
  top := 100 ;
  left:= 100;
  width := 60 ;
  height:= 12 ;
end;

Answer 2

Parnet没设置而已http://lysoft.7u7.net

Answer 3

TmpLabel := TLabel.Create(form1);
with TmpLabel do
begin
  name := 'Label1' ;
  caption := 'MyLabel';
  top := 100 ;
  left:= 100;
  width := 60 ;
  height:= 12 ;
  Parent:=self;  //加上这一句就行了。或加上 Parent :=form1;  
end;

Answer 4

NewLabel := TLabel.Create(NewForm);//
          NewLabel.Parent := NewForm;//这里注意父窗口
          NewLabel.Left := left;
          NewLabel.Top := top;
          NewLabel.Height := 13;
          NewLabel.Caption := 'New' 
          NewLabel.Font.Color := clRed;
          NewLabel.AutoSize := true;
          NewLabel.Font.Style := [fsUnderline];
          NewLabel.OnClick := NewLabelClick;//自定义事件

Answer 5

//忘记开始加上
var
  NewLabel:TLabel;

Answer 6

错就只一句
Parnet没设置而已---- ly_liuyang(Liu Yang) 如是说。

Answer 7

1.TmpLabel.parent:=form1;
2.form1.InsertControl(TmpLabel);

Answer 8

其实不是没有创建 只是创建了你看不到~ 没有设置parent.

Answer 9

TmpLabel := TLabel.Create(form1);
with TmpLabel do
begin
  name := 'Label1' ;
  caption := 'MyLabel';
  top := 100 ;
  left:= 100;
  width := 60 ;
  height:= 12 ;  
  parent:=form1;//<---小孩子生出來，它的父母是誰？
end;