Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   EncodeDateTime (https://www.clubdelphi.com/foros/showthread.php?t=43912)

mjjj 23-05-2007 20:35:30

EncodeDateTime
 
Amigos se me presento el siguiente problema...

Necesito graficar una variable con respecto al tiempo... el tiempo debe reflejar el dia como la hora correspondiente.

Cree un TChar, con la serie Point... en donde el eje horizontal le puse la opcion DateTime.

Hasta aqui todo bien... ingrese a la pagina www.delphibasics.co.uk y busque algun comando que me pudiera servir... aureca... encodeDateTime.

DecodeDate(dia, y, M, d);
DecodeTime(hora, h,min,seg,mseg);
Fecha:=EncodeDateTime(y,M,d,h,min,seg,mseg);

Las variables dia y hora las obtengo de una tabla... decodifico estas varibles para obtener cada item por separado, con la funcion decode...

Hasta aqui seguimos bien... el problema surge cuando quiero codificar mi nuevo TdateTime... la funcion encodeDateTime... no la reconoce mi Delphi
Estoy trabajando con Delphi 2006

Lo que pretendia hacer era graficar la variable fecha, que contenia el dia y la hora, con respecto a otra variable...

Existe otra manera de hacer esto?? ... porque no reconoce Delphi esta instruccion, siendo que la saque de una pagina oficial?? ... creo...

Espero me puedan ayudar....

Gracias... Saludos

marcoszorrilla 23-05-2007 23:52:01

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,
Cita:

Unit

DateUtils

Category

datetime routines

Delphi syntax:

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


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

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