Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
24. Feb 2015
Ich weiß. Hast du gelesen was das Problem ist?
function SetToString(TypeInfo: PTypeInfo; Value: Integer; Brackets: Boolean): string;
Der erste Parameter ist ein Pointer auf die TypInfos eines Sets. Aber das kann ich dieser Funktion nicht geben, da es keinen nativen Set-Typ gibt abgesehen von dem internen Byteset, was aber bei einem AsString/ToString niemandem hilft.
Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
24. Feb 2015
Öh WTFPL oder so :mrgreen:
Ich habs nicht so mit Lizenzen. Erst recht nicht bei so ein paar Zeilen Code.
Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
24. Feb 2015
So. Enumerator ist nun enthalten und ToString() gibt jetzt Zahlen aus wenn es keine TypeInfos gibt.
AsString ist so eine Sache weil SetToString und StringToSet ein PTypeInfo eines Sets erwarten. Es gibt allerdings kein echtes Set (abgesehen von dem Byteset was nicht viel bringt). Hatte ein bisschen versucht da rumzumogeln und mir da ein eigenes Set-TypeInfo zu basteln mit dem Enum-Typinfo als...
Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
24. Feb 2015
Hallo,
Nachdem ich den Blogeintrag Delphi Record Helpers For Sets gelesen habe wollte ich mich mal an etwas versuchen und ich denke es ist etwas brauchbares dabei herausgekommen.
Was das Set kann:
Alle Operatoren die auch bei nativen Sets unterstützt werden (+, -, *, in, =, <>, <=, >=)
Entsprechende Methoden zu diesen Operatoren (Include(), Exclude(), Intersect(), Contains(),...