Code:

var Butt:TButton;

{©Drkb v.3(2007): www.drkb.ru}

begin

Butt:=TButton.Create(Self);

Butt.Parent:=self;

Butt.Visible:=true;

end;