Rotina Delphi

http://www.feriadosmunicipais.com.br/feriados-nacionais/ http://www.brasil.gov.br/sobre/o-brasil/estado-brasileiro/feriados-nacionais ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+++++++++++++++++++++
01/01/2013 ( terça-feira ) - Confraternização universal ( Feriado nacional )
12/02/2013 ( terça-feira ) - Carnaval
13/02/2013 ( quarta-feira ) - Cinzas
16/02/2013 ( sábado ) - Fim do horário de verão
08/03/2013 ( sexta-feira ) - Dia Internacional da Mulher
21/03/2013 ( quinta-feira ) - Início do outono
29/03/2013 ( sexta-feira ) - Paixão de Cristo
31/03/2013 ( domingo ) - Páscoa
19/04/2013 ( sexta-feira ) - Dia do Índio
21/04/2013 ( domingo ) - Tiradentes ( Feriado nacional )
22/04/2013 ( segunda-feira ) - Descobrimento do Brasil
01/05/2013 ( quarta-feira ) - Dia do Trabalho ( Feriado nacional )
12/05/2013 ( domingo ) - Dia das mães
30/05/2013 ( quinta-feira ) - Corpus Christi
12/06/2013 ( quarta-feira ) - Dia dos Namorados
21/06/2013 ( sexta-feira ) - Início do inverno
11/08/2013 ( domingo ) - Dia dos Pais
07/09/2013 ( sábado ) - Independência do Brasil ( Feriado nacional )
23/09/2013 ( segunda-feira ) - Início da primavera
12/10/2013 ( sábado ) - Nossa Senhora Aparecida ( Feriado nacional )
15/10/2013 ( terça-feira ) - Dia dos Professores
20/10/2013 ( domingo ) - Início do horário de verão
02/11/2013 ( sábado ) - Finados ( Feriado nacional )
15/11/2013 ( sexta-feira ) - Proclamação da República ( Feriado nacional )
19/11/2013 ( terça-feira ) - Dia da Bandeira
20/11/2013 ( quarta-feira ) - Dia da Consciência Negra
21/12/2013 ( sábado ) - Início do verão
25/12/2013 ( quarta-feira ) - Natal ( Feriado nacional )
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+++++++++++++++++++++ http://www.planetadelphi.com.br/dica/5912/retorna-se-uma-data-e-feriado-movel Retorna se uma data é feriado móvel function FeriadoMovel(Data : TDateTime) : Boolean; var a, b, c, d, e, f, g, h, i, k, l, m, p, q, Ano, Mes, Dia