Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Clear Read
Message
De
24/07/2001 11:45:41
Gerald McKinsey
Keystone Consulting Services, Inc.
Yorktown, Indiana, États-Unis
 
Information générale
Forum:
Visual FoxPro
Catégorie:
FoxPro 2.x
Titre:
Divers
Thread ID:
00534369
Message ID:
00534440
Vues:
12
Hello Tom,

In the Help file of FOX 26 go to the Top 20 Coding Errors. In there you will
find the fix for this problem.

HTH
Tim


>Hi again....
>
>I have some legacy code here in Foxpro 2.6.... and basically what we have is a screenset of 4 screens.
>
>We had to increase it to 6 screens, but we hit the "PROGRAM TOO LARGE" error when compiling now (it is tooooo large to compile).
>
>So, I broke the screenset up into 6 screens, and tried to call them when necessary, calling up the first one, then trying to RELEASE the screen, and bringing up another screen (like 3, 5, etc) when called.
>
>But the screens will not release the READ in effect. They continue to go increase until I exceed the 5 READ limit.
>
>So, any ideas of how I can get the READS to RELEASE between the screens??
>
>Here is some sample code called when jumping from screen to screen...
>
>*********************************************************************
>*-----------------------------------------------------------------
>* Activate the next window.
>*-----------------------------------------------------------------
>FUNCTION PageNext
> CLEAR READ
> DO CASE
> CASE WONTOP() = "QUAL01A"
> DO qual01b.spr
> CASE WONTOP() = "QUAL01B"
> DO qual01c.spr
> CASE WONTOP() = "QUAL01C"
> DO qual01d.spr
> CASE WONTOP() = "QUAL01D"
> DO qual01e.spr
> CASE WONTOP() = "QUAL01E"
> DO qual01f.spr
> ENDCASE
> RETURN(.T.)
>*********************************************************************
>
>Thanks....
>
>Tommy
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform