Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Refresh on pageframes
Message
From
14/06/2001 14:51:24
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
 
To
14/06/2001 14:13:45
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00519586
Message ID:
00519630
Views:
23
>A few years ago, we have found that Visual FoxPro doesn't refresh the pageframes when we call the Refresh() method. So, we came up with the following code in the Refresh() method:
>
>
>=AMEMBER(laMember,ThisForm,2)
>FOR lnCompteur=1 TO ALEN(laMember,1)
>   IF UPPER(EVALUATE('ThisForm.'+ALLTRIM(laMember[lnCompteur])+'.BaseClass'))='PAGEFRAME'
>      FOR lnCompteu2=1 TO EVALUATE('ThisForm.'+ALLTRIM(laMember[lnCompteur])+'.PageCount')
>
>         * We refresh each page of the pageframe
>         =EVAL('ThisForm.'+ALLTRIM(laMember[lnCompteur])+'.Page'+ALLTRIM(STR(lnCompteu2))+'.Refresh()')
>
>      NEXT
>   ENDIF
>NEXT
>
>
>Any comment on that? Is that still needed? Any better approach?

Michel,
Unfortunately still you need :( But might shorten the code :)
for each oControl in thisform.Controls
   if upper(oControl.BaseClass) = 'PAGEFRAME'
      for each oPage in oControl.Pages
         oPage.Refresh()
      endfor
   endif
endfor
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform