Marcio de Oliveira Posted September 4, 2009 Author Report Share Posted September 4, 2009 mesmo seguindo a logica do Phone.prg, qdo compilo o projeto em outra maquina com fwh 7 ele abre o programa mas da este erro qdo fecho esta dialog oPesq, mas qdo compilo com fwh 2.6 em outra maquina ele nem abre, mas na minha funciona perfeitamente! isso é coisa do capeta!!!! FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 4, 2009 Report Share Posted September 4, 2009 citação:mesmo seguindo a logica do Phone.prg, qdo compilo o projeto em outra maquina com fwh 7 ele abre o programa mas da este erro qdo fecho esta dialog oPesq, mas qdo compilo com fwh 2.6 em outra maquina ele nem abre, mas na minha funciona perfeitamente! isso é coisa do capeta!!!! FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. id=quote>id=quote>Desculpe mais eu perdi alguma coisa no meio do caminho: ERRO?? POSTE O ERROR.LOG A OUTRA MAQUINA ESTA UM ´ESPELHO´ DA SUA QUE FUNCIONA? João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
Marcio de Oliveira Posted September 4, 2009 Author Report Share Posted September 4, 2009 ele não gera log de erro, e a outra maquina não é igual a minha, mas instalei nela todos os programas fwh 2.6 xhb 9930 Bc55 igual a minha inclusive o xdev, compilo normal ele abre o sistema dai faz a verificação dos arquivos e sem mais nem menos sai do programa sem gerar nenhum arquivo de log ou erro! FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 4, 2009 Report Share Posted September 4, 2009 citação:ele não gera log de erro, e a outra maquina não é igual a minha, mas instalei nela todos os programas fwh 2.6 xhb 9930 Bc55 igual a minha inclusive o xdev, compilo normal ele abre o sistema dai faz a verificação dos arquivos e sem mais nem menos sai do programa sem gerar nenhum arquivo de log ou erro! FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. id=quote>id=quote>NÃO GERA ERROR.LOG?? COMO VOCE FEZ A INSTALAÇÃO DO FIVEWIN, XHARBOUR E BORLAND? COPIOU DE UM CD?? FAÇA UM TESTE: PEGUE UM PENDRIVE, E COPIE DIRETORIO A DIRETORIO STEP BY STEP, E Và ´JOGANDO´ NA OUTRA MAQUINA. QUANDO FINALIZAR A INSTALAÇÃO, COMPILE. REPORTE. SE NÃO FUNCIONAR ASSIM, MANDE A MAQUINA PARA O TÉCNICO OU SEU WINDOWS FOI PRO SACO. SEU FIVEWIN 7.12 É ORIGINAL DE FABRICA? João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
Marcio de Oliveira Posted September 4, 2009 Author Report Share Posted September 4, 2009 ja fiz isso, formatei a maquina e instalei windows 2000,e fiz denovo, não entendo se eu compilar com fwh 7 ele funciona mas da o erro em ambas as maquinas, se compilar com fwh 2.6 funciona só na minha mas na outra não mesmo copiando e instalado tudo denovo, meu fw e registrado. FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 4, 2009 Report Share Posted September 4, 2009 citação:ja fiz isso, formatei a maquina e instalei windows 2000,e fiz denovo, não entendo se eu compilar com fwh 7 ele funciona mas da o erro em ambas as maquinas, se compilar com fwh 2.6 funciona só na minha mas na outra não mesmo copiando e instalado tudo denovo, meu fw e registrado. FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. id=quote>id=quote>TESTE EM OUTRA MAQUINA, OU ENVIE PARA OS AMIGOS AQUI DO FORUM TESTAR PARA VOCE. VOCE NÃO ESQUECEU NENHUMA LIB QUE ESTA NA OUTRA MAQUINA DO DIRETORIO DO XHARBOUR, QUE NÃO LEVOU PARA A OUTRA MAQUINA? QUAL É O WINDOWS DA MAQUINA QUE FUNCIONA?? É IGUAL AO DA MAQUINA QUE NÃO FUNCIONA?? MISTÉRIO?? NUNCA VI ISSO! TRANSFIRO MEU FIVEWIN, COPIANDO PARA O PENDRIVE, E FUNCIONA RENDONDO, ATÉ EM NOTE BOOK. João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
Marcio de Oliveira Posted September 4, 2009 Author Report Share Posted September 4, 2009 amigo ja cheguei a colocar meu hd na maquina, e nada, a minha maq é um x3 8650, e maq que estou tentando colocar o programa é um celeron 1.8, ja troquei hd , memoria e não sei mas o q faço! FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 4, 2009 Report Share Posted September 4, 2009 citação:amigo ja cheguei a colocar meu hd na maquina, e nada, a minha maq é um x3 8650, e maq que estou tentando colocar o programa é um celeron 1.8, ja troquei hd , memoria e não sei mas o q faço! FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. id=quote>id=quote>VEJA COM O LUIS ARRUDA, SE ELE TESTA PARA VOCE, OU UM OUTRO AMIGO QUE VOCE CONHEÇA AQUI NO FORUM. O PROBLEMA É LOCALIZADO AI NESTA MAQUINA, COM CERTEZA. SE TIVER OUTRA MAQUINA, DE UM AMIGO POR EXEMPLO, TESTE E NA TERÇA-FEIRA, A GENTE CONTINUA ESTA PARADA. SE QUISER MANDAR OS FONTES E DIALOGOS, EU COMPILO PARA VOCE NA TERÇA-FEIRA. BOM FERIADO E BOAS TENTATIVAS. Abraços João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
Marcio de Oliveira Posted September 4, 2009 Author Report Share Posted September 4, 2009 Muito obrigado, pra vcs tb, depois mando pra vcs.OK FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. Quote Link to comment Share on other sites More sharing options...
Guest n/a Posted September 4, 2009 Report Share Posted September 4, 2009 Veja se isso ajuda. citação:#include "fivewin.ch" STATIC nPedi, nClie, cNome, cEnde, cPeri, nBair, cBair, cCida, cUF, cCEP, cFone,; cPess, dData, cHini, cHfim, nSecs, nSubt, nTaxa, nDesc, nTota, nVpgo, nTrco, aCompra, aUltimo,; aPess, mLista, oVndTmp, cFpgt, lAppend, cObse, cTerminal, oTerminal,; aCod, aDes, aQtd, pUni, pTot, oPdd, oBr2, oCod, oQtd, lCadastrar function main() Public oPesq, nComm DEFINE FONT oFont NAME "Arial Narrow" SIZE 0, -16 BOLD DEFINE DIALOG oPesq RESOURCE "PESQ_TEL" REDEFINE GET oCt38 VAR cFone ID 38 OF oPesq FONT oFont REDEFINE GET oCt34 VAR cEndr ID 34 OF oPesq FONT oFont nRec := 1 REDEFINE LISTBOX oBrEnt ; FIELDS STRZERO(aTempos[nRec,1],10),; // Código aTempos[nRec,2],; // Endereço TRANS(aTempos[nRec,3], "99:99"),; // Hora TRANS(aTempos[nRec,4], "99:99"),; // Entrega Val2Min(aTempos[nRec,5])+" min."; // Tempo ID 103 OF oPesq ; ON DBLCLICK (ConcluirPed(@aTempos, nRec), lLoop := .T., oPesq:End()) ; ALIAS NIL oBrEnt:aHeaders := {"Código", "Endereço", "Hora", "Entrega", "Tempo"} oBrEnt:aColSizes := {70,210,60,60,60} oBrEnt:bLogicLen := {|| len(aTempos )} oBrEnt:bGoTop := {|| nRec := 1 } oBrEnt:bGoBottom := {|| nRec := len(aTempos) } oBrEnt:bSkip := { | nWant, nDo | ; nDo := Min( Max( nWant, 1 - nRec ), ; Len( aTempos ) - nRec ), ; nRec += nDo, nDo } REDEFINE BUTTON oCt39 ID 39 OF oPesq ACTION (ConcluirPed(aTempos, nRec), lLoop := .T., oPesq:End()) REDEFINE BUTTON oCt33 ID 33 OF oPesq ACTION (lSeek := .t.,oPesq:End()) REDEFINE BUTTON oCt36 ID 36 OF oPesq ACTION (lSeek := .f., oPesq:End()) ACTIVATE DIALOG oPesq CENTERED on Init initcomm(oPesq) CloseCOM() oFont:End() return function InitCOMM(oDlg) local cDcb, nError, nBytes ,X nComm:= OpenComm( "COM4", 1024, 128 ) oDlg:bCommNotify := { | nComm, nStatus | BytesAtPort( nComm, nStatus ) } EnableCommNotification( nComm,oDlg:hWnd,20,20) return nComm //-------------------------------------------------------------// function BytesAtPort( nComm, nStatus ) local cBuffer := Space(30 ) ReadComm( nComm, @cBuffer ) // <<<<---- program will lock here cFone:=AllTrim( substr(cBuffer,6,8) ) return cFone //-------------------------------------------------------------// function CloseCOM() if (nComm<>Nil) CloseComm(nComm) endif return //-------------------------------------------------------------// id=quote>id=quote>xHarbour1.1.0|Fwh9.2|Bcc55|Ribbonbar.lib|Pelles|MySQL|PostgreSQL http://www.redstarsoft.net Editado por - lailton.webmaster on 04/09/2009 19:50:44 Quote Link to comment Share on other sites More sharing options...
Marcio de Oliveira Posted September 4, 2009 Author Report Share Posted September 4, 2009 também não funcionou, mas descobri uma coisa, no fwh 7.12 se vc tentar usar a função closecomm() chamando através de uma outra função statica, ele da este erro no programa, mas se vc abrir a porta e fechar na mesma função, ele aceita numa boa, agora vem o seguinte, como vou fazer para abrir a porta e escutala na mesma função sem chama-la através doutra? FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. Quote Link to comment Share on other sites More sharing options...
Marcio de Oliveira Posted September 4, 2009 Author Report Share Posted September 4, 2009 Para funcionar a função bina, eu tenho que abrir a porta, o primeiro buffer que a porta me manda é o numero do fone, dai então eu tenho que fecha-la e reabri-la novamente para funcionar, senão ela não recebe um novo numero, ja tentei zera o buffer, mas não adiantou, então eu tenho que fechar e abrir o programa para poder funcionar novamente. FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. Quote Link to comment Share on other sites More sharing options...
Guest n/a Posted September 4, 2009 Report Share Posted September 4, 2009 Que zica em marcio, o sample phone.prg vc ja tentou usar ? da o mesmo problema ? xHarbour1.1.0|Fwh9.2|Bcc55|Ribbonbar.lib|Pelles|MySQL|PostgreSQL http://www.redstarsoft.net Quote Link to comment Share on other sites More sharing options...
Marcio de Oliveira Posted September 5, 2009 Author Report Share Posted September 5, 2009 sim FiveWin 7.12 for Xharbour 1.1.0(Simplex)+Bcc551+xDev+WinXP SP3. 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.