Generische Erzeugung von Objekten...

[maximov]

Moin,

was du brauchst sind klassen-referenzen (metaklassen oder wie die heissen). Zu dem speziellen feld suchst du dir die richtige referenz und kannst dann normal instanzieren:

Delphi-Quellcode:

type
  TPDObjectClass = class of TPDObject;
..
var 
  pdClass :TPDObjectClass ;
...
// klassen-referenz holen
pdClass := findClass( ?GetActFieldClassName? );
if pdClass <> nil then
  obj := pdClass.create; // fertig


...
initialization
  // damit man später über den namen an die klasse kommt
  RegisterClasses([TPDKunde,etc,...]);

Wichtig ist das die klassen registriert werden! Du kannst dir da auch deine eigene registry schreiben, die direkt auf den feldnamen reagiert (zB. mit einer stringliste)