プログレスバーの枠だけ使う (ID:38962)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 KHE00221さんへもちろんテーマサービスは動いていて 最初のコードの「ここでCANVASの描画処理」に aCanvas.Brush.Color := Self.Color; acanvas.FillRect(R); あり、うまく枠だけになっています。 それ以外の処理はありません。 テーマサービスがOFFの場合は、下の部分は無意味と思うので これに代わる何かをすればいいと考えたのですが。 どうでしょうか？ R := ThemeServices.ContentRect(aCanvas.Handle, Detail, R);