Delphi の集合型プロパティを文字列に変換(その逆も)

Delphi の集合型を文字列に変換したり、文字列から集合型へ設定したり
プロパティでない場合 SetToString や StringToSet を使うのかも

今回は Font.Style <-> 文字列 をRTTIを用いて相互に変換
uses System.TypInfo;

// 集合型→文字列
S := GetSetProp(Memo1.Font, 'Style');

// 文字列→集合型
SetSetProp(Memo1.Font, 'Style', S);

コメント