Autor Tema: Problema con pantalla de impresion directa Crytal 8.5  (Leído 2023 veces)

0 Usuarios y 1 Visitante están viendo este tema.

TECNOSOFT

  • Bit
  • Mensajes: 7
  • Reputación: +0/-0
    • Ver Perfil
Problema con pantalla de impresion directa Crytal 8.5
« en: Abril 23, 2011, 08:19:29 pm »
Comunidad que tal.. tengo el siguiente problema cuando mando a imprimir directo con el crystal report 8.5 , antes de comenzar a imprimir me sale una pantalla de impresion .. alguien sabe como quitarla. he buscado por todas la opciones y nada.. esta pantalla tiene una opcion de cancel. entonces en ese momento si el usuario lo presiona cancela la impresion
« última modificación: Abril 25, 2011, 08:23:52 pm por xkiz ™ »

Bazooka

  • Terabyte
  • *****
  • Mensajes: 951
  • Reputación: +31/-20
  • El pibe Bazooka
    • Ver Perfil
    • Desof sistemas
Re:PROBLEMA CON PANTALLA DE IMPRESION DIRECTA CRYSTAL 8.5
« Respuesta #1 en: Abril 25, 2011, 12:39:52 am »
Hola este codigo me funciona a la perfeccion


Código: [Seleccionar]
Private Sub Command1_Click()
         
         Call InitCrys
 
  With CR
        .Reset
        .ReportFileName = App.Path & "\Reports\rptProveedor.rpt"
        .Connect = "DSN=" & App.Path & "\rptCN.dsn;PWD=******"
   
        .WindowTitle = "Lista de Proveedores"

               
        .PageZoom 100
       
        .Action = 1
    End With

End Sub
           
Public Sub InitCrys()

    With CR
        .WindowState = crptMaximized
        .WindowShowCancelBtn = True
        .WindowShowCloseBtn = True
        .WindowShowExportBtn = True
        .WindowShowNavigationCtls = True
        .WindowShowPrintBtn = True
        .WindowShowPrintSetupBtn = True
        .WindowShowProgressCtls = True
        .WindowShowRefreshBtn = True
        .WindowShowSearchBtn = True
        .WindowShowZoomCtl = True
        .WindowMaxButton = True
        .WindowMinButton = True
    End With

End Sub

y solo aparece la ventana del reporte.
Todos somos muy ignorantes. Lo que ocurre es que no todos ignoramos las mismas cosas.