Some Properties to TPanel (so much needed) lazarus / 7-LCL ---------------------------------------------------------------------- Gald · 2020-10-25 15:12 Actual: BevelColor BevelInner BevelOuter BevelWidth Improved: BevelInner BevelInnerWidth BevelInnerColor BevelOuter BevelOuterWidth BevelOuterColor There's only one Color and Width to both, Inner and Outer, so they are mixing together. This little improvement will change everything! --- An additional request is that we have BevelStyles bvLowered, bvNone, bvRaised and bvSpace. Honestly, I can't see the difference between them. Sorry.  It's possible to add bvShadow and bvGlow? ---------------------------------------------------------------------- Blaazen · 2020-10-25 15:53 @ Honestly, I can't see the difference between them. Sorry. They make different visual 3D effects in combination: BevelOuterBevelInnerEffectbvRaisedbvNoneraised box (default)bvLoweredbvNonelowered boxbvRaisedbvLoweredraised framebvLoweredbvRaisedlowered frame See also TBevel. It can draw simiral bevels but it is not a container. ---------------------------------------------------------------------- AlexTP · 2020-10-25 16:56 So you suggest to add BevelInnerWidth BevelInnerColor BevelOuterWidth BevelOuterColor ? I do not agree, they are very rarely needed, do this painting in OnPaint. ---------------------------------------------------------------------- lainz · 2020-10-25 16:58 Create your own custom panel, is hard to modify old code that is supposed to work in a retro compatible way. ---------------------------------------------------------------------- Gald · 2020-10-25 17:42 QuoteThey make different visual 3D effects in combination Okay, it seems to work only when BevelColor is clDefault. QuoteSee also TBevel. It can draw similar Bevels but it is not a container. I saw that, but TBevel doesn't have colors while TShape doesn't have TopLine, BottonLine, LeftLine and RightLine, like a TBevel. And like you said, it is not a container. The real good thing should be a TPanel with: BevelTopInner BevelTopInnerWidth BevelTopInnerColor BevelTopOuter BevelTopOuterWidth BevelTopOuterColor BevelLeftInner BevelLeftInnerWidth BevelLeftInnerColor BevelLeftOuter BevelLeftOuterWidth BevelLeftOuterColor BevelRightInner BevelRightInnerWidth BevelRightInnerColor BevelRightOuter BevelRightOuterWidth BevelRightOuterColor BevelBottomInner BevelBottomInnerWidth BevelBottomInnerColor BevelBottomOuter BevelBottomOuterWidth BevelBottomOuterColor I've made a quickie sample to demonstrate what I mean.