Subject Re: Fields do not blank on "Append"
From Bob McKinney <bmckinney721@comcast.net>
Date Fri, 11 Aug 2017 09:12:05 -0400
Newsgroups dbase.getting-started

Hi Ken: Yes.  See my pushbutton code used in my toolbars.

class AddRowButton(oParent) of MyPushbutton(oParent) ;
        from "MyControls.cc" custom
   this.text := "Add Bill"
   fontSize = 8
   this.colorNormal = "Black/0x8080ff"
   function onClick
           form.rowset.beginAppend()
   return

   function onMouseOver
           this.colorNormal = "Black/Yellow"
   return

   function onMouseOut
           this.colorNormal = "BtnText/0x8080ff"
   return

endclass


    What is strange to me is that this code works as expected on some forms and not on others.  Thanks for the CB............Bob


VKen Mayer Wrote:

> On 8/10/2017 2:18 PM, Bob McKinney wrote:
> > Hi All:  At 94 I'm starting again.  Using w/10 w/db 2.8.  Tried to write a couple of simple forms for my own use.
> >      I have a couple of toolbars where clicking the Add button will blank the fields on append ready for data entry.  Some of my older forms work as expected.  The new ones actually seem to be in the Edit mode while the rowstate says "Append".
> >      I've compared the code to that in old forms and cannot see a difference.   MY activating  code = "set procedure to :BMCustom:mycontrols.cc additive"  Any help will be appreciated.............Bob
>
> Are you using:
>
> form.rowset.beginAppend()  to put them into append mode?
>
> Ken
>
>
> --
> *Ken Mayer*
> Ken's dBASE Page: http://www.goldenstag.net/dbase
> The dUFLP: http://www.goldenstag.net/dbase/index.htm#duflp
> dBASE Books: http://www.goldenstag.net/dbase/Books/dBASEBooks.htm dBASE
> Tutorial: http://www.goldenstag.net/dbase/Tutorial/00_Preface.htm