Gelöst:
Zuerst aus den gesetzten Teilen einen String im Format '[Wertname1,Wertname2]'.
Delphi-Quellcode:
function SetStrToValue(SetTypeName:
string;value:
string):TValue;
var
ctx : TRttiContext;
t : TRttiType;
begin
t := ctx.FindType(SetTypeName);
if (t <>
NIL)
then
result := TValue.Make(StringToSet(t.handle,value),t.handle,result)
else
Raise Exception.create('
Settype not found !');
end;
Wichtig dabei ist das TValue.Make, ansonsten wird nämlich der Typ von TValue auf tkInteger gesetzt und auch als Integer behandelt, statt als Set
