引き続きFMXで同様のプログラムを作ろうと思います。10.3.2での動作を確認しています。ダークモードについてダークモードはWindows10に追加された色の設定で黒を選んだ状態です。デスクトップを右クリックしてWindows10の個人用設定を選択すると設定ダイアログが表示されます。設定ダイアログの左ペインの色を選び,色を選択するで設定を変更すると,ダークモードに変更できます。Tips)を見ていただければと思います。アプリーモードの白/黒の選択に追随してFMXのテーマを入れ替えます。ついでにアクセントカラーも拾っています。機能をユニットにほぼまとめました。イベント処理はFMXではWindows固有のものとして切り出したほうが良いと思いFormのUnitに残しています。カラーの変更end.このユニットを使ったアプリを作ります。フォームのコードは以下の通りです。フォームにRectangle1を貼り付けて,アクセントカラーを表示しています。切り替えるスタイルをリソースに読み込みます。プロジェクトメニューからリソースと画像を選びます。以下のようにスタイルを2つ追加し識別子を入れます。パブリックドキュメントのEmbarcaderoの中になります。Invalidate;end;end.Windows10のダークモードの変更に合わせて,FMXのテーマを変更するため,リソースに配置したスタイルを呼び出すようにしています。VCLでは簡単だったWindowsのメッセージ処理が追加されているので,少し複雑になってしまったかもしれません。ユニットのほうに押し込むことも可能ではなかったかと思います。したらすぐに動かなくなるかもしれませんが,皆様のお役に立てたらうれしいです。@pik貴重な情報を提供してくださった皆様,ありがとうございます。