convertir fecha en entero

[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