| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
[新規作成] [最新の情報に更新]
|
|
|
|
|
|
Delphi Tips
0324 D1 D2 D3 D4 D5 D6 D7 3.1 95 98 作成： 2002/05/17 osamu rev 1.1 B1 B3 B4 B5 B6 B7 NT3 NT4 2K XP 更新： 2002/05/17 osamu 編集
列挙型(Enum)の値と文字列との変換
TBrushStyle や TPenStyle などの値を文字列として取り出したい、またはそのような文字列からもとの値に戻したい場合、TypInfoユニットにあるGetEnumNameやGetEnumValueを使用します。
uses TypInfo;
function AlignmentToString(Value: TAlignment): String;
begin
Result := GetEnumName(TypeInfo(TAlignment),Ord(Value));
end;
こんな感じですね。
参照： [Delphi-ML:66981] <文字列> <PASCAL>
[新規作成] [最新の情報に更新]
How To
Lounge
KeyWords
Osamu Takeuchi osamu@big.or.jp
Tips
Delphi
Home