Ereignis von interner Komponente propagieren

Question

Ich schreibe eine Komponente, die wenige Komponenten enthalten.

Ich möchte in der Lage sein, das Ereignis von der Komponente (TPanel) auf das enthaltene fGrid zu propagieren. Wie kann ich dieses Ziel erreichen?

Ich denke, ich sollte ein Ereignis mit dem gleichen Typ auf dem TPanel (als Container-Komponente) deklarieren. Wie breitet man sich dann in das fGrid aus?

Answer 1

Es ist ein wenig unklar, was Sie fragen, aber basierend auf dem Code, den ich sehen, einen Event-Handler schreiben und es an das Netz zuweisen ...

procedure TMyComponent.DBGridCellClicked(Column: TColumn); 
begin 
    if Assigned(fOnCellClick) then 
    fOnCellClick(Column); 
end; 

constructor TMyComponent.Create(AOwner: TComponent); 
begin 
    inherited; 
    fGrid := TExCustomDBGrid.Create(self); 
    fGrid.Parent := self; 
    fGrid.Align := alClient; 
    fGrid.OnCellClick := DBGridCellClicked; 
end;