Bonjour à toutes & à tous,

Je sais, le titre n'est pas des plus clairs. Je vais me rattraper avec un exemple de ce que je cherche :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
var
  obj: TObject;
 
  obj := BuildObject( 'TButton', Self );
Bien sûr, il n'est pas question de faire un case of en testant toutes les classes .

Merci d'avance pour vos lumières