Hola,
Cita:
Empezado por lucasarts_18
Ej: 25/08/1999 -> 25081999
|
¿Algo así no podría apañarte?
Código Delphi
[-]
FormatDateTime('ddmmyyyy', StrToDate('25/08/1999'));
O, dicho de otro modo:
Código Delphi
[-]
function FechaSinSeparador(fecha: TDate): string;
begin
Result := FormatDateTime('ddmmyyyy', fecha);
end;
function FechaSinSeparador(fecha: string): string;
begin
Result := FormatDateTime('ddmmyyyy', StrToDate(fecha));
end;