Events einer Komponenete in einer NEUEN ererbten Komponente

[daddy]

Bisher sah Deine Prozdure so aus:

Delphi-Quellcode:

procedure  TMyPanel.MyLabelOnClick; 
begin 
   if Assigned(Self.OnClick) then 
   begin 
      self.OnClick(self) ; 
   end; 
end;

Sie sollte aber so aussehen:

Delphi-Quellcode:

procedure  TMyPanel.MyLabelOnClick; 
begin 
  Click(self) ; 
end;

Also auch das Assigned... muss entfernt werden.

Geht es damit wirklich nicht?

Gruß Daddy