Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Web-site screwing with web-browser.
Message
General information
Forum:
Visual FoxPro
Category:
Internet applications
Miscellaneous
Thread ID:
00895262
Message ID:
00895326
Views:
17
Bill,

Is there a question in there somewhere, or did you just post this as information? Since you didn't specify which web site is doing this to your form, it's hard to try to reproduce it to see what you're talking about. The site in question may be doing some resizing of the browser or something like that.

>I'm using VFP 7.0
>
>
>define myForm as form
>  this.oResize = newobject( 'myResize' )
>  this.oBrowser = newobject( 'myBrowser' )
>  this.oBrowser.top = 5
>  this.oBrowser.left = 5
>  this.width = this.oBrowser.width + 10
>  this.height = this.oBrowser.height + 10
>
>  procedure resize
>    this.oResize.Resize(this)
>end define
>
>define myBrowser as container
>  this.oWeb = newobject( 'Web' )       && web-browser control
>  this.oWeb.top = 50
>  this.oWeb.left = 5
>  this.oWeb.height = this.height - 55
>  this.oWeb.width = this.width - 10
>
>  ..... other controls ( back, stop, location, etc.) added above oWeb
>end define
>
>One particular web-site screws up my display. When I change to a particular page, the web-site completely fills myForm hiding all the controls on myBrowser. I've checked the location of oWeb and it still shows oWeb.top = 50 and oWeb.left = 5 (which should have the top be 55 relative to the form). It's as if oWeb.top = -5.
>The web-site is being displayed outside of oWeb.
>
>If I resize the form (which kicks in my resize control), the display is corrected to the correct size and location. As soon as oWeb.height or oWeb.width is changed, the display is immediately corrected.
>
>I managed to get it to correct itself by putting in
>
>..oWeb.heigt = ..oWeb.height + 1
>..oWeb.heigt = ..oWeb.height - 1
>
>as soon as the document finishes loading.
>But the display is an ugly jerk.
>
>
>TIA
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform