>LOCAL ARRAY laShapePoints[8,2] > >laShapePoints[1,1] = 50 >laShapePoints[1,2] = 5 >laShapePoints[2,1] = 400 >laShapePoints[2,2] = 5 >laShapePoints[3,1] = 420 >laShapePoints[3,2] = 25 >laShapePoints[4,1] = 420 >laShapePoints[4,2] = 100 >laShapePoints[5,1] = 400 >laShapePoints[5,2] = 120 >laShapePoints[6,1] = 50 >laShapePoints[6,2] = 120 >laShapePoints[7,1] = 30 >laShapePoints[7,2] = 100 >laShapePoints[8,1] = 30 >laShapePoints[8,2] = 25 > >THIS.ADDOBJECT("shpBackground", "shape") >THIS.shpBackGround.PolyPoints = "laShapePoints" >THIS.shpBackGround.BackColor = RGB(171,250,173) >THIS.shpBackGround.zOrder(1) >THIS.shpBackGround.Visible = .T. >