Objekt incl. untergeordnete objecte

[webcss]

Kannst du auch mit RTTI machen, ganz generisch:

Delphi-Quellcode:

procedure assign(Source: TPersistent);
...
case Proptype of
tkInt: SetIntProp(self, Propname, GetIntProp(source, propname));
tkClass: TPersistent(GetObjectProp(self, Propname)).Assign(GetObjectProp(source, PropName));
....
end; //case
....
end; //assign