Duvida de Conversão de datas

Delphi

31/05/2003

olá, estou com a seguinte duvida:
Estou trabalhando com data e me surgiu esta seguinte mensagem:
Mensagem de Erro

Message ‘ conversion error from string.
“5//30/003”. Process Stop.

A rotinha que criei foi a seguinte:

valdata1:= DateToStr(pesqData1.Date);
valdata2:= DateToStr(pesqData2.Date);

val1:= copy(valData1,4,2) + ´/´ + copy(valData1,1,2) + ´/´ + copy(valData1,7,4);
val2:= copy(valdata2,4,2) + ´/´ + copy(valData2,1,2) + ´/´ + copy(valData2,7,4);

Onde ValData1, ValData2, Val1 e Val2 são variáveis do tipo STRING e estou fazendo com que a variável VALDATA1 receba o que tem no Campo PESQDATA1.DATE convertido pela estrutura DATETOSTR como demonstra na rotina acima.
Este erro surge quando tento fazer uma pesquisa entre duas datas distintas.

Atenciosamente
Welton Piedade Costa


Welton.c

Welton.c

Curtidas 0
POSTAR