Página 6 de 8
Enviado: 27 Fev 2008 12:08
por Poka
Olá a todos
Janio, no post acima tem o comando Getprinters, que retorna a porta da impressora, isso ja resolveria, pois hoje eu salvo as impressoras em um arquivo, e o usuario preenche se é matricial ou jato de tinta. Ficar perguntando toda vez que vai imprimir não acho legal.
Só que a funcao quando a impressora está instalada em outro computador me retorna por exemplo \\PC7\EPSON.
E aí ?. Tem jeito?
Um abraço
Poka
Enviado: 27 Fev 2008 12:50
por Luciano Bonfim
Código: Selecionar todos
procedure Imprime( cArq )
LOCAL oPrinter:=win32prn(),aPrn:=GetPrinters(),cPrinterName,nPrn
If Empty(aPrn)
avi_rep("Não Foi Possivel achar Nenhuma Impressora Instalada, Favor Verificar as Impressoras No Painel de Controle do Windows")
Return
Endif
nPrn:=PrintSetup( @cPrinterName )
oPrinter:New( cPrinterName )
oPrinter:Landscape := formularioLandscape
oPrinter:FormType := 9
oPrinter:Copies := 1
oprinter:SetPrintQuality(1)
if !oPrinter:Create()
avi_rep("Não foi possivel Iniciar a Impressão, Favor Verificar se a Impressora está Ligada")
return
endif
if !oPrinter:StartDoc(nomeRelatorio)
avi_rep("Não foi possivel Iniciar a Impressão, Favor Verificar o Spoll da Impressora")
oPrinter:Destroy()
return
endif
Enviado: 27 Fev 2008 13:38
por sygecom
Apenas para deixar claro que essa função é da HWGUI.
Re: Win32prn para Iniciantes
Enviado: 26 Nov 2008 16:11
por sambomb
Desculpa por desenterrar o tópico, mas alguem tem uma lista das versões compativeis?
Uso xHarbour 1.1.0 + FwXh 8.02 e o exemplo não compilou....
Re: Win32prn para Iniciantes
Enviado: 27 Nov 2008 19:01
por sygecom
Qual o erro que deu ?
Aqui compilou normal com xharbour 1.1.0
Re: Win32prn para Iniciantes
Enviado: 28 Nov 2008 10:52
por sambomb
Simplesmente não apareceu nada... abre o processo mas não faz nada... nem erro deu!
Re: Win32prn para Iniciantes
Enviado: 29 Nov 2008 19:46
por sygecom
Olá sambomb,
De qual exemplo você esta se referindo ? foi postado mais de um exemplo de codigo no topico todo, post o que que esta testando.
Re: Win32prn para Iniciantes
Enviado: 01 Dez 2008 11:02
por sambomb
sygecom escreveu:Olá sambomb,
De qual exemplo você esta se referindo ? foi postado mais de um exemplo de codigo no topico todo, post o que que esta testando.
O da 1ª página, que foi dito estar sendo atualizado pelo que eu li....
Re: Win32prn para Iniciantes
Enviado: 02 Dez 2008 08:39
por Hasse
Bom dia colegas.
O exemplo da 1ª página está devidamente atualizado e funcionando. Foi testado com a versão 1.1.0 do xHarbour. Só não foi testado com a versão 1.2.0, porém acredito que também não haverá qualquer problema.
Como o exemplo é uma rotina totalmente autônoma e não necessita de qualquer outro código externo, quem sabe seria uma boa alternativa compilar o dito em xHarbour puro, entender o seu funcionamento, e depois ir adaptando os módulos de interesse.
Todos os módulos podem ser copiados e colados em qualquer outro prg sem qualquer alteração. Tomar cuidado somente com alguma variável declarada no início e em tempo de execução.
Estou à disposição para qualquer auxílio que se faça necessário.
Re: Win32prn para Iniciantes
Enviado: 04 Dez 2008 08:35
por sambomb
Hasse escreveu:Bom dia colegas.
O exemplo da 1ª página está devidamente atualizado e funcionando. Foi testado com a versão 1.1.0 do xHarbour. Só não foi testado com a versão 1.2.0, porém acredito que também não haverá qualquer problema.
Como o exemplo é uma rotina totalmente autônoma e não necessita de qualquer outro código externo, quem sabe seria uma boa alternativa compilar o dito em xHarbour puro, entender o seu funcionamento, e depois ir adaptando os módulos de interesse.
Todos os módulos podem ser copiados e colados em qualquer outro prg sem qualquer alteração. Tomar cuidado somente com alguma variável declarada no início e em tempo de execução.
Estou à disposição para qualquer auxílio que se faça necessário.
Olá Hasse, a unica coisa que fiz com o exemplo foi adicionar ele a um projeto(no xDev) e compilar, não modifiquei nada nele e pelo que li aqui no tópico imaginei ser alguma incompatibilidade com o xHarbour como as já relatadas.
Re: Win32prn para Iniciantes
Enviado: 04 Dez 2008 14:15
por Hasse
Boa tarde.
Experimente compilar o exemplo de forma autônoma, e verifique o seu funcionamento.
Depois adicione a lib FwXh 8.02 e verifique o que acontece, pois pode haver alguma incompatibilidade ainda não relatada com ela.
Re: Win32prn para Iniciantes
Enviado: 05 Dez 2008 18:35
por sygecom
Bom eu não tenho essa versão da Five, mas com a minha versão da five, não da problema nenhum em usar a win32prn. Acredito que seja outra coisa que estaja pegando ai !!!
Em anexo esta o exemplo do forum compilado e funcionando !!!
Re: Win32prn para Iniciantes
Enviado: 09 Jan 2009 18:53
por edegar_metodo
Compilei o exemplo abaixo, mas deu erro, alguem pode ajudar?
outra pergunta
como faco para definir o tamanho da letra da mesma forma como no word (digo arial 8), digo pois qnd uso o
setfont(´nome da fonte´,altura da fonte,{mult,larg},,,,), altero a fonte, mas nao o tamanho da linha(ficam os espacos das entrelinhas), ai utilizei o LineHeight(tamanho) e resolveu, mas tenho que usar os 2 comandos e achar o LineHeigth(), tem algum comando especifico no caso dos rtf "\fs16 "
Re: Win32prn para Iniciantes
Enviado: 12 Jan 2009 11:34
por sygecom
Olá Edgar,
Tens que passar o caminho completo do "teste.doc" ex:
"C:\MINHA_PASTA\teste.doc"
Re: Win32prn para Iniciantes
Enviado: 17 Jan 2009 16:33
por edegar_metodo
sygecom,
desculpe a demora, (pelo agradecimento), mas com certeza valeu, hoje, apos quase desistir (digo pois estou tentando aprender a win32) e estou gostando..rs,, resolvi dar uma olhada no forum...e vi a resposta....e tentei varias opcoes menos a correta....rs...
mais uma vez obrigado..
Edegar