Delphi 列挙型 ⇔ 文字列, 列挙型 ⇔ 数値

TWindowStateでの例

列挙型と文字列

S := GetEnumName(TypeInfo(TWindowState), Ord(WindowState));
// 文字列 "wsNormal" 等が返る

WindowState := TWindowState(GetEnumValue(TypeInfo(TWindowState), S));
// TWindowState 型 wsNormal 等が返る

列挙型と数値(byte)

var I: Byte;
I := Ord(WindowState);

WindowState := TWindowState(I);