empty date in xBrowse column

empty date in xBrowse column

Postby Detlef » Sat Sep 24, 2022 9:25 pm

Hi all,

is there a way to put an empty date into a xBrowse column with nEditType := EDIT_DATE?

I have the case of columns with empty date contents.
If a user triggers the datepicker control by accident or curiousity, there is no way to escape by leaving the column value empty.

Thanks for each hint.
Detlef
User avatar
Detlef
 
Posts: 205
Joined: Mon Feb 07, 2022 9:54 pm

Re: empty date in xBrowse column

Postby nageswaragunupudi » Sun Sep 25, 2022 7:12 am

If the original value is empty date, even after dtpicker is activated, pressing Esc restores the original value of empty date.

Also, please add this code:
Code: Select all  Expand view
oCol:bKeyDown := { |k,f,br,col| If( k == 32, ( col:VarPut( CTOD( "" ) ), 0 ), nil ) }


If the original value is not an empty date, pressing Space key while on the cell makes it empty.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10295
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: empty date in xBrowse column

Postby Detlef » Sun Sep 25, 2022 7:02 pm

Many thanks, Mr. Rao
both tips are working fine.
User avatar
Detlef
 
Posts: 205
Joined: Mon Feb 07, 2022 9:54 pm


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 24 guests