EncodeDateTime

[marcoszorrilla]

No he probado con el 2.006, pero porque no pruebas símplemente.

Código Delphi [-]
Fecha:=Now;

Edito, me he dado cuenta que tu pregunta no era esa, mira este código que pongo creo te servirá, la funciones que aludes no la conozco.

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
var
d,m,y,hr,mn,ss,ms:Word;
MiFechaYHora:TDateTime;
begin
d:=23;
m:=5;
y:=2007;
hr:=20;
mn:=10;
ss:=5;
ms:=1;
MiFechayHora:=EncodeDate(y,m,d)+EnCodeTime(hr,mn,ss,ms);
ShowMessage(FormatDateTime('dd/mm/yyyy hh:mm:ss:zzz',MiFechayHora));
end;

Vuelvo a editar, estaba mirando en Delphi 5, pero resulta que ya en Delphi y esta presente la función que mencionas,

Unit

DateUtils

Category

datetime routines

Delphi syntax:

function EncodeDateTime(const AYear, AMonth, ADay, AHour, AMinute, ASecond, AMilliSecond: Word):TDateTime;

Un Saludo.