Discussion:
Frustrations on anchor=15 resizing not happening until I go off the page and come back to it
m***@mbsoftwaresolutions.com
2018-08-22 14:43:20 UTC
Permalink
VFP9SP2 using FoxCharts (1.37 and 1.46beta)

I've got FoxCharts working somewhat in my testing so far, but I can't
get the first showing page to fully resize automatically and some
trickery I've tried is driving me nuts. See 20-second demo showing my
frustration: https://www.screencast.com/t/jmTkdEl2xN

Ideas?

tia,
--Michael

_______________________________________________
Post Messages to: ***@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/***@mbsoftwaresolutions.com
** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Richard Kaye
2018-08-22 15:21:29 UTC
Permalink
Is the chart container magically zooming when you activate the 2nd page? If so, what code is executing at that time?

--

rk

-----Original Message-----
From: ProfoxTech <profoxtech-***@leafe.com> On Behalf Of ***@mbsoftwaresolutions.com
Sent: Wednesday, August 22, 2018 10:43 AM
To: ***@leafe.com
Subject: Frustrations on anchor=15 resizing not happening until I go off the page and come back to it

VFP9SP2 using FoxCharts (1.37 and 1.46beta)

I've got FoxCharts working somewhat in my testing so far, but I can't get the first showing page to fully resize automatically and some trickery I've tried is driving me nuts. See 20-second demo showing my
frustration: https://www.screencast.com/t/jmTkdEl2xN

Ideas?

tia,
--Michael


_______________________________________________
Post Messages to: ***@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/***@BN6PR10MB1299.namprd10.prod.outlook.com
** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
m***@mbsoftwaresolutions.com
2018-08-22 15:39:36 UTC
Permalink
Post by Richard Kaye
Is the chart container magically zooming when you activate the 2nd
page? If so, what code is executing at that time?
I used EVENTTRACKING to tell me. I set ET on in the pag1.Deactivate and
turned it back off in the pag1.Activate (so when I navigated back to
page1 it would shut off). Here's the pickup from page2's tracking:

41830.801, frmhelpdeskcharts.pgf.pag2.Activate()
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.title.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.subtitle.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.xaxis.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.yaxis.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.scalelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.axislegend2.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.shapelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.sidelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.tooltip.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.yaxis2.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.chartcanvas.UIEnable(.T.)
41830.802,
frmhelpdeskcharts.pgf.pag2.mychart.cmdchartoptions.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.title.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.subtitle.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.xaxis.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.yaxis.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.scalelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.axislegend2.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.shapelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.sidelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.tooltip.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.yaxis2.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.chartcanvas.UIEnable(.T.)
41830.802,
frmhelpdeskcharts.pgf.pag2.mychart.cmdchartoptions.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag1.mychart.Moved()
41830.802, frmhelpdeskcharts.pgf.pag1.mychart.Resize()
41830.802, xfcbitmap.Init(1740, 744, .F., .F., .F.)
41830.804, xfcgraphics.Init()
41830.804, xfcbitmap.Destroy()
41830.805, xfccolor.Init()
41830.809, xfccolor.Destroy()
41830.809, xfcfont(Arial, 16, 1, .F., .F., .F.)
41830.809, 41830.816, frmhelpdeskcharts.LostFocus()
41830.817, frmhelpdeskcharts.Deactivate()
41830.817, frmhelpdeskcharts.Paint()

I had tried forcing a thisform.Paint but that didn't make any
difference.

_______________________________________________
Post Messages to: ***@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/***@mbsoftwaresolutions.com
** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Dave Crozier
2018-08-23 13:49:29 UTC
Permalink
Have you tried putting the following on the Page Activate:

This.Refresh
DoDefault()
*
Return


Dave Crozier
Software Development Manager
Flexipol Packaging Ltd.

﴾⚆ᨎ⚆﴿



Flexipol® Packaging Ltd
T 01706 222 792
E ***@flexipol.co.uk
W https://www.flexipol.co.uk/
Follow us:
Unit 14 Bentwood Road, Carrs Industrial Estate, Haslingden, Lancashire, BB4 5HH

​This communication and the information it contains is intended for the person or organisation to whom it is addressed. Its contents are confidential and may be protected in law. If you have received this e-mail in error you must not copy, distribute or take any action in reliance on it. Unauthorised use, copying or disclosure of any of it may be unlawful. If you have received this message in error, please notify us immediately by telephone or email.

Flexipol Packaging Ltd. has taken every reasonable precaution to minimise the risk of virus transmission through email and therefore any files sent via e-mail will have been checked for known viruses. However, you are advised to run your own virus check before opening any attachments received as Flexipol Packaging Ltd will not in any event accept any liability whatsoever once an e-mail and/or any attachment is received.

It is the responsibility of the recipient to ensure that they have adequate virus protection.

-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
​​
​Terms & Conditions:
Notwithstanding delivery and the passing of risk in the goods, the property in the goods shall not pass to the buyer until the seller Flexipol Packaging Ltd. ("The Company") has received in cash or cleared funds payment in full of the price of the goods and all other goods agreed to be sold by the seller to the buyer for which payment is then due. Until such time as the property in the goods passes to the buyer, the buyer shall hold the goods as the seller's fiduciary agent and bailee and keep the goods separate from those of the buyer and third parties and properly stored protected and insured and identified as the seller's property but shall be entitled to resell or use the goods in the ordinary course of its business. Until such time as the property in the goods passes to the buyer the seller shall be entitled at any time
-----Original Message-----
From: ProFox <profox-***@leafe.com> On Behalf Of ***@mbsoftwaresolutions.com
Sent: 22 August 2018 16:40
To: ProFox Email List <***@leafe.com>
Subject: Re: Frustrations on anchor=15 resizing not happening until I go off the page and come back to it
Post by Richard Kaye
Is the chart container magically zooming when you activate the 2nd
page? If so, what code is executing at that time?
I used EVENTTRACKING to tell me. I set ET on in the pag1.Deactivate and turned it back off in the pag1.Activate (so when I navigated back to
page1 it would shut off). Here's the pickup from page2's tracking:

41830.801, frmhelpdeskcharts.pgf.pag2.Activate()
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.title.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.subtitle.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.xaxis.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.yaxis.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.scalelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.axislegend2.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.shapelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.sidelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.tooltip.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.yaxis2.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.chartcanvas.UIEnable(.T.)
41830.802,
frmhelpdeskcharts.pgf.pag2.mychart.cmdchartoptions.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.title.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.subtitle.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.xaxis.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.yaxis.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.scalelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.axislegend2.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.shapelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.sidelegend.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.tooltip.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.yaxis2.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.chartcanvas.UIEnable(.T.)
41830.802,
frmhelpdeskcharts.pgf.pag2.mychart.cmdchartoptions.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag2.mychart.UIEnable(.T.)
41830.802, frmhelpdeskcharts.pgf.pag1.mychart.Moved()
41830.802, frmhelpdeskcharts.pgf.pag1.mychart.Resize()
41830.802, xfcbitmap.Init(1740, 744, .F., .F., .F.) 41830.804, xfcgraphics.Init() 41830.804, xfcbitmap.Destroy() 41830.805, xfccolor.Init() 41830.809, xfccolor.Destroy() 41830.809, xfcfont(Arial, 16, 1, .F., .F., .F.) 41830.809, 41830.816, frmhelpdeskcharts.LostFocus() 41830.817, frmhelpdeskcharts.Deactivate() 41830.817, frmhelpdeskcharts.Paint()

I had tried forcing a thisform.Paint but that didn't make any difference.

[excessive quoting removed by server]

_______________________________________________
Post Messages to: ***@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/***@MM1P123MB0953.GBRP123.PROD.OUTLOOK.COM
** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious
m***@mbsoftwaresolutions.com
2018-08-22 16:18:04 UTC
Permalink
Post by m***@mbsoftwaresolutions.com
VFP9SP2 using FoxCharts (1.37 and 1.46beta)
I've got FoxCharts working somewhat in my testing so far, but I can't
get the first showing page to fully resize automatically and some
trickery I've tried is driving me nuts. See 20-second demo showing my
frustration: https://www.screencast.com/t/jmTkdEl2xN
Ideas?
tia,
--Michael
Solved it with this kludge in the form.init:

this.LockScreen = .T.
this.pgf.ActivePage = 2
this.pgf.ActivePage = 1
this.LockScreen = .F.

_______________________________________________
Post Messages to: ***@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/***@mbsoftwaresolutions.com
** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Richard Kaye
2018-08-22 16:44:04 UTC
Permalink
OK. I was going to say your eventracking looked a bit too tightly filtered. There should have been activate/deactivate events for the pageframe/pages. IAC you've got a working solution. 😊
--
rk

-----Original Message-----
From: ProfoxTech <profoxtech-***@leafe.com> On Behalf Of ***@mbsoftwaresolutions.com
Sent: Wednesday, August 22, 2018 12:18 PM
To: ***@leafe.com
Subject: Re: Frustrations on anchor=15 resizing not happening until I go off the page and come back to it (SOLVED)
Post by m***@mbsoftwaresolutions.com
VFP9SP2 using FoxCharts (1.37 and 1.46beta)
I've got FoxCharts working somewhat in my testing so far, but I can't
get the first showing page to fully resize automatically and some
trickery I've tried is driving me nuts. See 20-second demo showing my
frustration: https://www.screencast.com/t/jmTkdEl2xN
Ideas?
tia,
--Michael
Solved it with this kludge in the form.init:

this.LockScreen = .T.
this.pgf.ActivePage = 2
this.pgf.ActivePage = 1
this.LockScreen = .F.

_______________________________________________
Post Messages to: ***@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/***@BN6PR10MB1299.namprd10.prod.outlook.com
** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obv
Charlie-gm
2018-08-23 13:20:23 UTC
Permalink
I was going to suggest .lockscreen but I see you already found it :)

The .lockscreen approach will usually take care of a lot of visual
oddities (I used it frequently with OCX components).  Recall that VFP
"draws" its own display, and does not use the underlying Windows
"controls", etc.

So, yeah, in a way it is kind of a kludge, but it's probably more of a
specific need because Foxpro was bought, not developed, by MS.

-Charlie
Post by m***@mbsoftwaresolutions.com
Post by m***@mbsoftwaresolutions.com
VFP9SP2 using FoxCharts (1.37 and 1.46beta)
I've got FoxCharts working somewhat in my testing so far, but I can't
get the first showing page to fully resize automatically and some
trickery I've tried is driving me nuts.  See 20-second demo showing my
frustration:  https://www.screencast.com/t/jmTkdEl2xN
...
Post by m***@mbsoftwaresolutions.com
this.LockScreen = .T.
this.pgf.ActivePage = 2
this.pgf.ActivePage = 1
this.LockScreen = .F.
_______________________________________________
Post Messages to: ***@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/a7741464-ed32-6045-5e79-***@gmail.com
** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyer
Loading...