Resgatar mês

[Gafanhoto]

Como faço para resgatar apenas o mês da data atual? :unsure:

[Micheus]

Gafanhoto, se for no código delphi, você pode pode utilizar a função DecodeDate (unit SysUtils) ou, se utilizar D7 pode ser a função MonthOf (unit DateUtils).

var
  Ano, mês, Dia: Word;
begin
  DecodeDate(Date, Ano, mês, Dia);
  Label1.Caption := Format('Mês da data atual: %d = %s', [mês, LongMonthNames[mês]]);

  mês := MonthOf(Date);
  Label2.Caption := Format('Mês da data atual: %d', [mês]);
end;

Seria isto?

[]s

[Gafanhoto]

É isso aí.. beleza.... Valeu a ajuda