The code in the Resize of the panel is running, so I know that oPanel is the correct reference.
>Are you sure that .pgfPages.Pages(iNewPage).Controls(1) returns reference to MyPanel?
>What happens if you try:
>
>oPage.AddObject("MyPanel", sPanelClass)
>
>** Get a reference to the panel
>oPanel = oPage.MyPanel
>WITH oPanel
>....
>ENDWITH
>
>
>>>>Ok, I'm really miffed here. I have no clue why this is happening.
>>>>
>>>>Here's the code that adds the panel to the page on the pageframe:
>>>>
>>>>
>>>>** Add the panel to the page
>>>>oPage.AddObject("MyPanel", sPanelClass)
>>>>
>>>>** Get a reference to the panel
>>>>oPanel = .pgfPages.Pages(iNewPage).Controls(1)
>>>>
>>>>** Set up the panel
>>>>WITH oPanel
>>>>
>>>> .Left = 0
>>>> .Top = 0
>>>> .Height = .Parent.Parent.Height
>>>> .Width = .Parent.Parent.Width
>>>> .Resize()
>>>> .Setup()
>>>> .Visible = TRUE
>>>>
>>>>ENDWITH
>>>>
>>>>
>>>>And here's the Resize code from the Panel class:
>>>>
>>>>
>>>>WITH This
>>>>
>>>> .shpBorder.Height = .Height - (.shpBorder.Top * 2)
>>>> .shpBorder.Width = .Width - (.shpBorder.Left * 2)
>>>>
>>>>ENDWITH
>>>>
>>>>RETURN
>>>>
>>>>
>>>>
>>>>When I step into the Resize, the .shpBorder object becomes inaccessable. When I step out of the resize,
>>>>the .shpBorder object is then accessable. While in Resize, all the shape's PEM's disappear.
>>>
>>>Yet another SWAG - do you need DODEFAULT() somewhere in your .Resize()?
>>
>>I tried. No help.
>>
>>I'm willing to try anything at this point, but again, I fail to see how this would have anything to
>>do with the PEM's disappearing.
Everything makes sense in someone's mind
public class SystemCrasher :ICrashable
In addition, an integer field is not for irrational people