Fórum Pegar o Dia e Mes de uma data e jogar numa outra var #244358

26/07/2004

0

bom dia galera.

como posso pegar o dia e o mês de uma data e jogar numa variavel dia e em outra variavel mes?

obrigado


:arrow: [color=red:fc34a8c62e]Título alterado pelo Moderador oTTo.[/color:fc34a8c62e]

:idea: [color=blue:fc34a8c62e]Seja mais claro no título.[/color:fc34a8c62e]
:idea: [color=blue:fc34a8c62e][url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=16976]Saiba como obter resposta rápida..[/url][/color:fc34a8c62e]
:idea: [color=blue:fc34a8c62e]Leia sempre [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=6689]Regras de Conduta.[/url][/color:fc34a8c62e]
:idea: [color=blue:fc34a8c62e]Use sempre o Link [url=http://delphiforum.icft.com.br/forum/search.php][img:fc34a8c62e]http://delphiforum.icft.com.br/forum/templates/subSilver/images/icon_mini_search.gif[/img:fc34a8c62e] Pesquisar[/url] no topo da Página.[/color:fc34a8c62e]


Speedrob

Speedrob

Responder

Posts

26/07/2004

Lucas Silva

usa a função decodeDate.
Nela dá pra vc extrair tudo!


Responder

Gostei + 0

26/07/2004

Reginaldo174

var
Data: TDateTime;
Ano, Mes, Dia: Word;
begin
Data:= Now;
DecodeDate(Data, Ano, Mes, Dia);
Edit1.text := IntToStr(Dia);
Edit2.text := IntToStr(Mes);
Edit3.text := IntToStr(Ano);
end;


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar