Cancelar a Impressão feita por PrintFileRaw

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Avatar do usuário
asimoes
Colaborador
Colaborador
Mensagens: 4919
Registrado em: 26 Abr 2007 16:48
Localização: RIO DE JANEIRO-RJ

Cancelar a Impressão feita por PrintFileRaw

Mensagem por asimoes »

Senhores,

Existe alguma função para cancelar a impressão iniciada pela função PrintFileRaw?
Ou cancelar a impressão da lista de documentos que estão sendo impressos?

[]´s
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: Cancelar a Impressão feita por PrintFileRaw

Mensagem por sygecom »

É uma Gambi, mas pode fazer assim:

Código: Selecionar todos

FUNCTION LIMPA_SPOOLER
LOCAL nHandle, arq:="temp.bat"

FERASE(arq)
arqh=fcreate(arq,0)
if !arqh>0
   Return
ENDIF
FCLOSE(aRQH)
nHandle=FOPEN(arq,2)
FWRITE(nHandle,"net stop spooler" + HB_OsNewLine())
FWRITE(nHandle,"cd %systemroot%\system32\spool\PRINTERS" + HB_OsNewLine())
FWRITE(nHandle,"del /f /s *.shd" + HB_OsNewLine())
FWRITE(nHandle,"del /f /s *.spl" + HB_OsNewLine())
FWRITE(nHandle,"net start spooler" + HB_OsNewLine())
FCLOSE(nHandle)
MYRUN(arq) // executa o .BAT
RETURN
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Responder