ca doit etre un truc dans le genre
procedure bidule;
var
button : Tbutton;
begin
button := tbutton.create(self);
button.name := 'chose';
//la tu modifis les propriété de ton composants
button.show; //ca doit marcher mais je suis pas sur que ce soit indispensable
button.Onclick := clique; //ou clique est une de tes procedures.
end;
voila avec ca tu doit pouvoir te debrouuiller. va falloir chercher un peu. si je retrouve le code complet je te lammene.