Good call, Gary
That made me think. As I said, I'd put these nav buttons in a container. I checked my nav buttons container, complete with its set of buttons, and found I'd put:
Thisform.nOldRec = RECNO()
in the .click() of each, thus hijacking their native code.
Du-UH!
Thing is, though, in my defence, I made the classes years ago but this is the first time I've used the buttons stand-alone, asdescribed in my initial question.
>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.
Cheers
Terry
>
>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
- Whoever said that women are the weaker sex never tried to wrest the bedclothes off one in the middle of the night
- Worry is the interest you pay, in advance, for a loan that you may never need to take out.