convertir fecha en entero

[sandra mendoza]

Buenas tardes

Necesito ayuda sobre cómo convertir una fecha tipo date o un string en formato fecha (12/01/2008) en entero. Es decir, necesito extraer el año, el mes y el dia.

Muchas gracias por la ayuda q me puedan brindar :)

[egostar]

Buenas tardes

Necesito ayuda sobre cómo convertir una fecha tipo date o un string en formato fecha (12/01/2008) en entero. Es decir, necesito extraer el año, el mes y el dia.

Muchas gracias por la ayuda q me puedan brindar :)

Hola sandra mendoza

Puedes usar la funcion DecodeDate(), en la ayuda de Delphi te muestra como usarlo.

Salud OS

[sandra mendoza]

muchas gracias por tu ayuda, me fue de gran utilidad.

[ContraVeneno]

También puedes usar las funciones que vienen en la unidad DateUtils (DateUtil para delphi5) como "YearOf" (o "ExtractYear" en Delphi5) que una de las ventajas es que no tendrías que declarar ninguna variable para obtener el año (o el mes: MonthOf, o el día: DayOf).

[BlueSteel]

Tambien lo puedes hacer con un metodo más carretero....

que tendria que ser algo así..


Var
Fecha: String;
cDia, cMes, cYear : String;
...

Fecha := DateToStr(Date); // Pasamos la fecha ('19/05/2008');
cDia := Copy(Fecha,1,2); // obtenemos el 19
cMes := Copy(Fecha,4,2); // obtenemos el 05
cYear := Copy(Fecha,7,4); // obtenemos el 2008



Salu2:p:D

[Faust]

var
Fecha: TDate;
...
...
Fecha:= DateTimePicker1.Date;
Edit1.Text:= DateToStr(Trunc(Fecha));


Ah me equivoque....

[sandra mendoza]

Muchas gracias por sus respuestas