Compañeros:
Quiero implantar en un nuevo sistema que estoy diseñando el control MonthCal.
Alguien sabe como utilizarlo? Seria muy bueno algun pequeño ejemplo
Mil gracias.
LORENZO
Board index FiveWin para Harbour/xHarbour Implantar el control MonthCal
Ola.
Tente assim..
Abraços..
Tente assim..
oDTal:= TMonthCal():New( oDlg,4001) // ID 4001
oDtal:bSelect := { |lChange| IF( !lChange, ( cData:= oDtAl:dVar,PegaData(cData,oget)),Nil)}
oDTal:CTOOLTIP:="De Duplo Click para Selecionar"+CRLF+"uma Data de lançamento"
function PegaData(cData,oget)
oGet[1]:Refresh()
return .t.Abraços..