This getter method looks quite useless. It only does an evitable type cast, and can not be overridden (non-virtual).
property BorderStyle: TBorderStyle read FBorderStyle // GetBorderStyle
write SetBorderStyle default bsNone;
would be sufficient.DoDi
