função para calculo de dias uteis

Delphi

04/02/2003

Boa tarde a todos

Alguem sabe de um função que calcule os dias úteis de um mes?

Desde já agradeço!

Luiz Jesuz Pires da Silva Jr.


Kandrus

Kandrus

Curtidas 0

Respostas

Marioguedes

Marioguedes

04/02/2003

Utiliza a função DayofWeek.


GOSTEI 0
Michael

Michael

04/02/2003

Aí, mano, mamão com açúcar!

function VerificarDiaUtil(Data : TDate) : boolean;
begin

case DayOfWeek(Data) of
2, 3, 4, 5, 6 : Result := true;
else Result := false;
end;

end;

Espero ter ajudado!

Michael :-)


GOSTEI 0
Kandrus

Kandrus

04/02/2003

Valew galera


GOSTEI 0
POSTAR