Dia Atual

[Muniz]

Salve!

Prezados Amigos,

Estou iniciando no Delphi e não estou conseguindo obter o dia atual da data do sistema.

Consegui obter a hora com:

HoraAtual.caption:=TimeToStr(Time);

É possível obter o dia da mesma maneira acima?

Desde já agradeço a atenção dispensada.

[]s

[Bruno Frank]

Sim tente

formatedatetime("dd",time);

[camarao]

O comando -DateTimeToStr(Now))-

com certeza vai solucionar o que oce perguntou.

[Progr'amador]

com esse código você pode obter não só o dia, mas o mes e o ano tambem separado.

procedure TForm1.Button1Click(Sender: TObject);
var dia, mes, ano : Word;
begin
   DecodDate(date,ano,mes,dia);
   Label1.Caption := IntToStr(dia);
end;