Problema de Impresion con FWH8.12

Post Reply
norte_67
Posts: 46
Joined: Mon Jul 31, 2006 7:02 pm

Problema de Impresion con FWH8.12

Post by norte_67 »

Estimados amigos, favor su ayuda.

Tengo dos problemas con la impresión, estoy usando FWH.8.12, xHarbour y verce 4.3,

A)el tema es que cuando queria enviar a imprimir me salia que me faltaba una dll y arrojaba un error que el dialogo no existia del preview, lo corregi al copiar las dll en donde esta la aplicación.. y si esta en red.. lo reconocera ???

B) Cuando logre imprimir, me sale el dialogo delante de la ventana de impresion, lo puse en en donde tenga la primera imagen la salida de impresion, pero no me la reconoce... me falta algo... y porque el dialogo de impresion se ajusta al tamaño de la ventana y veo los botones de trabajo del menu principal, como lo cambio para que me ocupe la ventana completa, y al salir vuelva al dialogo que lo genero...

envio copia de mi codigo de prueba.

De aca lo envio del browse:


Redefine BtnBmp oBtn2[4] Id 104 Resource "BTO_PRINT" Of oDlg;
Action (Print_AFP(),oBrw:Gotop(),oLbx1:Refresh())


y aca se recibe para la emision impresa.
Function Print_AFP()
STATIC oRepFam
LOCAL AFont1, AFont2, Afont3

DEFINE FONT AFont1 NAME "ARIAL" SIZE 0,-10
DEFINE FONT AFont2 NAME "ARIAL" SIZE 0,-10 BOLD
DEFINE FONT AFont3 NAME "ARIAL" SIZE 0,-6 BOLD

PrinterSetup()
REPORT oRepFam ;
FONT AFONT1, AFONT2, AFONT3;
CAPTION "Maestro de Familia" ;
TITLE " ",;
"Maestro de Familia",;
" ";
CENTER;
HEADER " ";
LEFT;
FOOTER "Fecha "+ dtoc(date());
CENTER;
PREVIEW

Go top
COLUMN TITLE "Código" DATA tab_Afp->Cod_Afp
COLUMN TITLE "Descripción" DATA Tab_Afp->Nom_Afp

END REPORT
oRepFam:oDevice:lPrvModal := .T.
ACTIVATE REPORT oRepFam

AFont1:End()
AFont2:End()
AFont3:End()

RETURN NIL
Post Reply