Comment créer un nouveau IOTAComponent sur le formulaire Delphi

Question

J'essaye d'écrire l'outil API Delphi Open Tools pour la génération automatique et la mise à jour des composants qui sont placés sur le module de données ou sur le formulaire. Je peux déjà lister tous les composants (chacun est représenté par l'instance de (la classe de) IOTAComponent) et modifier leurs propriétés (setPropByName (...), getPropValueByName (...)). La question est - comment créer un nouveau composant - dans le code de l'API Open Tools afin que ce composant soit ajouté à la forme du module de données? J'utilise IOTAModuleServices partie de l'API et je suppose que c'est la bonne partie pour la tâche à accomplir, n'est-ce pas?

Answer 1

Vous devez obtenir l'interface IOTAFormEditor pour le formulaire/DataModule que vous souhaitez mettre à jour, puis appeler sa méthode CreateComponent():

type 
    IOTAFormEditor = interface(IOTAEditor) 
    ['{F17A7BD2-E07D-11D1-AB0B-00C04FB16FB3}'] 
    ... 
    function CreateComponent(const Container: IOTAComponent; 
     const TypeName: string; X, Y, W, H: Integer): IOTAComponent; 
    ... 
    end;