Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Strange Problem - Height & Width Not Found
Message
From
29/10/2007 16:21:07
Al Doman (Online)
M3 Enterprises Inc.
North Vancouver, British Columbia, Canada
 
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Miscellaneous
Thread ID:
01264812
Message ID:
01264900
Views:
11
>>>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.

Do you have any ActiveXs anywhere?

Can you try CLEAR DEBUG, renaming your FOXUSER file etc.?
Regards. Al

"Violence is the last refuge of the incompetent." -- Isaac Asimov
"Never let your sense of morals prevent you from doing what is right." -- Isaac Asimov

Neither a despot, nor a doormat, be

Every app wants to be a database app when it grows up
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform