Source position: barchart.pp line 50
published property TBar.SName : string read FSName write SetSName;