anos, meses e dias - como calcular
como faço para extrair anos, meses e dias de uma data de aniversário no cadastro de pacientes.
Passos
Curtidas 0
Respostas
Aroldo Zanela
04/06/2003
Colega,
Veja este tópico:
http://clubedelphi.videomart.com.br/viewtopic.php?t=13254&highlight=extract
Veja este tópico:
http://clubedelphi.videomart.com.br/viewtopic.php?t=13254&highlight=extract
GOSTEI 0
Zeul
04/06/2003
Será isso o que você quer, colega?
var
DataAniversario:TDateTime;
anos,meses,dias:Word;
Begin
DecodeDate(DataAniversario,Anos,meses,dias);
Você encontrará os valores em anos,meses,dias.
Zeul.
var
DataAniversario:TDateTime;
anos,meses,dias:Word;
Begin
DecodeDate(DataAniversario,Anos,meses,dias);
Você encontrará os valores em anos,meses,dias.
Zeul.
GOSTEI 0
Zeul
04/06/2003
Será isso o que você quer, colega?
var
DataAniversario:TDateTime;
anos,meses,dias:Word;
Begin
DecodeDate(DataAniversario,Anos,meses,dias);
Você encontrará os valores em anos,meses,dias.
Zeul.
var
DataAniversario:TDateTime;
anos,meses,dias:Word;
Begin
DecodeDate(DataAniversario,Anos,meses,dias);
Você encontrará os valores em anos,meses,dias.
Zeul.
GOSTEI 0