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]]

Empezado por 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

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í..

Código Delphi [-]
 
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

[Faust]

Código Delphi [-]
var
  Fecha: TDate;
...
...
Fecha:= DateTimePicker1.Date;
Edit1.Text:= DateToStr(Trunc(Fecha));

Ah me equivoque....

[sandra mendoza]

Muchas gracias por sus respuestas