Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Passing a record from one form to another
Message
 
À
29/06/1997 03:31:00
Dragan Nedeljkovich (En ligne)
Now officially retired
Zrenjanin, Serbia
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00037608
Message ID:
00038175
Vues:
48
>> returning to the top of the table. But, and this is the aggravating part:
>> if I am stepping through with the debugger, it doesn't happen. Anything
>> that stops the flow of the program as the form is loading and displaying
>> removes the error. Using a .3 second throttle, I still get the error. It
>> seems to go to the top after most, or all, the inits, when the form is
>> being displayed. I use the .navrefresh method from the txtbtns class of
>> wizstyle.vcx. The error seems to happen after this method is executed.
>> Any suggestions?
>
>..navrefresh seems to forcibly go top (or bottom) or whatever, depending
>on some circumstances - I've changed it so much I don't remember what it
>looked like, but I remember having problems with it being too hard on
>some of its defaults, and I had to lobotomize it a lot.
>
>Why not just add a FoundRecord property to the form, put
>This.FoundRecord=RecNo() in the init, and in some event (can't guess the
>proper place now), issue a Go ThisForm.FoundRecord.

I can't guess the proper place either. Instead of GOTO recordnum I am using LOCATE FOR keyfield = keyvalue. I tried repeating the LOCATE after the navrefresh. Even though there is nothing in the .Init after that line, it didn't help. There is nothing else I can think of being executed after the Form.Init when I load the form, except for a couple of .Refresh events. I ended up using =INKEY(.5) before the DO FORM to make the problem go away. I have another application with a similar sequence of events, in which this problem is not happening. In the other application, the form is part of a formset, and there are many more objects on the form.

Navrefresh mainly just does SKIP, IF EOF() (disable the bottom and next buttons), SKIP -1, IF BOF() (disable the top and previous buttons).
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform