Cita:
Empezado por jlrdz
...........si en lugar de poner la fecha fija y la recupero desde un campo de texto TEdit y tiene como mascara xx/xx/xxxx, es valido ponerlo dentro de EncodeDate(micampo.text)?
|
No, porque encodedate necesita 3 parámetros de tipo Word, si lo recuperas de un Edit puedes dividir tu cadena:
Código Delphi
[-]
anio, mes, dia : Word;
fechastr : String;
begin
fechastr := Edit.Text;
dia := StrToInt(Copy(fechastr, 1, 2));
mes := StrToInt(Copy(fechastr, 4, 2));
anio := StrToInt(Copy(fechastr, 7, 4));
f := EncodeDate(anio, mes, dia);
Saluditos