TMenuItem auto vérifié avec Delphi 5

Question

Quelle est la bonne façon de créer un TMenuItem personnalisé qui gère automatiquement sa propriété checked. Rappelez-vous que une fois quelqu'un:

myHelloItem.OnClick := helloword; 

Ensuite, le comportement est perdu ...

Comment cela accompli dans Delphi 7?

salutations,

Answer 1

Deux options:

1. Vous avez une propriété AutoCheck qui fait chaque clic basculer la coche pour cet élément de menu, quel que soit le comportement OnClick (même si je crois que la mise en œuvre Surclic peut remplacer AutoCheck). Néanmoins, cela limite les fonctionnalités.
2. Vous pouvez hériter TMenuItem et mettre en œuvre votre comportement souhaité dans la méthode Click, celui qui appelle « onclick »