TButton OnClick mit eigener überlagern



  • ich will ein programm mit mehreren Buttons (um genau zu sein 100 oder mehr) und jeder von ihnen soll wen man drauf klickt die farbe ändern (jedoch nur die eigene) und will dies mit einer methode machen.
    Hab mir schon eine klasse geschrieben die von TButton erbt und einen funktionierenden Konstruktor hat jedoch weiß ich jetzt nicht wirklich weiter

    class MButton: public TButton
            {
    
            public:
            MButton(void* ParentWindow);
            void __fastcall Change(TObject* Sender);
    
            };
    

    Konstruktor:

    MButton::MButton(void* ParentWindow):TButton(ParentWindow)
    {
    
    }
    


  • Hallo

    Als einfachstes überschreibst du die Click-Methode :

    class MButton
    {
    ...
            DYNAMIC void __fastcall Click(void);
    ...
    }
    
    void __fastcall MButton::Click(void)
    {
      ShowMessage("Vor Click");
      TButton::Click(); // Originalfunktion aus TButton aufrufen
      ShowMessage("Nach Click");
    }
    

    bis bald
    akari



  • 😃 genau das habe ich gesucht!

    Danke akari


Log in to reply