Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Grabar hora en Access (https://www.clubdelphi.com/foros/showthread.php?t=48443)

silver07 25-09-2007 16:34:32

Grabar hora en Access
 
Hola a todos, trabajo con Delphi-7 y Access 2003, en el cual tengo una tabla con un campo fecha y otro hora, y al grabar en la tabla por hora se registra la fecha tambien para esto utilizo DateTimePicker, me pregunto si alguien me podría ayudar con respecto a como grabar solo la fecha en el campo fecha y la hora en el campo hora utilizando estos componentes DateTimePicker.


Muchas gracias...

rodrigodeoz 25-09-2007 17:18:10

Saludos !!
Mira para aue no guardes la fecha el DateTimePicker Tiene una propiedad llamada Data ahi le cambias de DateTime A Time y listo te dara solo la hora y Tiene otra propiedad llamada Format donde eliges el formato en tu caso el formato de la hora si es hrs o es pm,am.

Esporo haberte ayudado

silver07 25-09-2007 17:31:51

Asunto
 
No entendí muy bien:cool:

Para grabar en la tabla lo hago de la siguiente manera:

Código Delphi [-]
Dtmodulo.ADOTactividades.FieldByName('Fecha').asDateTime:=DateTimePicker1.Date;
Dtmodulo.ADOTactividades.FieldByName('Hora').asDateTime:=DateTimePicker1.Time;

Y no me funciona de este modo en el caso de la hora, me guarda la fecha.

rodrigodeoz 25-09-2007 17:45:23

mira tienes que cambias asDateTime por asDate y asTime asi:

Cita:

Código Delphi [-]
Dtmodulo.ADOTactividades.FieldByName('Fecha').asDate:=DateTimePicker1.Date
Dtmodulo.ADOTactividades.FieldByName('Hora').asTime:=DateTimePicker1.Time;
;


silver07 26-09-2007 05:18:28

Asunto
 
Disculpa amigo pero en esa terminación .asDate y .asTime no me permite compilar el sistema...

Presenta el siguiente error:

Cita:

[Error] actividades.pas(119): Undeclared identifier: 'asDate'
[Error] actividades.pas(120): Undeclared identifier: 'asTime'
[Fatal Error] Sisconem.dpr(21): Could not compile used unit 'Formularios\actividades.pas'
Solo funciona si le coloco .asDateTime en ambos casos....:(

Lepe 26-09-2007 10:15:03

En ADO creo se utiliza siempre "Value" en lugar de AsDate, AsTime, etc.

Saludos

rodrigodeoz 26-09-2007 17:30:44

entonces utiliza la siguiente sintaxis:
Código Delphi [-]
parambyname('f').Value:=fecha.Date;

aldmoscardi 27-09-2007 03:32:42

pasar y mantenerel formato
 
hola, en verdad el accses es todo un tema para eso, pero bueno proba con esto
Código Delphi [-]
Dtmodulo.ADOTactividades.FieldByName('Fecha').asString := FormatDateTime('dd/MM/yyyy',DateTimePicker1.Date);
Dtmodulo.ADOTactividades.FieldByName('Hora').asString := FormatDateTime('hh:mm', DateTimePicker1.Time);

espero te sirva saludos y exitos


La franja horaria es GMT +2. Ahora son las 12:00:13.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi