2 respuestas en este tema

[enecumene]

Bueno, aquí­ dejo una pequeña función que hice que en su momento me fue útil, es para combinar valores de tipo TDate y TTime en uno TDateTime:

delphi

function TiempoCompleto(Fecha: TDate; Hora: TTime): String;
var FechaHora: TDateTime;
begin
  FechaHora := Int(Fecha) + Frac(Hora);
  Result := DateTimeToStr(FechaHora);
end;

Es una chapuza sí­, pero a más de uno le será útil .

Saludos.

[Caro]

Hola amiguito, en ves de DateToStr debes utilizar DateTimeToStr supongo que se te ha ido, también puedes usar las funciones DateOf y  TimeOf

fecha := DateOf(fecha)+TimeOf(hora);

Saluditos

[enecumene]

Gracias amiguita Caro, lo habí­a hecho al vuelo y se me pasó :$.

Saludos