掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TcolorのcustomColor値を保存するには？ (ID:740)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
何でわざわざTcolor型に変換する必要があるんですか？ アプリのユーザーに色を選択させて、その作成した色も保存したいのなら、 Tstringsのまま保存した方が、色を復元するも楽ですよ。 const MY_COLOR_FILE = 'MyColors.dat'; procedure TForm1.Button1Click(Sender: TObject); begin //保存された色ファイルがあれば、読み込んで色を復元する if FileExists(MY_COLOR_FILE) then begin ColorDialog1.CustomColors.LoadFromFile(MY_COLOR_FILE); end; if ColorDialog1.Execute then begin RichEdit1.SelAttributes.Color := ColorDialog1.Color and $ffffff; ColorDialog1.CustomColors.SaveToFile(MY_COLOR_FILE); end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.