zion -  Ajouter les évènements MouseEnter/MouseLeave à un composant
  1. type 
  2.  TClassName = class(TMemo) 
  3.  private 
  4.   procedure CMMouseEnter(var Message: TMessage); message CM_MOUSEENTER; 
  5.   procedure CMMouseLeave(var Message: TMessage); message CM_MOUSELEAVE; 
  6.  end
  7. procedure TClassName.CMMouseEnter(var Message: TMessage); 
  8. begin 
  9. end
  10. procedure TClassName.CMMouseLeave(var Message: TMessage); 
  11. begin 
  12. end;
Poster un commentaire
Utilisateur
Mot de passe
 
Informaticien.be - © 2002-2024 AkretioSPRL  - Generated via Kelare
The Akretio Network: Akretio - Freedelity - KelCommerce - Votre publicité sur informaticien.be ?