PC Toledo

Quem já não precisou de alguma rotina GUI para cadastrar os feriados ?
Bom quem quiser dar uma olhadinha, este exemplo tem vários recursos re-adaptados como:

Non-Working-Day:

1 . Existe uma maneira de incluir o dia da semana como dia não laborável também. Apenas clique no cabeçalho da grade (Domingo , Sábado ... ) e vai mudar de cor, o que pode ser salvo.

2 . Teclas de direção bloqueadas (esquerda, direita , para cima e para baixo ), para evitar a navegação no grid pelas teclas de direção.

3 . Tamanho dos componentes diferenciados em tamanho e posições para WinXP e Win7 .

4 . Exibição em idiomas diferentes para o dia da semana e mês, feita através de funçõe em Harbour: AMonths() e Adays().

5 . Cores células de navegação alteradas. Iste é para esconder o cursor de navegação no grid. Como não foi posible desativá-lo a única maneira foi colocar na mesma cor com as outras células.

6 . Características de estéticas aplicadas como: cor de fundo do FRAME, DrawEdge (bordas) para cada calendário com muitas opções ( Edges: arredondado, LEVANTADA , Submerso , colisão, gravado na esquerda, superior, direita e inferior, retângulo, DIAGONAL feito no estilo SOFT ou apartado )

7 . Opção de salvar com botão habilitado/desabilitado a medida que ocorre alguma mudança . Mensagens alertando usuário por pendência de salvar.

8 . GetControlCoords. Opção Genérica para obter as coordenadas de cada componente e com a opção ajustável.

9 . AKILL. Função genérica para eliminar qualquer elemento de uma matriz .

10 . ListView_SetCurSel. Função para manipular a posição no grid.

11 . AEquals. Função genérica para comparar duas matrizes.

12 . SetColorCel. Função para alterar as cores de células nos GRIDs.

13 . _HMG_DOGRIDREFRESH2. Função específica para fazer REFRESH sem remover cores das células.

14 . _GridEx_SetColumnControl função interna para mudar ColumnDYNAMICFORECOLOR. Serve como exemplo e referência para utilização.

15 . _DefineGrid2. Função específica para a opção excepção de barras de rolagem em Grids. Permite e remover barras de rolagem em Grids. Isto é muito útil quando a grade é fixa, com tamanho fixos e sem possibilidade de adicionar novos registros, é dizer, apenas exibir as linhas fixas do grid. Não é utilizável quando precisa navegar (UP and Down ) no Grid. Calendário é um bom exemplo para isso, somente as linhas fixas (6 semanas) são exibidos.

No módulo "Regular Holidays":

16 . OpenDbf, LockDbf​​, LockRecord, UnLockDbf​​ e AddRecord. Funções de manipulação de e processamento de compartilhamento em rede para DBFs.

17 . Outro exemplo de Grid com Rowsource (edição direta para DBF) e funções de validações e controle de edição (edição, eliminação e recuperação de registros).

Dias dias não trabalháveis ​​são registrados:

- Para os dias fechados em dia de semana (domingos, sábados ...) em DayOWeek.mem
- Para feriados em dia fixo do ano, em FixeDays.dbf
- Para feriados do ano, no padrão "Year"+yyyy+".dbf". (Exemplo: Year2013.dbf )

Espero que seja de utilidade e que gostem. Se houverem melhoras ou indicações, gostaria de tomar conhecimento.