« Améliorations des contrôles d'interface (Version 9.10) » : différence entre les versions
(Page créée avec « Category:Version910 ») |
Aucun résumé des modifications |
||
Ligne 1 : | Ligne 1 : | ||
__TOC__ | |||
==Action sur les objets affichés dans un noeud de Treebook== | |||
[[image:Treebook-node-actions.png]] | |||
L'objet associé au noeud peut supporter les méthodes suivantes pour exécuter des actions : | |||
<source lang="delphi"> | |||
function CanCustomAction(idx:Integer; var Enable:boolean; var Caption:string):Boolean; | |||
begin | |||
// Return custom action caption and enable state for action index Idx | |||
case idx of | |||
0 : begin Result := True; Enable=True; Caption := 'My custom action'; | |||
else begin Result := False; | |||
end; | |||
end; | |||
procedure doCustomAction(idx:Integer); | |||
begin | |||
// Execute custom action idx | |||
case idx of | |||
0 : doMyAction(); | |||
end; | |||
end; | |||
</source> | |||
[[Category:Version910]] | [[Category:Version910]] |
Dernière version du 5 novembre 2020 à 10:37
Action sur les objets affichés dans un noeud de Treebook
L'objet associé au noeud peut supporter les méthodes suivantes pour exécuter des actions :
<source lang="delphi">
function CanCustomAction(idx:Integer; var Enable:boolean; var Caption:string):Boolean; begin
// Return custom action caption and enable state for action index Idx case idx of 0 : begin Result := True; Enable=True; Caption := 'My custom action'; else begin Result := False; end;
end;
procedure doCustomAction(idx:Integer); begin
// Execute custom action idx case idx of 0 : doMyAction(); end;
end;
</source>