OnMouseOver-Event für TButton

[ThE_-_BliZZarD]

Hallihallo liebe DP-Gemeinde,

ich würde gerne einen Button benutzen, der eine OnMouseOver-funktion besitzt. Ich habe schon im Internet verschiedenste Konstrukte gesehn, mit globalen Hooks (ich hab keine Plan wie es funktioniert, weiß aber was es bringt und finde es für mein Problem ungeeingnet).


Ich weiß, das man Objekten (in dem Fall z.B.: dem TButton) Funktionen hinzufügen kann, nur wäre ich seeehr froh über eine kleine Anleitung, wie ich den Button a) erweitern kann und b) dann dort den Aufruf einer Procedur festlegen kann.


Wenn es geht, würde ich dem TButton die Eigenschaft auch gerne längerfristig hinzufügen, da ich suie öfter mal gebrauchen kann, ich benutze Delphi 7, es wäre echt sehr cool wenn das gehen würde, das man die Eigenachaft dann sogar im "object inspector" sehen und bearbeiten kann.


Vielen Dank im Vorraus,

ThE_-_BliZZarD

[bitsetter]

Hi,

für OnMouseOver könntest du die entsprechenden Messages abfangen
CM_MOUSEENTER und CM_MOUSELEAVE. Der Code ist zwar für ein TPanel, du kannst ihn ja ohne weiteres auf TButton umstellen.

[ThE_-_BliZZarD]

ähm.. sorry, aber ich habe davon wirklich keine Plan.. könnte mir jemand erklären, wie ich es genau machen muss, und vor allem, wohin der Code kommt?

EDIT: Habe den Code verändert usw, aber ich weiß nicht wir ich jetzt ein Objekt von dem Typ erzeugen kann, und vor allem wie ich es im Objektinspector bearbeiten kann

[ThE_-_BliZZarD]

Haha^^

Wenn man mal das Gehirn zuschaltet ist es ja eigentlich SEHR simpel^^

Danke für den guten Tipp bitsetter ;-)

Auf zum nächsten Problem xD

DANKE!

[bitsetter]

Du bist inzwischen also selber drauf gekommen, dass es eine Komponente ist. :-D
Was hast du denn nun gemacht, die Komponente gleich installiert oder den Button dynamisch erstellt?