b RELÓGIO POPUP para Microsoft Access

Download   Home  Anúncios

Este utilitário é um COM add-in ou add-in (.mdb) programado em Microsoft® Visual Basic® for Application (VBA) que gera um relógio popup especial estático ou dinâmico no Microsoft® Access® para pegar e contar tempo. Ele possibilita inserir tempos e intervalos de tempos (Selecionador de Tempo) no Access de maneira fácil usando apenas o teclado ou apenas o mouse ou ambos. Veja as figuras abaixo.

Ele consiste de um único arquivo, o AccessClock.dll, que é de aproximadamente 540 kb em tamanho e pode ser instalado automaticamente. Exceto para a DLL, nenhuma outra configuração é salva no Registro do Microsoft® Windows®. Sua configuração é salva no arquivo AccessClock.ini que é criado e mantido pelo próprio utilitário. Você pode desinstalá-lo total e automaticamente, não deixando nenhuma sujeira no Registro do seu Windows ou disco.

Características:

- Popup em tamanho reduzido;

- Popup próximo ao cursor do mouse ou opcionalmente na última posição salva;

- Pode popup em três formatos: normal, com contagem, com mostrador analógico e com ambos (contagem e analógico). No formato normal, horas, minutos, segundos e decimal de segundos podem ser digitados diretamente em uma amigável caixa de texto ou pegados com o mouse a partir de uma barra de rolagem inteligente. Com o analógico, horas, minutos e segundos podem também ser pegos com um passa mouse sensitivo;

- Pode autopopup iconizado em célula com pouca ou nenhuma perturbação de cinco maneiras: Desvanecer 0%, Desvanecer 50%, Desvanecer 90%, Desvanecer Rápido e Fechar e Desvanecer Lento e Fechar. Se o ícone for clicado, o formato normal ou com popup, se não, o ícone vai embora por ele mesmo quando a seleção no Access for alterada;

- Contagem de período: dias, horas, minutos e segundos a partir de um tempo de referência;

- Quando contando a partir de um tempo de referência, permite incrementar e decrementar dias, horas, minutos e segundos um por um através de botões ou inserindo quantidades diretamente em caixas de texto;

- O tempo de referência para contagem pode sempre iniciar definida com tempo zero, ou com o mesmo Tempo Inicial do Display, ou com a última Data de Referência Definida ou ainda com o tempo agora, mas ele também pode ser definido no vôo com clique direito do mouse em controles na interface;

- Controles na interface para ir para o tempo agora e para voltar para o tempo inicial;

- O comportamento de inserir pode ser definido via menu para: Inserir e Fechar, Inserir Sem Fechar, Adicionar Quebra de Linha e Adicionar Tab;

- Insere sem quebrar a corrente do comando ‘Desfazer’ do Access em curso e qualquer inclusão pode ser desfeita, normalmente, por ele mesmo

- Pode ser chamado pelo botão direito do mouse (Menu de Contexto), ou por um botão na barra de ferramentas Padrão do Access (Guia Suplementos da Faixa de Opções 2007, 2010 ou 2013), ou por uma tecla de atalho no teclado definida pelo próprio usuário;

- A saída pode ser uma variant (date) (computador-legível/tempo não formatado) ou um destes 18 formatos (humano-legível/tempo formatado): Longo Win (definido pelo Painel de Controle do Windows); Longo Win2 (Longo Win com milisegundos); Médio Win (definido pelo Painel de Controle do Windows); Curto Win (definido pelo Painel de Controle do Windows); hh:nn:ss (09:05:58); h:n:s (9:5:58); hh.nn.ss (09.05.58); h.n.s (9.5.58); hh-nn-ss (09-05-58); h-n-s (9-5-58); Longo 1 (9 horas, 5 minutos e 58 segundos); Longo 2 (nove horas, cinco minutos e cinquenta e oito segundos); Intervalo 1 (09:05:58 de 00:00:00 até 09:05:58); Intervalo 2 (9 horas, 5 minutos e 58 segundos de 00:00:00 até 09:05:58); Intervalo 3 (nove horas, cinco minutos e cinquenta e oito segundos de 00:00:00 até 09:05:58); Intervalo 4 (32.758 segundos de 00:00:00 até 09:05:58); Intervalo 5 (545,967 minutes from 00:00:00 to 09:05:58); Intervalo 6 (9,0994 horas de 00:00:00 até 09:05:58) e Intervalo 7 (0,37914 dias de 00:00:00 até 09:05:58);

- As saídas acima podem ainda aceitar milissegundos e dias quando contando a partir de um tempo de referência

- Formatos de saída são listados em um menu sensível de acordo com o tempo atual no display com inclusão imediata e redefinição do formato de saída padrão para a próxima nova instância;

- Pode lidar com tempo a partir de 0 até 23:59:59 ou até 1000 dias quando contando a partir de um tempo de referência;

- Permite múltiplas instâncias em uma única instância do Access com controles, configurações, contagens e resultados independentes. Em quantidades práticas, não há limites para o número de instâncias simultâneas;

- Controles de tempo de referência de contagem em todas as instâncias abertas ou algumas delas podem ser atados para definir simultaneamente;

- Controles atados são distinguidos por asteriscos no título;

- A característica de múltiplas instâncias pode ser desabilitada;

- Quatro comandos no menu envolvendo o relógio do sistema (relógio do Windows). O primeiro é uma opção para obter o tempo com uma precisão de milissegundos. O segundo possibilita a sincronização do display com o relógio do sistema, alterando-o de estático para dinâmico, podendo inclusive ser usado como cronômetro se a contagem estiver sendo exibida (Dica! Se você necessitar de mais características envolvendo cronômetro e contagem regressiva, use o utilitário Cronômetro Popup para Excel® neste site também). O terceiro possibilita a sincronização com contagem acelerada (ver próxima característica). E o quarto possibilita acertar o relógio do sistema de acordo com a hora definida no display;

- Ao selecionar a opção “Sincronizar com contagem acelerada”, a contagem será exibida e o display sincronizado com o relógio do sistema de uma forma acelerada para gerar uma contagem acelerada em relação ao tempo de referência definido. O fator de aceleração padrão é x2, mas pode ser alterado diretamente na interface. O tempo de referência pode também ser alterado, através do controle no canto inferior esquerdo, ou imediatamente clicando o botão direito do mouse em controles como “Ir Inicial” ou “Ir Agora”;

- O tamanho do display pode ser ajustado pelas bordas para aumentar o tamanho da fonte de 8pt para até 32pt ou diminuir até 4pt;

- Pode copiar o tempo no display para Àrea de Transferência do Windows. Dica! Ao inserir com a tecla Shift pressionada, a saída será desviada para Àrea de Transferência;

- Pode colar no display tempo existente na Área de Transferência do Windows;

- Aceita as seguintes teclas de atalho que possibilitam pegar tempo usando apenas o teclado:

- Popup Relógio: Nenhuma
- Avançar hora: Seta Direita
- Retroceder hora: Seta Esquerda
- Avançar minuto: Seta Acima
- Retroceder minuto: Seta Abaixo
- Avançar segundo: Shift ou Ctrl + Seta Acima
- Retroceder segundo: Shift ou Ctrl + Seta Abaixo
- Avançar dia: Ctrl + Shift + Seta Acima
- Retroceder dia: Ctrl + Shift + Seta Abaixo
- Ir Agora: A
- Voltar ao tempo Inicial: I
- Inserir e fechar: Enter
- Fechar: ESC
- Colar a partir da Área de Transferência do Windows: Ctrl + V or V
- Copiar para Àrea de Transferência do Windows: Ctrl + C ou C (Dica! Ao inserir com a tecla Shift pressionada, a saída será desviada para Àrea de Transferência);

- A face pode ser configurada em: cor e figura de segundo plano, em transparência do visor e de controles e ocultação da barra de título clássica;

- Pode desancorar sua janela da janela do Access possibilitando que fique visível mesmo se a janela do Access for minimizada;

- Pode fazer sua janela ficar Sempre na Frente de todas as janelas abertas no Windows;

- A última configuração aberta ou a configuração da última instância fechada será usada como padrão na próxima nova instância;

- Possui comandos no menu para restaurar todas as configurações padrão;

- Todas as instâncias rodando podem ser fechadas com um único clique selecionando o comando ‘Fechar Tudo’ no menu;

- Pode ser chamado diretamente a partir de qualquer código VBA através da função fClock(). Veja, logo abaixo das figuras, uma descrição detalhada desta função e exemplos de aplicativos em VBA que a usam;

- Modal e não modal;

- Som;

- Ocupa menos de 540 Kb quando instalada.

Download:

Testado no Access para Windows, versões 2000, 2002(XP), 2003, 2007, 2010 (32-bit), 2013 (32-bit) e 2016 (32-bit) em instalações MSI-based e Click-To-Run do Office 365™ de serviços baseados na nuvem.

Download

Baixe a versão portuguesa agora

Você pode baixar também deste site-espelho

Última atualização: 30/05/2018 - 656,9kb

Grátis baseado neste Contrato de Licença

Obs.: O link acima baixa o pacote instalador e desinstalador programado em VBA em um MDB devidamente convertido para EXE pelo DBtoEXE para tornar a instalação mais fácil para leigos em macros e Microsoft® Windows®, no entanto, se você é experiente e por alguma razão preferir um pacote instalador e desinstalador em formato ZIP aberto, clique aqui. Com este pacote zip você pode instalar de três maneiras: (1) Simplesmente acionar o Install.exe que carrega o mesmo MDB no Access sem alerta de macro; (2) Extrair o pacote inteiro para uma pasta e acionar o MDB, habilitando as macros no Access, ou (3) Instalar a DLL manualmente.

Veja também para Microsoft Excel®, para Microsoft PowerPoint® e para Microsoft Word.

Figuras:

Figura

Função fClock():

O relógio pode ser chamado diretamente a partir de qualquer código VBA através da função fClock() que tem estes 10 argumentos opcionais:

1 - IniTime (Time, Padrão=Zero)

2 - RetTimeAsDate (Boolean, Padrão=Verdadeiro)

3 - WaitAndRetValue (Long 0 to 2, Padrão=2). Onde:
     0 - Não retorna valor, não assíncrona e não modal
     1 - Retorna valor, assíncrona e não modal
     2 - Retorna valor, assíncrona e modal

4 - FontDisplaySize (Long 4 to 32, Padrão=8)

5 - ShowAnalogic (Boolean, Padrão=Falso)

6 - AnalogicScalarPos (Boolean, Padrão=Falso)

7 - ShowCount (Boolean, Padrão=Falso)

8 - CountOfEachUnitIn (Boolean, Padrão=Falso)

9 - LeftPos (String, Padrão="0")

10 - TopPos (String, Padrão="0"). Onde LeftPos e TopPos são as distâncias em pontos (1/72 polegadas) do centro da lateral esquerda do relógio para a posição atual do mouse. Se os valores forem precedidos por $ (cifrão), LeftPos e TopPos passam a ser as distâncias do canto superior esquerdo do relógio para o canto superior esquerdo fixo da tela. E ainda, se houver apenas o $ sem número, será usada a posição padrão atual.

Exemplos:

1 - O código abaixo chama o relógio em modal para retornar tempo como variant (Date) para um formulário.

Sub YourSub1()
    Dim ObjToVBA As Object
    Set ObjToVBA = _
    Application.COMAddIns("AddInAcClock.AccessDesigner").Object
    fRet = ObjToVBA.fClock(ClockTimeIni)
End Sub

2 - O código abaixo chama o relógio em não modal para retornar tempo em qualquer formato saída como no comando de clique direito.

Sub YourSub2()
    Dim ObjToVBA As Object
    Set ObjToVBA = Application.COMAddIns("AddInAcClock.AccessDesigner").Object
    Call ObjToVBA.fClock(ClockTimeIni, False, 0)
End Sub

3 - Idem para capturar e retornar tempo para a seleção ativa.

Sub YourSub3()
    Dim ObjToVBA As Object
    Set ObjToVBA = Application.COMAddIns("AddInAcClock.AccessDesigner").Object
    Call ObjToVBA.fClock
End Sub

Sobre Add-in (.mdb):

Indisponível temporariamente.

 

Mais informação

Home

 





gplus

 

 

Visitas acumuladas em todas as páginas:
Visitas hoje só nesta página: