Page 1 of 1
cancela la impresión desde printersetup()
Posted: Sun Aug 02, 2009 8:23 am
by dobfivewin
Hola estimados
Se puede cancela la impresión desde printersetup() (para seleccionar una impresora) al colocar CANCELAR
Gracias
David
Argentina
Re: cancela la impresión desde printersetup()
Posted: Tue Aug 04, 2009 9:49 am
by dobfivewin
Listo...
printersetup() si se coloca "Cancelar" devuelve 0 (cero)
Igualmente gracias
David
argentina
Re: cancela la impresión desde printersetup()
Posted: Wed Aug 05, 2009 8:03 pm
by ICO
o invés de PrinterSetup() coloque assim;
Code: Select all
If GETPRINTDC() == 0
msginfo("A Impressao será cancelada ","::..Aviso")
Return .f.
Endif
Espero ter ajudado..
Abraços..
Re: cancela la impresión desde printersetup()
Posted: Thu Aug 06, 2009 6:42 pm
by JOSEMAR
hola colegas,
yo he tratado de hacerlo en distintos reslises del fwh y no me funciona , pense que con la v9.07 se prodria corregir
pero no ,me mando dos veses el cuadro de dialogo de la impresora , tanto al cancelar como al aceptar.
haber si alguein ya lo tiene intalado se lo agradeceriamos mucho.
ha yo lo estoy haciendo en vista no se si tenga algo que ver, pero en xp tampoco me funcionaba.
Re: cancela la impresión desde printersetup()
Posted: Thu Aug 06, 2009 8:58 pm
by ICO
JOSEMAR wrote:hola colegas,
yo he tratado de hacerlo en distintos reslises del fwh y no me funciona , pense que con la v9.07 se prodria corregir
pero no ,me mando dos veses el cuadro de dialogo de la impresora , tanto al cancelar como al aceptar.
haber si alguein ya lo tiene intalado se lo agradeceriamos mucho.
ha yo lo estoy haciendo en vista no se si tenga algo que ver, pero en xp tampoco me funcionaba.
------------------------------------------------------------------------
Lo siento .. no entiendo, usted. esta diciendo que el ejemplo anterior no está funcionando? es?
Uso desde Fw-Clipper hasta 9:04 y funciona a la perfección ..
Lo sentimos qq error en español
Re: cancela la impresión desde printersetup()
Posted: Thu Aug 06, 2009 9:52 pm
by Lautaro
Hola,
Yo utilizo esto para seleccionar la impresora :
Code: Select all
function selecimpresora()
local hdc
local cimpresora
hDC := GetPrintDC( GetActiveWindow() )
if hDC != 0
cimpresora := prnGetname()
endif
DeleteDC(hDC)
IF cImpresora=NIL
cImpresora:=""
ENDIF
return cimpresora
Si el retorno de la function es "" entonces selecciono cancelar o no hay impresoras instaladas.
Atte.,
Lautaro Moreira
Re: cancela la impresión desde printersetup()
Posted: Fri Aug 07, 2009 11:51 am
by ICO
Lautaro..
Tente assim;
Code: Select all
hDC := GetPrintDC( GetActiveWindow() )
if hDC == 0
cImpressoras := prnGetname()
MSGINFO("Impressão cancelada")
Return .f.
endif
Deve Funcionar do jeito que vc. tá querendo.. teste ai.
Abraços..
Re: cancela la impresión desde printersetup()
Posted: Sat Aug 08, 2009 12:24 pm
by Pedro
Yo he usado esto en algunas ocasiones, cuando en algunos reports sé que el usuario puede cancelar la impresión.
Code: Select all
FUNCTION REPORT(nParam....)
Local....
Local...
Local nSw
nSw := PrinterSetup()
If nSw == 0
MsgInfo("Impresión cancelada...")
Return nil
EndIf
Resto del report...........
Si PrinterSetup me devuelve cero es que han pulsado cancelar, y cancelo el report.