TButton mit zwei Captions und unterschiedlichem Font

[shmia]

Zitat von Phoner:

Klar kann ich das OnClick-Ereignis entsprechend auf die gleiche Funktion setzen, aber mir fehlt die optische Umsetzung, dass der Button gedrückt wird, wenn ich ein darüber liegendes Control treffe.

Nicht auf den gleichen Eventhandler setzen sondern auf:

Delphi-Quellcode:

proecdure TMyObscureDoubleLabelButton.LabelClicked(Sender:TObject);
begin
   self.Click;
end;