Samples にある TGauge のコンポーネントを
ちょっとだけ変更したいのですが、
ちょっとの変更でも TGauge から派生させて作らないと
いけないのでしょうか?
やりたいことは
1.property TextType の追加
2.TextType により Text の表示を変更
具体的には
TTextType = (ttDefault, ttCount, ttReport)
を作成し
Default:(Progress/MaxValue)%
Count:(Progress)回
Report: (Progress)/(MaxValue)
の表示切替をしたいだけなんですけど。
Sourceの中のGauge.cpp を変更してから
どうやって、コンパイルするんでしょうか?
別案として...
TGauge.ShowText = False
TLabelをTGaugeに重ねて置いて、Transparent=True で使う。
ツイート | ![]() |