sstecca1361303622 Posted July 9, 2008 Report Share Posted July 9, 2008 Bom dia a todos. Estou com um problema em cliente que é o seguinte, anteriormente o cliente imprimia atraves de meu sistema relatorios e alguns txt´s modo texto atraves do Xin98. Mas agorar ele trocou as maquinas para WinXp e as impressoes ficaram muito lentas, consegui alterar para que continuassem seguindo o mesmo padrao texto, mas a impressao em si ficou lenta demais. Alguem ja passou por algo parecido? Eu sei que o Win98 tem um gerenciamento de impresoes Dos atraves do DOSPRINT que no caso do Xp nao existe. Agradeço desde ja a atenção. Quote Link to comment Share on other sites More sharing options...
sstecca1361303622 Posted July 9, 2008 Author Report Share Posted July 9, 2008 Bom dia a todos. Estou com um problema em cliente que é o seguinte, anteriormente o cliente imprimia atraves de meu sistema relatorios e alguns txt´s modo texto atraves do Xin98. Mas agorar ele trocou as maquinas para WinXp e as impressoes ficaram muito lentas, consegui alterar para que continuassem seguindo o mesmo padrao texto, mas a impressao em si ficou lenta demais. Alguem ja passou por algo parecido? Eu sei que o Win98 tem um gerenciamento de impresoes Dos atraves do DOSPRINT que no caso do Xp nao existe. Agradeço desde ja a atenção. Quote Link to comment Share on other sites More sharing options...
Luiz Fernando Posted July 9, 2008 Report Share Posted July 9, 2008 Colega tenta fazer o seguinte para ver se melhora ai, Acessa o REGEDT32, la dentro acha o grupo HKEY_LOCAL_MACHINE, dai vc abre o SYSTEM, depois vai em CONTROLSET001, depois em CONTROL e por ultimo em WOW, apos isto altera o valor de LPT_TIMEOUT o padrao é 15 coloca 1, e depois faz o mesmo processo com o CONTROLSET002 e CORRENTCONTROLSET. Abraços Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR, 1.1,PELES,XDEV,VLIB,ADS LOCAL 7.1 Quote Link to comment Share on other sites More sharing options...
JRICARTE Posted July 9, 2008 Report Share Posted July 9, 2008 Vc TEM QUE ENTRAR DE REGEDIT E MODIFICAR HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\WOW LPT_timeout, PARA 1. Quote Link to comment Share on other sites More sharing options...
sstecca1361303622 Posted July 9, 2008 Author Report Share Posted July 9, 2008 Valew galera, vou testar e posto o resultado obtido. Abraços. Quote Link to comment Share on other sites More sharing options...
sstecca1361303622 Posted July 9, 2008 Author Report Share Posted July 9, 2008 Bem galera, fiz o que vocês me informaram mas infelizmente não obtive o resultado esperado, continuou lento a impressao. O relatorio é impresso basicamente no layout abaixo: +----------------------------+---------------+-------------+ | CLIENTE | Nº DA NOTA | VLR.DOCTO. | +----------------------------+---------------+-------------+ | TESTE 1 | 1234 | 10,00 | | TESTE 2 | 12345 | 15,00 | TESTE 3 | 123456 | 20,00 | +----------------------------+---------------+-------------+ E no Xp ao imprimir as bordas fica lento quando impresso em impressora matricial não sendo modo texto. Caso tenham algo que possa me ajudar, agradeço. Silvio César S. Byte Software e Consultoria Ltda. Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted July 9, 2008 Report Share Posted July 9, 2008 Para impresso Matricial Faça igual no Clipper Set Devi to Printer Set Console off Set printer on @Prow()+1,0 say "| CLIENTE | Nº DA NOTA | VLR.DOCTO. |" @Prow()+1,0 say "+----------------------------+---------------+-------------+" Do While .not. eof() @prow()+1, 1 say Cliente @prow(), 12 Say nunNota @prow(), 30 Say Valor @Prow(), 0 Say "|____________________________|_______________|_____________|" Skip Enddo Set Devi to Screen Set Console off Set printer off id=code>id=code>Faço assim e não tenho problemas... ------------------------- Luiz Arruda - Corumbá/MS FWH 2.4-WS-xHB 09950-xDev ico.corumba@gmail.com ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Editado por - ico on 09/07/2008 14:43:39 Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted July 9, 2008 Report Share Posted July 9, 2008 Esqueci de dizer depois do PrinterSetup() dependendo da impressora desvio para o PRG if oPrn:nLogPixelX()<300 //* matricial lx300+ Vai para PRG da Matricial release all return elseif oPrn:nLogPixelX()>=300 //* jato laser Vai para PRG das outras.. id=code>id=code>Espero que ajude.. ------------------------- Luiz Arruda - Corumbá/MS FWH 2.4-WS-xHB 09950-xDev ico.corumba@gmail.com ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Editado por - ico on 09/07/2008 14:47:37 Quote Link to comment Share on other sites More sharing options...
Luiz Fernando Posted July 9, 2008 Report Share Posted July 9, 2008 citação:Para impresso Matricial Faça igual no Clipper Set Devi to Printer Set Console off Set printer on @Prow()+1,0 say "| CLIENTE | Nº DA NOTA | VLR.DOCTO. |" @Prow()+1,0 say "+----------------------------+---------------+-------------+" Do While .not. eof() @prow()+1, 1 say Cliente @prow(), 12 Say nunNota @prow(), 30 Say Valor @Prow(), 0 Say "|____________________________|_______________|_____________|" Skip Enddo Set Devi to Screen Set Console off Set printer off id=code>id=code>Faço assim e não tenho problemas... ------------------------- Luiz Arruda - Corumbá/MS FWH 2.4-WS-xHB 09950-xDev ico.corumba@gmail.com ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Editado por - ico on 09/07/2008 14:43:39 id=quote>id=quote>Ola Luiz, qual classe que vc utiliza para fazer relatorios como no modelo acima... Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR, 1.1,PELES,XDEV,VLIB,ADS LOCAL 7.1 Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted July 9, 2008 Report Share Posted July 9, 2008 citação: citação:Para impresso Matricial Faça igual no Clipper Set Devi to Printer Set Console off Set printer on @Prow()+1,0 say "| CLIENTE | Nº DA NOTA | VLR.DOCTO. |" @Prow()+1,0 say "+----------------------------+---------------+-------------+" Do While .not. eof() @prow()+1, 1 say Cliente @prow(), 12 Say nunNota @prow(), 30 Say Valor @Prow(), 0 Say "|____________________________|_______________|_____________|" Skip Enddo Set Devi to Screen Set Console off Set printer off id=code>id=code>Faço assim e não tenho problemas... ------------------------- Luiz Arruda - Corumbá/MS FWH 2.4-WS-xHB 09950-xDev ico.corumba@gmail.com ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Editado por - ico on 09/07/2008 14:43:39 id=quote>id=quote>Ola Luiz, qual classe que vc utiliza para fazer relatorios como no modelo acima... Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR, 1.1,PELES,XDEV,VLIB,ADS LOCAL 7.1 id=quote>id=quote>Nem Uma.. Apenas isso ai .. Velocidade = MS-DOS Tipo de impressão = MS-DOS Caracteres = (Texto MS-DOS ) Abraços.. ------------------------- Luiz Arruda - Corumbá/MS FWH 2.4-WS-xHB 09950-xDev ico.corumba@gmail.com ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Editado por - ico on 09/07/2008 15:29:13 Editado por - ico on 09/07/2008 15:30:34 Quote Link to comment Share on other sites More sharing options...
sstecca1361303622 Posted July 9, 2008 Author Report Share Posted July 9, 2008 Ok Luiz, vou fazer estas alterações e ver no que vai dar. Volto a reportar o resultado, muito obrigado. Abraços. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted August 25, 2008 Report Share Posted August 25, 2008 citação:Para impresso Matricial Faça igual no Clipper Set Devi to Printer Set Console off Set printer on @Prow()+1,0 say "| CLIENTE | Nº DA NOTA | VLR.DOCTO. |" @Prow()+1,0 say "+----------------------------+---------------+-------------+" Do While .not. eof() @prow()+1, 1 say Cliente @prow(), 12 Say nunNota @prow(), 30 Say Valor @Prow(), 0 Say "|____________________________|_______________|_____________|" Skip Enddo Set Devi to Screen Set Console off Set printer off id=code>id=code>Faço assim e não tenho problemas... ------------------------- Luiz Arruda - Corumbá/MS FWH 2.4-WS-xHB 09950-xDev ico.corumba@gmail.com ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Editado por - ico on 09/07/2008 14:43:39 id=quote>id=quote>Luiz, meu piglio, poderia por gentileza enviar um DEMOZINHO deste exemplo funcionando na pratica?? Obrigado. 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...
viol Posted August 25, 2008 Report Share Posted August 25, 2008 Já passei por isto, Para impressão modo texto, instale o drive de impressora GENERICO SOMENTE TEXTO. Viol Quote Link to comment Share on other sites More sharing options...
cendon Posted August 25, 2008 Report Share Posted August 25, 2008 Silvio, dê uma olhada neste post talvez seja isso: http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=13570 Abençoados sejam os pessimistas, eles fizeram backups!! Angelo Cendon cendon.angelo@gmail.com Belo Horizonte-MG Fivewin 2.4 - Harbour 2.4 - @ l,c Workshop Quote Link to comment Share on other sites More sharing options...
Luiz Fernando Posted August 25, 2008 Report Share Posted August 25, 2008 citação:Luiz, meu piglio, poderia por gentileza enviar um DEMOZINHO deste exemplo funcionando na pratica?? Obrigado. 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 id=quote>id=quote>Ola Kapiaba de uma olhada em seu email kapiaba@brfree.com.br e ve se é o que vc esta querendo... Abraços Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR, 1.1,PELES,XDEV,VLIB,ADS LOCAL 7.1 Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted August 25, 2008 Report Share Posted August 25, 2008 citação: citação:Para impresso Matricial Faça igual no Clipper Set Devi to Printer Set Console off Set printer on @Prow()+1,0 say "| CLIENTE | Nº DA NOTA | VLR.DOCTO. |" @Prow()+1,0 say "+----------------------------+---------------+-------------+" Do While .not. eof() @prow()+1, 1 say Cliente @prow(), 12 Say nunNota @prow(), 30 Say Valor @Prow(), 0 Say "|____________________________|_______________|_____________|" Skip Enddo Set Devi to Screen Set Console off Set printer off id=code>id=code>Faço assim e não tenho problemas... ------------------------- Luiz Arruda - Corumbá/MS FWH 2.4-WS-xHB 09950-xDev ico.corumba@gmail.com ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Editado por - ico on 09/07/2008 14:43:39 id=quote>id=quote>Luiz, meu piglio, poderia por gentileza enviar um DEMOZINHO deste exemplo funcionando na pratica?? Obrigado. 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 id=quote>id=quote>Kapiaba, é só copiar e colar isto ai em cima e vc. já tem a impressao, outra Kocita, por amar o FW acima de tudo, voce deve estar colocando o #Include "FiveWin.ch", por isso não está funcionando, cole em um prg separado de qq um que tenha o #Include "fiveWin.ch" e faça o teste.. Abraços.. -------------------- Luiz Arruda - Corumbá/MS FWH 2.4-WS-xHB 09950-xDev ico.corumba@gmail.com Só MSN [ ico67@msn.com ] não mende email neste A Informática Nasceu para resolver problemas que antes não existiamid=blue> Quote Link to comment Share on other sites More sharing options...
kapiaba Posted August 25, 2008 Report Share Posted August 25, 2008 Valeu Galera, RESUELTO. Consegui entender. Obrigado. 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...
kapiaba Posted August 25, 2008 Report Share Posted August 25, 2008 citação: citação:Luiz, meu piglio, poderia por gentileza enviar um DEMOZINHO deste exemplo funcionando na pratica?? Obrigado. 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 id=quote>id=quote>Ola Kapiaba de uma olhada em seu email kapiaba@brfree.com.br e ve se é o que vc esta querendo... Abraços Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR, 1.1,PELES,XDEV,VLIB,ADS LOCAL 7.1 id=quote>id=quote>Luiz Fernando( Arre Quanto LUIZ!! hehehehe ). Com a VODOSPRN.PRG y VOPRNPAD.CH, o Comando PROW() FUNCIONA também??? 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...
Luiz Fernando Posted August 25, 2008 Report Share Posted August 25, 2008 citação: citação: citação:Luiz, meu piglio, poderia por gentileza enviar um DEMOZINHO deste exemplo funcionando na pratica?? Obrigado. 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 id=quote>id=quote>Ola Kapiaba de uma olhada em seu email kapiaba@brfree.com.br e ve se é o que vc esta querendo... Abraços Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR, 1.1,PELES,XDEV,VLIB,ADS LOCAL 7.1 id=quote>id=quote>Luiz Fernando( Arre Quanto LUIZ!! hehehehe ). Com a VODOSPRN.PRG y VOPRNPAD.CH, o Comando PROW() FUNCIONA também??? 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 id=quote>id=quote>Funciona sim... tem esta classe do manuel mercado que tb faz o mesmo serviço. http://fivetechsoft.com/forums/viewtopic.php?t=10974 Abraços Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR, 1.1,PELES,XDEV,VLIB,ADS LOCAL 7.1 Editado por - empresoft on 25/08/2008 18:20:19 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted August 26, 2008 Report Share Posted August 26, 2008 Valeo, friend. Very thanks. 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...
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.