String Como Faço para quebral-las ???

Delphi

29/02/2004

por exemplo eu tenho uma data no formato de string:

29/02/2004 como faço para quebra-la ???

e depois como faço para uni-la novamente ???

desde ja agraeço!!!
Francisco Nunes


Fcnjr

Fcnjr

Curtidas 0

Respostas

Edilcimar

Edilcimar

29/02/2004

var data, dia, mes, ano, novadata : string
data := 29/04/2003´;
dia := copy(data,1,2);
mes := copy(data,3,2);
ano := copy(data,5,4);
novadata := dia + ´/´+mes+´/´+ano


GOSTEI 0
Fcnjr

Fcnjr

29/02/2004

Valeu cara !!!!


GOSTEI 0
Tnaires

Tnaires

29/02/2004

Outra maneira de se obter cada entidade da data separada:
  var dia, mes, ano: word;
begin
  DecodeDate(StrToDate(´01/01/2004´), dia, mes, ano);
end;



GOSTEI 0
POSTAR