Ni DBLCLICK ni ACTION funcionan en FWH-24.09 ni FWH-23.10. Cómo puedo hacerlo funcionar ?
- Code: Select all Expand view
- #include "FiveWin.ch"
#include "calendar.ch"
FUNCTION Main()
LOCAL oWnd, oCal
LOCAL dDate1
SET DATE TO BRITISH
SET EPOCH TO 1980
dDate1 = Date()
DEFINE WINDOW oWnd TITLE "Test Calendar" FROM 0, 0 TO 300, 300 PIXEL
@ 15, 15 CALENDAR oCal VAR dDate1 OF oWnd PIXEL DAYSTATE DBLCLICK MsgInfo(DTOC(dDate1))
oWnd:Center()
ACTIVATE WINDOW oWnd
RETURN NIL
Gracias por la ayuda,