Dia da Semana em Data

[RGomes88 1]

Galera

 

Boa Tarde

 

o meu sistema retorna o dia da semana por extenso (segunda, terça, quarta....), gostaria de saber se consigo pegar esse valor e pegar uma data real, por exemplo, o meu sistema me retorno Terça - gostaria que me mostrasse o dia 07/08/2012. Alguém tem alguma dica de como devo criar essa função ?

 

Grato

[Spoock 0]

Amigo, você pode fazer isso com o TDateTime do Delphi. Faça o seguinte, declare SysUtil e DateUtils no uses de sua aplicação, depois utilize esse código no evento OnCreate ou em um botão para exibir a data atual:

 

var
 hoje : TDateTime;
begin
 hoje := Now;
 ShowMessage('A data de hoje é ' + DateToStr(hoje));
end;