Fórum Função DayOfWeekend #208897

Eu uso ela assim

Declaro estas duas variaveis

Diadasemana: String;
dia: array[1..7] of string;

Dia[1] := ´Domingo´;
Dia[2] := ´Segunda feira´;
Dia[3] := ´Terça Feira´;
Dia[4] := ´Quarta Feira´;
Dia[5] := ´Quinta Feira´;
Dia[6] := ´Sexta Feira´;
Dia[7] := ´Sábado´;
Data:= date;
DiadaSemana := Dia[DayOfWeek(Data)];

Barrastatus.Panels[2].Text := DateToStr(Date) + ´ - ´ + Diadasemana + ´ - ´ + TimetoStr(Now);

olá, não sei bem se é oq vc quer, mas espero que ajude...

DayOfWeek te retorna o dia da semana, abaixo coloco um exemplo bem simples, retornando dentro de um componente label o dia da semana baseado em um campo de data que tenho dentro de meu formlário.

Exemplo:

If DayOfWeek(StrToDate(Vencimento.Text)) = 1 then
Label1.Caption := ´Domingo´
else If DayOfWeek(StrToDate(Vencimento.Text)) = 7 then
Label1.Caption := ´Sábado´;


Blz, Espero que tenha ajudado, qualquer coisa estamos aí...

Falows!!!