Delphi の集合型プロパティを文字列に変換(その逆も)
Delphi の集合型を文字列に変換したり、文字列から集合型へ設定したり
プロパティでない場合 SetToString や StringToSet を使うのかも
今回は Font.Style <-> 文字列 をRTTIを用いて相互に変換
- uses System.TypInfo;
- // 集合型→文字列
- S := GetSetProp(Memo1.Font, 'Style');
- // 文字列→集合型
- SetSetProp(Memo1.Font, 'Style', S);
コメント