delphi - 文字列を TColor 値に変換するにはどうすればよいですか?

Question

Delphi フォームを作成していて、実行時に背景色を割り当てたいと考えています。このコード:

Form1.Color := clSkyBlue; 

うまくいきます。私の問題は、色の名前を文字列としてテーブルに保存したことです。したがって、テーブルから色の名前を取得して に割り当てるとForm1.Color、上記のステートメントは次のようになります。

var
  ColorName: string;
....
Form1.Color := ColorName;

これにより、コンパイル時エラーが発生します。

文字列を値に変換するにはどうすればよいTColorですか?

Answer 1

次の変換関数を使用できます (どちらも色定数で機能します)。

• 色の文字列表現を値StringToColorに変換するために使用する関数TColor
• 値を文字列表現ColorToStringに変換する必要があるときに使用する関数TColor

あなたの場合、StringToColor関数を使用する必要があります：

Form1.Color := StringToColor('clSkyBlue');