TScaledShape

pt 

Setborder

pt 

Setfill

pt 

Setshape

TGoogleBaseObject

AllowAdditionalProperties