Algun ejemplo de GET usando FWCalendar

[noe aburto]

Saludos.

Examinando varios programas y fwcalendar, no he encontrado si es posible crear un get directo
y poder pegarle un button para hacer el llamado de fwcalendar.

REDEFINE GET..... o @ 0,0 GET oFec VAR dFec...

Si alguien tuviera algo al respecto o semejante ma ayudaria.

Gracias

Fwh 8.11, xH 1.1 bCC5.5

[Manuel Aranda]

No sé si te refieres a esto:

REDEFINE DTPICKER oGet VAR dFecha ID 451 OF oDlg

[rolitocere]

Saludos.

Examinando varios programas y fwcalendar, no he encontrado si es posible crear un get directo
y poder pegarle un button para hacer el llamado de fwcalendar.

REDEFINE GET..... o @ 0,0 GET oFec VAR dFec...

Si alguien tuviera algo al respecto o semejante ma ayudaria.

Gracias

Fwh 8.11, xH 1.1 bCC5.5

Hola Noe,

Yo lo uso así (con btnget)

Code: Select all

redefine btnget oFechaIn VAR dFechaIn ID 4002 OF oDlg RESOURCE "Calen" SPINNER;
          on up (++dFechaIn,oFechaIn:Refresh())  ;
          on down (--dFechaIn,oFechaIn:Refresh())  ;
          action (aFechaIn := GetCoors(oFechaIn:hWnd),;
          dFechaIn:=FwCalendar(dFechaIn,aFechaIn[1],aFechaIn[4],oDlg,;
          nRGB(200,200,200),nRGB(100,100,100),;
          nRGB(168,45,69),{nRGB(232,242,255),CLR_BLUE} ),;
          oFechaIn:Refresh() )
 

Rolis

[mmercado]

Hola Noe:

Examinando varios programas y fwcalendar, no he encontrado si es posible crear un get directo
y poder pegarle un button para hacer el llamado de fwcalendar.

Aquí puedes descargar un ejemplo de la última revisión de FwCalendar.prg:
http://www.box.net/shared/fdxvklpejh

Es parte de TSBrowse V.9.0 pero puede ser usado desde cualquier programa.

Guárdalo en \Fwh\Samples y compílalo con Buildx.bat o Buildh.bat.

Espero te sea de utilidad.

Un abrazo.

Manuel Mercado Gómez.

[Kleyber]

Aprovechando el tema... Maestro Manuel, no te olvides de mi... has recibido mi email?