TColorを文字列に変換する
TColorを文字列として扱うには ColorToString 関数を使います。逆に文字列からTColor型に変換する場合は StringToColor 関数を使います。
| ■ ColorToString , StringToColor の使用例 |
//uses Graphics procedure TForm1.Button1Click(Sender: TObject); begin //TColorを文字列へ Edit1.Text := ColorToString(Form1.Color); //Edit1.Text = 'clBtnFace' end; procedure TForm1.Button2Click(Sender: TObject); begin //文字列をTColorへ Form1.Color := StringToColor(Edit1.Text); end; |