Ghost_Vader
04 de Enero del 2006

tengo un MsflexGrid el cual me muestra unos registros, lo que necesito hacer es imprimir el contenido del MsFlexGrid.

Ghost_Vader
04 de Enero del 2006

gracias por tu ayuda.

mvallejos
04 de Enero del 2006

Por lo que veo, no estás usando ningun reporteador, solo una impresión manual.
Para esto, debes recorrer el Flex como si fuera una Matriz, armando una linea de datos por cada fila y enviándola por la impresora

Dim i as integer
Dim j as integer
Dim Linea as String

For i = 1 to Flex.Rows -1
Linea = ""
For j = 0 to Flex.cols -1
Linea = Linea & Flex.TextMatrix(i, j) & " "
Next j
Printer.CurrentX = 57 * 20
Printer.Print Linea
Next i
Printer.EndDoc

Donde con Printer.CurrentX establezco la coordenada X inicial de la impresión de la Linea.
57 Twips en impresora equivale a 1 mm, en el ejemplo se imprime con 2 cm de margen derecho.
Lo que queda por tu cuenta, es formatear el ancho de cada campo como para que te quede todo bien encolumnado.

Saludos