Custom TPanel Border
-
14-04-2021 - |
Question
I can make TPanel Border as Black by disabling "Ctl3D" and TPanel Border Style as "bsSingle" and TPanel BevelKind as "bkNone" and TPanel BevelInner "bvNone". But my need is to make TPanel Border as "Blue" or "Red". The other way is to "Caliing Form Paint Event" but I do not wish to use it. Please help me.
Solution
Your only way to go is:
- Study
TCustomPanel.Paint
code inVcl.ExtCtrls.pas
and - Override it in
TPanel
(class) to tailor it to your requirement;
You may use a interposer class in the form unit containing your panel.
Licensed under: CC-BY-SA with attribution
Not affiliated with StackOverflow