vclスタイルを有効にすると、ネイティブプログレスバーをどのように使用できますか？

Question

私はこのquestionを読み、受け入れ答えが正常に動作しますが、今私はネイティブのプログレスバー私はネイティブを使用するにはどうすればよい

を描く必要がある、pbstMarqueeスタイルでプログレスバーを使用する必要がありますvclスタイルが有効になっているときのプログレスバー？

Answer 1

デフォルトのvclスタイルのフックTStyleHookをTProgressBarコンポーネントに割り当てて、プログレスバーをWindowsのルックアンドフィールで描画します。

TStyleManager.Engine.RegisterStyleHook(TProgressBar, TStyleHook); 

Answer 2

デルファイ：Form1.ProgressBar1.StyleElements := [seClient, seBorder, seFont];

C++：Form1->ProgressBar1->StyleElements = TStyleElements();