Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Class Code not fired without Scope Resolution
Message
From
26/01/2007 09:28:01
Gary Foster
Pointsource Consulting LLC
Chanhassen, Minnesota, United States
 
 
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Environment versions
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP SP2
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01189501
Message ID:
01189562
Views:
7
Assuming that mclNext::Click() is not the next method in the object chain, you might check for even a single space in the immediate parent class. That's almost invisible and will stop the calling chain.

Gary

>I have a series of rec navigation button classes, set in a container, with .Click() code as, for example the below "Go to next record" button: mclNext
>
>Select ( thisform.cpAlias)
>If not EOF()
>    Skip 1
>    If EOF()
>	Go BOTTOM
>	This.Enabled                 = .F.
>	This.Parent.cmdLast.Enabled  = .F.
>    Endif
>    With This.Parent
>      .cmdPrev.Enabled                = .T.
>      .cmdFirst.Enabled               = .T.
>    EndWith
>EndIf not EOF()
>Thisform.Refresh
>
>
>thisform.cpAlias is a text prop bearing the name of the form's subject table
>
>Now I often use this is conjunction with other commands, e.g. when the user clicks the Next button, and the next record is reached, I want certain other data to be got, certain things diplayed, etc. So I often embed in the form button's .Click() things like:
>
>
>mclNext::Click()
>Thisform.lmGetRouteDetails()
>
>
>On my latest form, though, all I want is the next record, so I leave the .click() empty, to do the default class code. But when I click the button nothing happens. In Trace it doesn't go into the class code. So I have to include
>
>mclNext::Click()
>
>in the .Click() method to make it work.
>
>Wassup with that?
>
>'ppreciate it
>
>Terry
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform