.oPopUpInfoForm.shpBackGround.PolyPoints = "THISFORM.laShapePoints"

>I just can't get the shape for this form to display. This does display an irregularly shaped form, but the shape that should be inside it is never displayed. No errors, just don't see it. The PopupInfo form already has a property created for the laShapePoints array.
>
>In the calling form:
>
>

>
>WITH THIS
>	.oPopUpInfoForm = CREATEOBJECT("PopupInfo")
>	.oPopUpInfoForm.AlwaysOnTop = .T.
>	.oPopUpInfoForm.AutoCenter = .T.
>
>	.oPopUpInfoForm.ADDOBJECT("shpBackground", "shape")
>	.oPopUpInfoForm.shpBackGround.Top = 25
>	.oPopUpInfoForm.shpBackGround.Left = 25
>	.oPopUpInfoForm.shpBackGround.FillStyle = 0
>	.oPopUpInfoForm.shpBackGround.FillColor = RGB(171,250,173)
>	.oPopUpInfoForm.shpBackGround.PolyPoints = "THISFORM.oPopUpInfoForm.laShapePoints"
>	.oPopUpInfoForm.shpBackGround.Visible = .T.
>
>ENDWITH
>

>
>Then in the the INIT of the called form (PopupInfo in the class):
>
>

>DIMENSION laFormPoints[9,2]
>
>laFormPoints[1,1] = 50
>laFormPoints[1,2] = 0
>laFormPoints[2,1] = 400
>laFormPoints[2,2] = 0
>laFormPoints[3,1] = 425
>laFormPoints[3,2] = 25
>laFormPoints[4,1] = 425
>laFormPoints[4,2] = 100
>laFormPoints[5,1] = 400
>laFormPoints[5,2] = 125
>laFormPoints[6,1] = 50
>laFormPoints[6,2] = 125
>laFormPoints[7,1] = 25
>laFormPoints[7,2] = 100
>laFormPoints[8,1] = 25
>laFormPoints[8,2] = 25
>laFormPoints[9,1] = 50
>laFormPoints[9,2] = 0
>
>THIS.oTrans.SetFormUDF(THIS, @laFormPoints)
>
>WITH THISFORM
>
>	BumpX = 5
>	BumpY = 5
>
>	DIMENSION .laShapePoints[9,2]
>
>	.laShapePoints[1,1] = 50  + BumpX
>	.laShapePoints[1,2] = 0   + BumpY
>	.laShapePoints[2,1] = 400 - BumpX
>	.laShapePoints[2,2] = 0   + BumpY
>	.laShapePoints[3,1] = 425 - BumpX
>	.laShapePoints[3,2] = 25  + BumpY
>	.laShapePoints[4,1] = 425 - BumpX
>	.laShapePoints[4,2] = 100 - BumpY
>	.laShapePoints[5,1] = 400 - BumpX
>	.laShapePoints[5,2] = 125 - BumpY
>	.laShapePoints[6,1] = 50  + BumpX
>	.laShapePoints[6,2] = 125 - BumpY
>	.laShapePoints[7,1] = 25  + BumpX
>	.laShapePoints[7,2] = 100 - BumpY
>	.laShapePoints[8,1] = 25  + BumpX
>	.laShapePoints[8,2] = 25  + BumpY
>	.laShapePoints[9,1] = 50  + BumpX
>	.laShapePoints[9,2] = 0   + BumpY
>
>	.oTrans.SetFormUDF(THIS, .laShapePoints)
>
>ENDWITH
>