Zitat von
sniper_w:
Zitat:
@Sniper_w: hilft nicht so richtig, da er von TObject ableitet. Gut er könnte {$M+} nutzen.
Mein Beispiel ist aber für TObject Familie abgestimmt.
Offensichtlich nicht ganz:
Zitat von
sniper_w:
...
procedure ListComponentProperties(Component: TComponent; Strings: TStrings);
TPersistence würde an diese stelle am meisten sinn ergeben. TComponent ist eigentlich übertrieben und TObject hat nicht die nötigen TypeInfos.
@Kaderioko: Zeig doch mal ein paar klassenköpfe, damit wir wissen wie die substanze aussieht.
mâxîmôv.
{KDT}