Pegar mês e ano em andamento

Delphi

03/10/2006

Olá, gostaria de saber como posso pegar por exemplo mes atual e ano, da seguinte forma: x/10/2006, gostaria de pegar em variaves separadas 10 do mes e 2006 do ano, será que alguém sabe como?

Obrigado.

obs: revirei no forum mas não achei nada como o exemplo acima.


Junior


Juniorprog

Juniorprog

Curtidas 0

Melhor post

Facc

Facc

03/10/2006

Valeu muito obrigado. [quote:b89fe5a476=´steve_narancic´]declare a unit [b:b89fe5a476]DateUtils [/b:b89fe5a476]no uses e utilize as funções: [b:b89fe5a476] dayOf(03/10/2006) para extrair o dia monthOf(03/10/2006) para extrair o mes YearOf(03/10/2006) para extrair o ano[/b:b89fe5a476]
[/quote:b89fe5a476]

Você pode usar o DecodeDate tbm

Ex.
Var
Dia, Mes, Ano : Word;

begin
  DecodeDate(Now, Ano, Mes, Dia);
end;



GOSTEI 1

Mais Respostas

Steve_narancic

Steve_narancic

03/10/2006

declare a unit [b:1ca087b24c]DateUtils [/b:1ca087b24c]no uses

e utilize as funções:
[b:1ca087b24c] dayOf(03/10/2006) para extrair o dia
monthOf(03/10/2006) para extrair o mes
YearOf(03/10/2006) para extrair o ano[/b:1ca087b24c]


GOSTEI 0
Juniorprog

Juniorprog

03/10/2006

Valeu muito obrigado.


declare a unit [b:63b5c6cdb8]DateUtils [/b:63b5c6cdb8]no uses e utilize as funções: [b:63b5c6cdb8] dayOf(03/10/2006) para extrair o dia monthOf(03/10/2006) para extrair o mes YearOf(03/10/2006) para extrair o ano[/b:63b5c6cdb8]



GOSTEI 0
POSTAR