property BorderSize: Integer read FBorderSize write SetBorderSize default 0;