Buscar

Extrair dia,mês,ano de uma data específica

Código

// extraindo usando formatdatetime
var
dia,mes,ano:string;
begin
dia := formatdatetime('dd',strtodatetime(edit1.text));
mes := formatdatetime('mm',strtodatetime(edit1.text));
ano := formatdatetime('yy',strtodatetime(edit1.text));
end;
//para data atual é só mudar o "strtodatetime(edit1.text)" para "date"

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Data e hora
Adicionada dia: 10/09/09
Por: Roberto Cesar
Visualizada: 31488 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009