Mais uma...
Agradeço ao Aroldo Zanella que me explainou sobre a função DayOfWeek, mas esta função só retorna o dia da semana em número, como faço para retornar por extenço?
Anonymous
Curtidas 0
Respostas
Nildo
26/02/2003
Coloque esta funcao na sua Unit.
function DiaDaSemana: string;
begin
case DayOfWeek(date) of
1: result := ´Domingo´;
2: result := ´Segunda´;
3: result := ´Terça´;
4: result := ´Quarta´;
5: result := ´Quinta´;
6: result := ´Sexta´;
7: result := ´Sabado´;
end;
Agora ao invez de usar o DayOfWeek(date), voce usa DiaDaSemana.
falowwwwssss
function DiaDaSemana: string;
begin
case DayOfWeek(date) of
1: result := ´Domingo´;
2: result := ´Segunda´;
3: result := ´Terça´;
4: result := ´Quarta´;
5: result := ´Quinta´;
6: result := ´Sexta´;
7: result := ´Sabado´;
end;
Agora ao invez de usar o DayOfWeek(date), voce usa DiaDaSemana.
falowwwwssss
GOSTEI 0