列挙型の値を文字列に変換 のバックアップ差分(No.3)
- バックアップ一覧
- ソース を表示
- バックアップ を表示
- 列挙型の値を文字列に変換 は削除されています。
- 1 (2005-10-05 21:16:49 (水))
- 2 (2005-10-05 21:17:20 (水))
- 3 (2005-10-06 22:51:00 (木))
- 追加された行はこの色です。
- 削除された行はこの色です。
[[Delphi]] **列挙型の値を文字列に変換 [#n0fadb79] RIGHT:[[Delphi]] *列挙型の値を文字列に変換 [#n0fadb79] TBrushStyleやTPenStyleなどの列挙型の値を文字列に変換するには次のように行う。 uses TypInfo; function GetBrushStyleName(Value: TBrushStyle): String; begin Result := GetEnumName(TypeInfo(TBrushStyle), Ord(Value)); end; 逆に文字列から値に変換するには次のようにする。 uses TypInfo; function GetBrushStyleValue(Name: String): TBrushStyle; begin Result := TBrushStyle(GetEnumValue(TypeInfo(TBrushStyle), Name)); end;