Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Event Prozedur zwischenspeichern und aufrufen

    Delphi
    by Uwe Raabe, 17. Dez 2012
  Erstens gibt es schon einen Typ für den Event (man beachte in desse Deklaration das of object) und zweitens lässt du bei der Zuweisung dann besser das @ weg:
  
  private
  FInitialOnMouseDown: TMouseEvent;
  
  ...
  
  if Assigned(FPaintBox.OnMouseDown) then
  FInitialOnMouseDown := FPaintBox.OnMouseDown;
  FPaintBox.OnMouseDown := OnPaintBoxMouseDown;