Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Eine kleine Hilfe !
Autor: LonelySuicide666
Datum: 17.08.01 18:43
Schreib es mal so dann gehts auch, ist aber möglich das der letzte eintrag doppelt oder gar nicht gedruckt wird darum solltest du vorher prüfen ob eine grade anzahl von feldern in der listbox existieren sonst muss du wohlmöglich noch ein Dummy einfügen das keine Zeichenfolge beinhaltet, Probiers mal sonst muss ich dir was Besseres schicken. Das ganze problem ist das bei jedem aufruf von Printer.Print der Zeiger Printer.CurrentY sich um die Zeilenhöhe des geschrieben Textes nach unten verschiebt. Das heist, entweder rufst du die ganze zeile mit einmal auf die du drucken willst, oder aber du musst CurrentY wieder zu dem Punkt zurücksetzen der vor dem Print befehl aufgerufen wurde, das musst du allerdings bei Printer.CurrentX dann auch machen. CurrentX/Y sind sozusagen die Positionsangaben an dem der Text ausgegeben wird, und Printer.Print verschiebt diese halt um eine Zeile !!! Private Sub cmdPrint_Click() Dim i As Long If frmMain.lstLoadFiles2.ListCount < 1 Then Exit Sub For i = 0 To frmMain.lstLoadFiles2.ListCount - 1 step 2 Printer.Print frmMain.lstLoadFiles2.List(i -1) & String(2, vbTab) & _ frmMain.lstLoadFiles2.List(i) Next End Sub

Alle Einträge aus einer Listbox zum Drucker senden - mehr da...	76	Kabal	16.08.01 16:34
Re: Alle Einträge aus einer Listbox zum Drucker senden - meh...	427	unbekannt	16.08.01 17:43
Re: Alle Einträge aus einer Listbox zum Drucker senden - meh...	59	Kabal	16.08.01 17:58
Hy CyberLord ! Es klappt nicht	56	Kabal	16.08.01 18:22
Eine kleine Hilfe !	56	LonelySuicide666	17.08.01 18:43
Re: Eine kleine Hilfe !	52	Kabal	19.08.01 15:51
Nanu, immer noch nicht ???	367	unbekannt	19.08.01 16:13
Re: Nanu, immer noch nicht ???	51	Kabal	19.08.01 16:15
Re: Nanu, immer noch nicht ???	317	unbekannt	19.08.01 16:21
Re: Nanu, immer noch nicht ???	318	unbekannt	19.08.01 16:31
Re: Nanu, immer noch nicht ???	57	Kabal	19.08.01 16:34
So, Cyberlord es klappt so wie ich es wollte!!!	60	Kabal	19.08.01 16:37
Wieso in Ruhe lassen, dafür sind wir doch da (OT)	305	unbekannt	19.08.01 16:43
Re: Wieso in Ruhe lassen, dafür sind wir doch da (OT)	59	Kabal	19.08.01 21:26

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen