Zitat von
3_of_8:
Später lese ich das wieder aus und erzeuge eine Instanz:
module:=TModuleClass(Pointer((Sender as TComponent).Tag));
Damit erzeugst du keine Instanz.
Damit würdest du eine Instanz der in dem Tag enthaltene Class Of TModule Ableitung der Class of bekommen.
module := TModuleClass(Pointer((Sender as TComponent).Tag)).Create;
bzw. Wenn Module vom Typ Class of TModule ist, dann erzeugst damit eine Instanz:
Instanz := Module.Create;