Get fecha ?

[leandro]

Amigos del foro tenga buena tarde

Quiero hacer una validacion con un get tipo fecha, pero que si la captura es erronea salga un dialogo para escoger la fecha con el calendario (visual). Algun ejemplo o sugerencia?

De antemano gracias.

[jose_murugosa]

Puedes usar o bien las funciones de calendario de FWH fwcalen o en la clase BtnGet32 hay una función fwcal que muestra un calendario al presionar un botón.
_ también ha trabajado con un control que usa el calendario de windows.
Todos estos calendarios los encontrarás en FWH y en el foro de utilidades bajo la clase BtnGet.

Al menos esto es lo que se me ocurre a mí.

[Manuel Valdenebro]

Quiero hacer una validacion con un get tipo fecha, pero que si la captura es erronea salga un dialogo para escoger la fecha con el calendario (visual).

Leandro, no entiendo que quieres decir con "si la captura es errónea".- ¿Fecha vacia?.-

Yo lo tengo de la siguiente manera:

Una variable (get) normal con la fecha que el usuario puede modificar libremente.- Junto al GET, un pequeño BOTTOMBMP que si se pulsa sale el calendario para elegir una nueva fecha o <Escape>.-

Seguramente voy a ir a Bogotá en Octubre. Me tienes que invitar a un tinto.

[leandro]

Amigo asi lo tengo.... y lo estoy haciendo con la clase de _....

Coloque un get y al lado esta un boton.... Pero lo que quiero hacer es que por ejemplo si el usuario escribe...

37/07/2006 entonces salga la ventanita o si lo dejan en blanco como tu dices..

Y por otro lado claro si amigo aqui te espero y de paso si quieres te llevo a conocer unas partes de este hermoso pais.. saludos

[Manuel Valdenebro]

En primer lugar, si la variable o el campo, es tipo fecha, nunca te va a permitir que pongas 37/07/2006.- Para ello, tendriamos que tener definida la variable como dFecha := DATE() o dFecha := CTOD(" / / ").

Para que no admita campo vacio:
... GET dFecha VALID IF (EMPTY(dFecha), ( Alert ("Fecha vacia"), .f.) , ;
.t.)

Incluso, si te gusta mas:

... GET dFecha VALID IF (EMPTY(dFecha), dFecha := (fCalen), .t.) , ;
.t.)

Siendo en este caso fCalen la función donde está el calendario.

[leandro]

Amigos muchas gracias por las sugerencias, manuel voy a probar la tuya y te comento...

Pero...

_ me gustaria saber como se usa el DTPicker pero no encuentro el ejemplo en la carpeta samples de FW, de casualidad no tienes un ejemplo...