delphi中动态创建组件

1.注意体会self关键字的使用，parent属性和create方法

2.组件动态创建后如何注销？

 1 procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
 2   Shift: TShiftState; X, Y: Integer);
 3 var
 4   Btn: TButton;
 5 begin
 6   Btn:=TButton.Create(self);
 7   Btn.Parent:=Self;
 8   Btn.Left:=X;
 9   Btn.Top:=Y;
10   Btn.Width:=Btn.Width+50;
11   Btn.Caption:=Format('%d,%d',[X,Y]);
12 end;