Problem with TMPICKER not firing :bChange

[fraxzi]

HI All,

Anyone experience this?

.PRG

Code: Select all | Expand

FUNCTION uIssues() LOCAL oDlg,;       oFld LOCAL aVar := { cToD(''),;                 cToT('') }       aGet := Array( Len(aVar) ) DEFINE DIALOG oDlg RESOURCE 'DLG_ZZZTEST';        PIXEL        REDEFINE DTPICKER aGet[ 1 ] VAR aVar[ 1 ];                 ID 1001 OF oDlg UPDATE;                 PICTURE 'MM/DD/YYYY'        REDEFINE TMPICKER aGet[ 2 ] VAR aVar[ 2 ];                 ID 1002 OF oDlg  UPDATE ACTIVATE DIALOG oDlg;          ON INIT ( aGet[1]:bchange := {|| Msginfo('Date Changed')},;                        aGet[2]:bchange := {|| Msginfo('Time Changed')} )RETURN( NIL ) 

.RC

Code: Select all | Expand

DLG_XXXTEST DIALOGEX 0,0,284,123FONT 9,"Verdana"STYLE WS_CHILDWINDOW|WS_VISIBLEBEGIN  CONTROL "",1001,"SysDateTimePick32",WS_VISIBLE|WS_DISABLED|WS_TABSTOP|DTS_SHOWNONE,14,16,61,13  CONTROL "",1002,"SysDateTimePick32",WS_VISIBLE|WS_DISABLED|WS_TABSTOP|DTS_TIMEFORMAT|DTS_SHOWNONE,14,32,61,13END 

[nageswaragunupudi]

bChange of TimePicker is not working now.
This will work in next release 18.05

[fraxzi]

Thanks Mr. Rao!