Vorraussezungen für den Erfolg sind:
* die Unterklasse muss von TPersistent abgeleitet sein und die Mehode Assign überschreiben werden.
Vergisst man Assign zu überschreiben, dann erscheint die Fehlermeldung "Klasse XXX kann XXX nicht zugewiesen werden" (oder so ähnlich)
* das published Property muss read-write sein
Delphi-Quellcode:
private
procedure SetUnterklasse(Value:TCOMUnterklasse);
published
property COMEinstellungen: TCOMUnterklasse
read FUnterklasse
write SetUnterklasse;
procedure COM.SetUnterklasse(Value:TCOMUnterklasse);
begin
FUnterklasse.Assign(Value);
end;
* die Unterklasse muss registriert werden, damit der Objektinspektor dessen Objekte dynamisch erzeugen kann
Delphi-Quellcode:
procedure Register;
begin
Classes.RegisterComponents(...);
RegisterClass(TCOMUnterklasse); // ***
end;