我如何在程序中定义一个Tlabel实力，然后显示在已经存在的form上？？(100分)

不将Label控件拖到桌上

var
MyLabel: TLabel;

MyLabel := TLabel.Create(Self);
MyLabel.Parent := Self; // 要指定 Parent
MyLabel.Top := ...;
MyLabel.Left := ...;
MyLabel.Caption := ...;
MyLabel.Visible := True;

还是不出来？？

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);

var
MyLabel: TLabel;
begin
MyLabel := TLabel.Create(Self);
MyLabel.Parent := Self;
MyLabel.Top :=100;
MyLabel.Left := 100;
MyLabel.Caption := 'Mylabel';
MyLabel.Visible := True;


end;

end.

来自：风花雪夜 时间：00-10-14 16:16:52 ID:365771
还是不出来？？

不出来就是因没加放StdCtrls单元.

加分吧！！!

我太蠢，我多了一条free,
非常感谢！