Jump to content

Nova Loja Oficial
loja.projetoacbr.com.br
Ajude o projeto a crescer, com estilo

Comprar

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

JHUANZITOLLL

Como saber se o acbrmonitorPlus esta em execução no pc ?

Recommended Posts

Use Mutex... (é como ele mesmo verifica)

     CreateMutex(nil, True, 'ACBrMonitor');
     if GetLastError = ERROR_ALREADY_EXISTS then
     begin
        MessageDlg('ACBrMonitor','O programa ACBrMonitor já está em execução',
            mtError, [mbOK], 0);
        Application.Terminate;
        exit ;
     end;     

 

  • Like 2

Consultor SAC ACBr

Daniel Simões de Almeida
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Share this post


Link to post
Share on other sites
1 hora atrás, Daniel Simoes disse:

Use Mutex... (é como ele mesmo verifica)

     CreateMutex(nil, True, 'ACBrMonitor');
     if GetLastError = ERROR_ALREADY_EXISTS then
     begin
        MessageDlg('ACBrMonitor','O programa ACBrMonitor já está em execução',
            mtError, [mbOK], 0);
        Application.Terminate;
        exit ;
     end;     

 

Eu Programo em VB6, acho que esse código não vai funcionar pra mim

Share this post


Link to post
Share on other sites

Bom dia  Jhuanzitolll

em vb pode usar este comando para saber se já existe o mesmo sistema em memoria

 

If App.PrevInstance Then
   MsgBox "SISTEMA JÁ ESTA ABERTO", vbExclamation, Space(20) & "ATENÇÃO"
   End
End If

  • Like 3

Share this post


Link to post
Share on other sites

Bom pessoal, muito obrigado pela ajuda mas não consegui com os exemplos que me deram.

A solução que encontrei, pra nível de histórico aqui.

 

Crio um comando pra minimizar o acbrmonitor.

Close #2   
Open "C:\nfce-app\acbr\ocultaACBR.TXT" For Output As #2    
Print #2, "acbr.ocultar"                                                            
Close #2     

 

caso o Acbrmonitor não o execute e exclua o arquivo, eu entendo que ele não esta aberto na maquina e o executo pelo comando shell do Windows.

If Dir("c:\nfce-app\acbr\ocultaACBR.txt") <> "" Then  
  Shell ("C:\ACBrMonitorPLUS\ACBrMonitor.exe") 
End If
  • Like 2

Share this post


Link to post
Share on other sites

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

  • Like 1

Consultor SAC ACBr

Daniel Simões de Almeida
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.

×
×
  • Create New...