EntwZeit - Subkomponente löschen - Exception wird ausgelöst

[christian_r]

Hier nochmal die Exception, wenn ich die ComboBox lösche:

Zitat:

Access violation at address 40005989 in module 'rtl70.bpl'. Read of address 0000001B."

Ich habe jetzt versuchsweise eine Methode SetComboBox( ) implementiert, mit der ich die ComboBox mittels "write" zuweise und die ComboBox als SubComponent deklariert.

Delphi-Quellcode:

type
  TDkComponent = class( TComponent )
   private
    FComboBox : TComboBox;
   protected
    procedure SetComboBox
              ( pValue : TComboBox );
              virtual;
   published
    property  ComboBox
              : TComboBox
              read FComboBox
              write SetComboBox;
  end;

implementation

procedure TDkComponent.SetComboBox
          ( pValue : TComboBox );
begin
  Self.FComboBox := pValue;
  Self.FComboBox.SetSubComponent( True );
end;

Das war auch ein Fehlversuch. Resultat ist, dass er weiterhin die Exception beim Löschen auslöst. Nun kommt dazu, dass er beim Start der Applikation einen "EReadError" auslöst.

Zitat:

"Debugger Exception Notification"
Project Project1.exe raised exception class EReadError with message 'Invalid property path'. Process stopped. Use Step or Run to continue.

Ich verstehe das Konzept von SetSubComponent( ) nicht. Wann muss ich diese Methode verwenden?