FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Locate a una tipo date o time
Hola, de antemano gracias por la ayuda que me puedan prestar.
Tengo una base de datos en firebird 1.5, y una aplicacion hecha en Delphi 6, resulta que he tenido problemas al hacer locate sobre variables de tipo time o date. Para solucionar esto realizo combersiones de tipo, pero me parese algo redundante. por ejemplo tengo un MonthCalendar el caul quiero que al hacer click en una fecha determinada me localice o gurde la fecha si no existe, pero parese que al hacer click en una fecha el valor date del MonthCalendar no es un TDate sino algo asi como un TDatatime entonces captura la fecha y algo mas (hora) ya que al hacer el locate no encuentra la fecha, pero si hago un datetostr e igualo a una variable de tipo string y luego en el locate doy strtodate a esta variable funciona bien el locate. Pero me gustaria no tener que realizar la combersion de tipos, si me puede orientar le agradeceria muho. |
#2
|
||||
|
||||
Hola,
puedes usar la función Date() para olvidarte de la hora del MonthCalendar: En la ayuda de Delphi: Código:
function Date: TDateTime; Description Use Date to obtain the current local date as a TDateTime value. The time portion of the value is 0
__________________
Progress Openedge https://abevoelker.com/progress_open...dered_harmful/ Delphi forever... |
#3
|
|||
|
|||
Saludos.
La funcion "date" devuelve la fecha actual. Yo utilizo esta funcion para extraer la fecha: Espero que te sirva. Un saludo. |
#4
|
||||
|
||||
Cita:
Quería decir la función DateOf()
Salu2.
__________________
Progress Openedge https://abevoelker.com/progress_open...dered_harmful/ Delphi forever... |
#5
|
||||
|
||||
Muchas gracias
Ok gracias por sus respuestas si me dio con el "dateof"
|
#6
|
|||
|
|||
Cita:
Fecha:= Int(FechaYHora) que es bastante mas rapido que decodificar y codificar un Datetime. Saludos |
#7
|
||||
|
||||
Hola, mira lo que hace la función DateOf
__________________
Progress Openedge https://abevoelker.com/progress_open...dered_harmful/ Delphi forever... |
|
|
|