D
delphi_gy
Unregistered / Unconfirmed
GUEST, unregistred user!
我想动态建立1个Label，单击Button1后，在Form上却没有显示Label
请问应该怎样编写?
procedure TForm1.Button1Click(Sender: TObject);
var
lab: TLabel;
begin
lab:=TLabel.Create(form1);
lab.Name:='labqqq';
lab.Top:=20;
lab.Left:=20;
lab.Caption:='adsfadsf';
end;
请问应该怎样编写?
procedure TForm1.Button1Click(Sender: TObject);
var
lab: TLabel;
begin
lab:=TLabel.Create(form1);
lab.Name:='labqqq';
lab.Top:=20;
lab.Left:=20;
lab.Caption:='adsfadsf';
end;