Código Delphi
[-]
procedure TForm1.Table1HireDateGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
begin
Text := FormatDateTime('hh:nn',Table1HireDate.AsDateTime);
end;
El campo se llama HireDate, es de la base de datos DBDemos que incluye delphi.
Haz Doble clic sobre tu tabla, señala el campo de tipo Fecha, y ahora en el inspector de objetos, en los eventos, tienes el GetText.
Cualquier Control que use este dataset para mostrar la hora, mostrará solo la hora y minutos.
En lugar de hacerlo directamente sobre la tabla, igual te conviene hacerlo solo en las consultas (para mostrarlo en el grid).
Un saludo
03-06-2005
Modo Hilado