encontrando o dia da semana

Question

pessoal, eu preciso saber qual o dia da semana (SEGUNDA-FEIRA, TER�A...ETC) atrav�s da data atual ... como fa�o isso?...

Leonardobhbr · Answer

Function DiadaSemana(Data : TDate) : string;
const
semana : array[1..7] of string = (�Domingo�,�Segunda-feira�,�Ter�a-feira�,�Quarta-feira�,�Quinta-feira�,�Sexta-feira�, �S�bado�);
begin
Result := semana[DayOfWeek(strtodate(Data))]
end;

Rafael Santana · Answer

Obrigado amigo...deu certinho :)...

Aroldo Zanela · Answer

Colega,Se n�o for efetuar nenhum tipo de c�lculo, pode-se utilizar:[code:1:e9c2f652d4]ShowMessage(FormatDateTime(�"Hoje � dia "dd", " dddd"."�, date));[/code:1:e9c2f652d4]...