Doh! Sweet - that worked. Thanks!

One other thing, the form is a very proportional 8-sided shape, and I thought when I made the array for the shape object it would basically put it into the same shape as the form, but slightly smaller. As you could see from the code you sent me last night, it is very strange looking and much smaller than I expected. Do you see anything obvious in my array points that would cause this?



>

>	.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
>>