如何在桌面上手工创立一个Label????(10分)

????

什么意思啊？
是不是动态的创建一个？
tlable.create！

procedure TForm1.FormCreate(Sender: TObject);
var
rgn: HRGN;
begin
BeginPath(Canvas.Handle);
SetBKMode(Canvas.Handle,Transparent);
with Canvas do
begin
Font.Name:='宋体';
Font.Size:=50;
TextOut(20,20,'大富翁论坛');
end;
EndPath(Canvas.Handle);
rgn:=PathToRegion(Canvas.Handle);
SetWindowRgn(Handle,rgn,true);
end;

多人接受答案了。