Flexgrid auslesen...

[Dusty00]

Hy,

Ich habe ein Problem beim auslesen meines MsFlexgrids bzw. bei der Ausgabe des Inhaltes dann auf dem Drucker. Ich lese eine Spalte des Flexgrids ein und will dann die gesamte Spalte mittels Printer.CurrentX (/Y) für den Ausdruck positionieren!

For x = GridArtikel.FixedRows To GridArtikel.Rows - 1

    
    spalte1 = spalte1 + GridArtikel.TextMatrix(x, 0)
    
     If x < GridArtikel.Rows - 1 Then spalte1 = spalte1 + vbNewLine


Next x

Printer.CurrentX = 1

Printer.Print spalte1

Leider wird nur der Erste Eintrag aus dem Flexgrid auf Position X also 1cm vom Rand gesetzt. Das sieht ca. so aus:

_________Eintrag1

Eintrag2

Eintrag3

Eintrag4

usw.

Wie bekomme ich die restlichen Einträge auch mit einem Seitenabstand von 1cm auf den Drucker?

mfg

dusty

 

[Alex F.]

1. du setzt die CurrentX doch nur einmal. du müsstest deine spalte1 in der Schleife also jedes mal setzen und dann printer.print aufrufen da du aber noch mehr spalten drucken willst wird das nicht so ganz funktionieren also habe ich mal gegoogled ( denn ich wusste wo ich suchen muss ) und das hier für dich gefunden :
http://www.activevb.de/tipps/vb6tipps/tipp0249.html

Gruss bb