Calendario

Fecha: 26-Jun-97
Autor: Guillermo Llanderas

Revisado el 23/Oct/97

Fecha: viernes 13 de junio de 1997 9:54
De: Guillermo Llanderas [email protected]

Hace tiempo necesit� un calendario para pedir las fechas y busqu� en tus p�ginas, pero no encontr� ninguno (aunque no las tengo actualizadas y puede que hayas puesto uno �ltimamente O:-) ).

En un CD encontr� un calendario hecho por un tal James Marlow y que posteriormente modific� un tal Eka que me gust�, sobre todo porque era freeware y era el c�digo fuente por lo que se pod�a personalizar.
Como no funcionaba bien debido al cambio de formato de fecha, lo retoqu� bastante.

Pulsa este link para bajar los listados para VB4-16bits (cale_gll.zip 12.5 KB)

Pulsa en este link para bajarte la versi�n revisada (Calengll.zip 12.8 KB)

Extracto del fichero Readme.txt

Revisi�n 29/05/97 del Calendario hecho por James Marlow y modificado por Eka
----------------------------------------------------------------------------

Si quieres consultarme algo, encuentras alg�n error o tienes alguna sugerencia
que hacer, me puedes encontrar en:

InterNet: [email protected]
FidoNet: 2:348/613.26
PoNet: 36:211/1.26

Guillermo de las Llanderas Fuentes

> ---------8<---------8<--------- CORTAR ---------8<---------8<---------


Este codigo es Freeware. Puedes usarlo, modificarlo y distribuirlo libremente.
De todas formas, deja una referencia de los que lo hemos 'tocado' antes como
recuerdo a nuestro trabajo. O:-)

Si lo usas es por tu cuenta y riesgo; yo no me responsabilizo de los posibles
problemas que pueda causar. En mis pruebas me ha funcionado perfectamente,
pero en esto de la informatica nunca se sabe...


Cambios hechos sobre la versi�n de Eka:

- Modificado el form para que salgan los literales en espa�ol.
- Modificado el form para que salga la columna del Domingo a la derecha.
- Adaptado el c�digo para que use el formato de fecha usado en Espa�a
(d�a/mes/a�o, en vez de mes/d�a/a�o).
- Cambio de los nombres de las funciones y variables, reestructuraci�n
del c�digo y comentarios para hacerlo un poco m s 'visible' (aunque
esto es muy discutible, depende de los gustos de cada uno).
- Corregido un error en el c lculo del m ximo n�mero de d�as de Febrero.
- A�adido un control de errores en todos los procedimientos y funciones
(para que la aplicaci�n siga ejecut ndose en caso de que haya un error).

Para usar el calendario:

- A�adir al proyecto el formulario Calendar.frm y el m�dulo Calendar.bas.
- Poner el fichero Calendar.frx en el mismo directorio que el formulario.
- Llamar a la funci�n fvGetDate para pedir la fecha. Esta funci�n devuelve
la fecha seleccionada o False si el usuario di� a Escape.
Ejemplo:
Text1.Text = fvGetDate(Date)

Teclas usadas para el control del calendario:

- Cursores: con izquierda/derecha se retrocede/avanza un d�a, y con flecha
arriba/abajo, se sube/baja una semana.
- Inicio/fin: se va al primer/�ltimo d�a del mes.
- P gina arriba/abajo: se retrocede/avanza un mes.
- Enter: se termina la ejecuci�n seleccionando la fecha actual.
- Escape: se termina la ejecuci�n si seleccionar ninguna fecha.

Se incluye un proyecto de ejemplo para mostrar el modo en que se puede usar el
calendario. En el proyecto se llama al formulario mediante un bot�n en forma
de calendario.

El fichero cal.bmp contiene la imagen con los botones de movimiento del form.
No es necesario para usar el calendario, pero s� para poder modificarlo.
Los ficheros CalenDw.bmp y CalenUp.bmp contienes las im genes mostradas en
el proyecto de ejemplo para representar al calendario.
El fichero Calendar.ico contiene el icono del proyecto y del formulario.