Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Buffering question.
Message
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00049037
Message ID:
00049201
Views:
56
>>>>>
>>>>>what is the code in the add/save button?
>>>>
>>>>The Add/Save button contains the following:
>>>>IF THIS.PARENT.Editbtn.ToolTipText="Edit Record" && Not in edit mode
>>>> mnaddcurrecschedule=RECNO()
>>>> APPEND BLANK
>>>> THISFORM.NullDisplayFields
>>>> THISFORM.Refresh
>>>>ELSE
>>>> Below the ELSE is the code for saving. I'm assuming you needed to see only the Add portion. In a nutshell, if you need to know, it ensures required fields are filled in, does a TABLEUPDATE and disables the fields.
>>>>ENDIF
>>>
>>>with row buffering, moving off the row does a tableupdate. are you sure there's nothing in the nullDisplayFields or Refresh that do this?
>>
>>The NullDisplayFields contains the following:
>>ThisForm.Rtgpageframe1.Page1.txtDescription.Value=""
>>ThisForm.Rtgpageframe1.Page1.cboLname.Value=""
>>ThisForm.Rtgpageframe1.Page1.cboLname.DisplayValue=""
>>ThisForm.Rtgpageframe1.Page1.txtFname.Value=""
>>ThisForm.Rtgpageframe1.Page1.txtCompany.Value=""
>>
>>The Refresh method is the default. No extra code has been added.
>
>where do you change the tooltips? any other code there?

YOU'RE A GENIUS!!! Thanks for all your effort in helping me dig through the code. My NewBtn.Click contains the line NavBtns::NewBtn.Click calling the classes .Click event which contains the line THIS.Parent.EnableDisableButtons which in turn contains the code:

nRec = RECNO()
GO TOP && TABLEUPDATE() automatically fires!!!
nTop = RECNO()
GO BOTTOM
nBottom = RECNO()
GO nRec

Thanks again. This is just another instance that proves an apps developer makes the apps worst debugger.
Colin Magee
Team Leader, Systems Development
Metroland Media Group Ltd.
Mississauga, Ontario, Canada

cmagee@metroland.com

Never mistake having a career with having a life.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform