In current version of FWPPC this command is invalid:
Code: Select all
@ 20, 20 DTPicker oDTP Var dDate Size 80, 20 Pixel On Change DTPChange (oDTP)
Regards
Pawel
Test procedure:
Code: Select all
Function TestH ()
Local oWnd := Nil
Local oDTP := Nil
Local dDate := Date ()
Define Window oWnd
@ 20, 20 DTPicker oDTP Var dDate Size 80, 20 Pixel On Change DTPChange (oDTP)
Activate Window oWnd
Return .T.
Function DTPChange (oDTP)
LOcal dDate := oDTP : GetDate ()
Return .T.