Imprimir flexgrid
Publicado por David (111 intervenciones) el 07/03/2002 05:51:18
Hola, estoy imprimiendo un flexgrid mediante el siguiente código:
Dim Tamano As Integer
Tamano = Grid1.Width
Grid1.Width = Printer.Width
Printer.PaintPicture Grid1.Picture, 0, 0
Printer.EndDoc
Grid1.Width = Tamano
El problema lo tengo cuando los registros que tengo en el flex obligan a imprimir en varias paginas, ya que solo me imprime una pgina, y lo otro pues nada, como si no existiera. Alguna solucion?
Muchas gracias por la atencion.
Dim Tamano As Integer
Tamano = Grid1.Width
Grid1.Width = Printer.Width
Printer.PaintPicture Grid1.Picture, 0, 0
Printer.EndDoc
Grid1.Width = Tamano
El problema lo tengo cuando los registros que tengo en el flex obligan a imprimir en varias paginas, ya que solo me imprime una pgina, y lo otro pues nada, como si no existiera. Alguna solucion?
Muchas gracias por la atencion.
Valora esta pregunta


0