Ajout d'une action à la liste d'actions

De RAD Studio
Aller à : navigation, rechercher

Remonter à Utilisation d'objets natifs de l'EDI


Vous pouvez utiliser l'interface de l'API Native Tools de INTAServices pour étendre la liste d'actions de l'EDI avec vos propres actions.

Ajout d'une action à la liste d'actions

Pour ajouter une instance de TAction à la liste d'actions de l'EDI :

  1. Créez votre instance de TAction avec l'objet de la liste d'actions en tant que parent. L'objet de la liste d'actions est la propriété ActionList de la variable BorlandIDEServices transtypée en INTAServices.
  2. Configurez votre action. Par exemple :
  3. Appelez AddActionMenu sur la variable BorlandIDEServices transtypée en INTAServices, puis fournissez les paramètres suivants :
    1. Une chaîne vide. Le premier paramètre est requis uniquement lorsque vous ajoutez un élément de menu au menu principal.
    2. Votre objet d'action.
    3. Nil. Ce paramètre est requis uniquement pour l'ajout d'un élément de menu au menu principal.

Delphi :

if Supports(BorlandIDEServices, INTAServices, NTAServices) then
begin
  MyAction := TAction.Create(nil);
  MyAction.Caption := 'My Action';
  NTAServices.AddActionMenu('', MyAction, nil);
end;

C++ :

_di_INTAServices NTAServices;
if (BorlandIDEServices->Supports(NTAServices)) {
  MyAction = new TAction(NULL);
  MyAction->Caption = "My Action";
  NTAServices->AddActionMenu("", MyAction, NULL);
}

Autoriser les utilisateurs à ajouter votre action à une barre d'outils

Pour autoriser les utilisateurs à ajouter votre action à une barre d'outils de l'EDI, remplissez la propriété Category de votre action avec une valeur. Par exemple, "Mes actions". Les utilisateurs peuvent alors ajouter votre action en tant que bouton à n'importe quelle barre d'outils.

Si vous autorisez les utilisateurs à ajouter votre action à une barre d'outils, vous devez, dans votre code de finalisation, rechercher tous les boutons outils qui font référence à votre action et les supprimer.

Voir aussi