如何动态使用构件和控件
如何动态创建和显示一个构件或控件。
比如说是一个TButton,TLabel,TListBox,TComboBox,或者是一种第三方的ActiveX控件等等,想响应某一事件创建并显示它。
比如
TForm1.OnButtonClick(Sender:TObject)
var
MyButton:TButton
begin
..... //想在这里创建并显示
{
MyButton:=TButton.Create...
MyButton.Name:=..
MyButton.Caption :=
MyButton.Visible:=
} //这一段不行。
end;
MyButton对象应该定义在哪里?定义在上面这个过程里还是定义在Form类里,因为
我还要这个MyButton响应一些事件,支持拖动,等等。
最后如何删除。 Free就可以了吗?
初学Delphi,请多指教。谢谢