kapiaba Posted December 5, 2005 Report Share Posted December 5, 2005 AMIGOS, ESTOU LEVANDO DE GOLEADA DE UMA GAVETA MENNO... ALGUÉM SABE COMO EU FAÇO PARA ABRI-LA USANDO DLL, E QUAIS AS DECLARAÇÕES DE FUNÇÕES DA MESMA??? Obrigado e Abraços. NO FIVEWIN 16 BITS-> FW23C + CLIPPER 5.3B. O link para download do projeto xDev é este: http://www.sqllib.com.br/xDev.zip http://www.sqlmanager.net/en/products/mysql/manager/download João Santos - São Paulo. kmt_karinha@pop.com.br FW 2.3C CLIP 5.3B FWH 2.7 - BLINKER 7.0 WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 5, 2005 Author Report Share Posted December 5, 2005 AMIGOS, ESTOU LEVANDO DE GOLEADA DE UMA GAVETA MENNO... ALGUÉM SABE COMO EU FAÇO PARA ABRI-LA USANDO DLL, E QUAIS AS DECLARAÇÕES DE FUNÇÕES DA MESMA??? Obrigado e Abraços. NO FIVEWIN 16 BITS-> FW23C + CLIPPER 5.3B. O link para download do projeto xDev é este: http://www.sqllib.com.br/xDev.zip http://www.sqlmanager.net/en/products/mysql/manager/download João Santos - São Paulo. kmt_karinha@pop.com.br FW 2.3C CLIP 5.3B FWH 2.7 - BLINKER 7.0 WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 5, 2005 Author Report Share Posted December 5, 2005 AMIGOS, ESTOU LEVANDO DE GOLEADA DE UMA GAVETA MENNO... ALGUÉM SABE COMO EU FAÇO PARA ABRI-LA USANDO DLL, E QUAIS AS DECLARAÇÕES DE FUNÇÕES DA MESMA??? Obrigado e Abraços. NO FIVEWIN 16 BITS-> FW23C + CLIPPER 5.3B. O link para download do projeto xDev é este: http://www.sqllib.com.br/xDev.zip http://www.sqlmanager.net/en/products/mysql/manager/download João Santos - São Paulo. kmt_karinha@pop.com.br FW 2.3C CLIP 5.3B FWH 2.7 - BLINKER 7.0 WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 5, 2005 Author Report Share Posted December 5, 2005 BORA GALERA... NINGUEM USOU ESTA GAVETA DE DINHEIRO? DINHEIRO??? ONDE? ONDE? ONDE??? hehehehehehe. O link para download do projeto xDev é este: http://www.sqllib.com.br/xDev.zip http://www.sqlmanager.net/en/products/mysql/manager/download João Santos - São Paulo. kmt_karinha@pop.com.br FW 2.3C CLIP 5.3B FWH 2.7 - BLINKER 7.0 WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
marcelo Posted December 6, 2005 Report Share Posted December 6, 2005 Ola Voce já deve ter consultado este link mas ..... http://www.pctoledo.com.br/forum/viewtopic.php?t=2481&view=next&sid=c0698586c78d7bc19cad79315127478c Yrece Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 6, 2005 Author Report Share Posted December 6, 2005 citação:Ola Voce já deve ter consultado este link mas ..... http://www.pctoledo.com.br/forum/viewtopic.php?t=2481&view=next&sid=c0698586c78d7bc19cad79315127478c Yrece id=quote>id=quote>OLà YRECE... NÃO SAY SE VOCE PERCEBEU, ESTOU USANDO A DLL DA MENNO, ESTES COMANDOS QUE INDICASTES, SE NAO ME ENGANO, É PARA QUANDO SE USA A LIB... PELO QUE ENTENDI LÃ, TAMBÉM NÃO FUNCIONOU... SÓ ME RESTA ESPERAR O SÉRGIO(PERSONAL) OU O ROSSINE PARA DAR SOLUÇÃO NESTA PARADA... A GAVETA ABRE NORMALMENTE, MAS AI, O WOWEXEC.EXE DO WINDOWS XP ENTRA EM ACTION E NÃO DEIXA QUE SE ABRA-A DE NOVO... SOMENTE SE SE APERTA CTRL+ALT+DEL, FECHA O WOWEXEC.EXE, AI BELEZA, ELA ABRE NOVAMENTE... ALGUMA COISA ESTà ERRADA... YRECE, VOCE SABE FAZER DECLARACAO DE DLL?? SE SIM, ENVIO O MODELO EM DELPHI PARA TI, PARA VER SE AS DECLARACOES DE KÃ, BATEM COM AS TUAS... C'ÉS POSIBLE?? Abraços. FIVEWIN 2.7 FOR XHARBOUR... FERRARI VERMELHINHA. O link para download do projeto xDev é este: http://www.sqllib.com.br/xDev.zip http://www.sqlmanager.net/en/products/mysql/manager/download João Santos - São Paulo. kmt_karinha@pop.com.br FW 2.3C CLIP 5.3B FWH 2.7 - BLINKER 7.0 WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 6, 2005 Author Report Share Posted December 6, 2005 Quem Manja de Visual Basic, Pode Traduzir esta coisa Horrorosa Pra Mim Por Favor??? Isto e GREGO Puro... Credo! Credo! Credo! Obrigado. 'DECLARACAO DAS FUNÇÕES DA GHDL32.DLL 'PARA INTERFACE COM A GAVETA MENNO MGI Private Declare Function GavetaConfigura Lib "Ghdl32" (ByVal pulso As Integer, ByVal min As Integer) As Long Private Declare Function DriverGaveta Lib "Ghdl32" (ByVal p As Integer, ByVal f As Integer) As Long 'Declaracao da variavel que indica a porta serial Public serial As Integer = 1 inteiro PUBLIC SERIAL := 1 // Porta 1 'Declaracao das variáveis para configuracao da GAVETA MENNO Public m1, p1 As Integer 'Constantes de parametros da funcao DriverGaveta Const GAVETA_INICIALIZA = 1 Const GAVETA_ABRE = 2 Const GAVETA_ESTADO = 3 Private Sub btn_aciona_Click() Dim i, resp As Integer DriverGaveta serial, GAVETA_ABRE End Sub Private Sub btn_sair_Click() Unload Form_Principal End End Sub Private Sub btn_status_Click() Dim funcao As Integer funcao = DriverGaveta(serial, GAVETA_ESTADO) If funcao = 2 Then Lbl_status.Caption = "Status da gaveta: ABERTA" ElseIf funcao = 1 Then Lbl_status.Caption = "Status da gaveta: FECHADA" End If End Sub Private Sub Command1_Click() End Sub Private Sub Option1_Click() serial = 1 DriverGaveta serial, GAVETA_INICIALIZA p1 = 150 m1 = 3500 GavetaConfigura p1, m1 Timer_Status.Enabled = True End Sub Private Sub Option2_Click() serial = 2 DriverGaveta serial, GAVETA_INICIALIZA p1 = 150 m1 = 3500 GavetaConfigura p1, m1 Timer_Status.Enabled = True End Sub Private Sub Option3_Click() serial = 3 DriverGaveta serial, GAVETA_INICIALIZA p1 = 150 m1 = 3500 GavetaConfigura p1, m1 Timer_Status.Enabled = True End Sub Private Sub Option4_Click() serial = 4 DriverGaveta serial, GAVETA_INICIALIZA p1 = 150 m1 = 3500 GavetaConfigura p1, m1 Timer_Status.Enabled = True End Sub Private Sub Timer_Status_Timer() Dim funcao As Integer funcao = DriverGaveta(serial, GAVETA_ESTADO) If funcao = 2 Then Lbl_status.Caption = "Status da gaveta: ABERTA" ElseIf funcao = 1 Then Lbl_status.Caption = "Status da gaveta: FECHADA" End If End Sub O link para download do projeto xDev é este: http://www.sqllib.com.br/xDev.zip http://www.sqlmanager.net/en/products/mysql/manager/download João Santos - São Paulo. kmt_karinha@pop.com.br FW 2.3C CLIP 5.3B FWH 2.7 - BLINKER 7.0 WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
personal Posted December 6, 2005 Report Share Posted December 6, 2005 João, não esqueci do problema, mas é que estou sem gaveta de acionamento serial, que não pela ECF. Acho que na quinta vou estar num cliente que ainda tem uma. Aà posso testar em FW, pois lá roda em DOS. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 6, 2005 Author Report Share Posted December 6, 2005 citação:João, não esqueci do problema, mas é que estou sem gaveta de acionamento serial, que não pela ECF. Acho que na quinta vou estar num cliente que ainda tem uma. Aà posso testar em FW, pois lá roda em DOS. id=quote>id=quote>OBRIGADO SERGIO... FICO NO AGUARDO... NÃO ESQUEÇA, FIVE 16 BITS, DLL DA MENNO. O link para download do projeto xDev é este: http://www.sqllib.com.br/xDev.zip http://www.sqlmanager.net/en/products/mysql/manager/download João Santos - São Paulo. kmt_karinha@pop.com.br FW 2.3C CLIP 5.3B FWH 2.7 - BLINKER 7.0 WorkShop.Exe Editado por - kapiaba on 08/12/2005 13:08:19 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.