Hora en un dbgrid
 

Hola A tod@s, estoy trabajando con access, delphi7 y componentes Ado, tengo un dbgrid enlazado a traves de un Adoquery con consulta sql a un campo llamado [Hora].

El problema que tengo es que me muestra una fecha y seguido la hora que guarde cuando entro el usuario y yo solo quiero que me muestre la hora.

He buscado por los foros y no he encontrado nada. No se si alguien me podra echar una mano.

Un saludo y gracias.

Saludos

Busca la propiedad DisplayFormat del campo y establece el formato que deseas desplegar 'hh:mm:ss'. No lo he probado, solo supongo que funcionara;)

En el diseño de tu tabla de Access debes asignar el formato que desees, por ejemplo: "Hora corta", al campo Fecha/Hora, y eso bastará para que se muestre correctamente en Delphi.

Saludos.

Hola Vtdeleon no encuentro la Propiedad DisplayFormat del Dataset tengo el siguiente Código:

Código Delphi [-]
DataSAccesos.DataSet.Fields[1].dispalyFormat:='hh:nn:ss';

Me dice que identificador sin declarar.¿Me puedes decir como llamas tu a esa propiedad?

Gracias.

Saludos

Esa propiedad se consigue mediante el Editor de campo (Fields Editor) del dataset. Agregas los campos que tiene la tabla, seleccionas el campo, de inmediato aparece la propiedad en el Object Inspector.

Espero te Sirva
 

Código Delphi [-]
uses DateUtils;
Campo:=Timeof(Valor);

Campo puede ser cualquier TDateTime o TTime sea nativo de delphi o de la base de datos

Valor puede ser también TDateTime, TTime o TDate sea nativo d dlephi o de la base de datos

existe tambien un dateof( )

Gracias a los dos por responderme, en primer lugar he mirado lo que me dijiste Vtdeleon y sigo sin encontrar esa propiedad en el object inspector, debo ser un zoquete por que le he dado mil vueltas y no lo encuentro¿Esta dentro de las propiedades del adoquery o del Dbgrid?


Ronalg, no se a que te refieres cuando dices

¿Que propiedad del campo modificas?
¿A que te refieres con valor?:confused:

Gracias de nuevo a los dos un saludo.

Lo siento supuse
 

Supongo que para meter datos al campo del tipo DATE haces algo asi:

Código Delphi [-]
table.insert;
table.fieldbyname('hora').value:=Now;
o
table.fieldbyname('hora').value:=date();
o
table.fieldbyname('hora').value:=today();
o
table.fieldbyname('hora').value:=time;
o
//si estas usando un componente calendario
table.fieldbyname('hora').value:=calendario.date;
.
.
.
.
.
table.post

todos estos (now, date(), today(), time) contiene valores del tipo TDateTime que esta definido asi:

Código Delphi [-]
type TDateTime = type Double;

osea que contiene si o si la fecha y la hora siempre.

para sacar solo la hora sin la fecha debes hacer uso de DATEOF y para sacar solo la hora de TIMEOF, estas funciones estan en la unidad "DateUtils" que debes ponerla a mano en el USES de tu unidad.

Código Delphi [-]
table.insert;
table.fieldbyname('hora').value:=timeof(Now);
o
table.fieldbyname('hora').value:=timeof(date());
o
table.fieldbyname('hora').value:=timeof(today());
o
table.fieldbyname('hora').value:=timeof(time);
.
.
.
.
table.post

Esto extraera solo la hora.

espero te sirva

Hola

Disculpa mi insistencia pero, ya probaste la recomendación que te di de:

eso a mi me funciona perfectamente, a ti no??:confused:

Saludos

Yunerqui no se por que pero a mi no me funciona, el campo Hora de mi base de datos es del tipo Fecha/Hora y como mascara Hora Corta.

Ronalg, no lo hago asi, dado que trabajo con componentes AdoQuery, y hago consultas del tipo SELECT * FROM....

Gracias a los dos por intentar ayudarme, seguire investigando, si hay alguien que pueda hecharme una mano le estare muy agradecido.

Un saludo y gracias de nuevo.

Mejor tarde que nunca
 

Creo que me tardé un poco para esta respuesta, quezás ya encontraste la solución, pero de cualquier manera será útil para futuros usuarios con el mismo problema.

Tu me dices que:

Pero yo no te hablo de máscara sino de FORMATO, pon el formato a hora corta y después nos cuentas.

Saludos Yusnerqui

Hola Delphimaniacos:

(adoquery1.fieldbyname('fecha') AS TDateTimeField).DisplayFormat:= 'hh:nn:ss'

Saludos.

Hola Yusnerqui y Fernando ( por cierto, Tocayo mio;) ),me funcionó la solución de Fernando.Muchisimas gracias a los dos.

Un saludo.