Speicherung von Sets... ?!?

[himitsu]

so, hab die letzte Stunde versucht die TypInfo zu debuggen ...

TTypeData > tkSet: (CompType: PPTypeInfo)); bei Sets mit freien Stellen ist CompType nicht vorhanden (= nil)

in der TypInfo.SetToString wird dieses hier
GetTypeData(PropInfo^.PropType^)^.CompType aufgerufen, liefert nil und da es daraufhin ungeprüft dereferenziert wird,
TypeInfo := GetTypeData(PropInfo^.PropType^)^.CompType^; knallt es.


die Frage ist nur, warum gibt es, bei sowas

Code:

TXMLNodeType  = (xtInstruction, xtTypedef, xtElement, xtCData, xtComment, xtUnknown[color=#ff0000][b]=6[/b][/color]);
TXMLNodeTypes = Set of TXMLNodeType;

, keine PPTypeInfo mehr?

[edit=alzaimar]'freuen' -> 'freien' auf Bitten des Beitragverfassers. Mfg, alzaimar[/edit]