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

Delphi の集合型を文字列に変換したり、文字列から集合型へ設定したり

列挙型 ⇔ 文字列, 列挙型 ⇔ 数値 はこちら

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

uses System.TypInfo;

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

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