[DELPHI] VERIFICA SE A DATA INFORMADA É SÁBADO OU DOMINGO

function FinalDeSemana (dData : TDateTime) : boolean;

begin

result := false;

if (DayOfWeek(dData) = 7) or (DayOfWeek(dData) = 1) Then

result := true;

end;

Gostou? Deixe seu comentário... Convido você a seguir meu blog, sua presença é bem vinda!【ツ】