Einzelnen Beitrag anzeigen

Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#2

AW: Button Click aus VCL-Komponente heraus

  Alt 17. Apr 2013, 22:02
Im einfachen Fall weist Du dem Panel ein OnMouseUp-Event zu welches Du in Deiner Scollboxableitung deklariert/implementiert hast.
so als PseudoCode
Delphi-Quellcode:
  procedure TMyScollBox.PanelMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
   begin
     ....
   end;
   
   .......
   constructor TMyScollBox.Create(AOwner:TComponent);
      begin
       ......
       FMyPanel.OnMouseUp:=PanelMouseUp;
      end;
Oder Du legst in der Komponente noch eine WrapperKlasse für Dein Panel an und implementierst dort eine Behandlung von WM_LButtonUp und reichst diese ganze durch an Deine Komponente.
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat