Parent Child Verbindungen, Objekte vom Parent im Child ?

[DeddyH]

Ich bin nicht ganz sicher, ob ich Dich richtig verstanden habe, aber ich würde das Kindobjekt ein wenig erweitern.

Delphi-Quellcode:

TKindControl = class(TControl)
  private
    ...
    FVater: TVaterPanel;
  protected
    ...
   procedure MouseDown (Button: TMouseButton; Shift: TShiftState;
                        X, Y: Integer); override;
   ...
  public
    ...
    constructor Create(AOwner: TComponent; AVater: TVaterPanel);
    property Vater: TVaterPanel read FVaterPanel;
  end;