Allgemeine Fragen zur PROFAN Programmierung
Views (Heute): 249397 (10833)
  Suchen
 Zurück zur Übersicht
 AutorThema: Listbox drucken
Horst Horn
Datum:21.10.01 11:11 Antwortenals Email verschicken (privat@horsthorn.de) 


Hallo an Alle
Grosse Frage:
Wie kann ich den Inhalt einer Listbox, deren Text mit
Addstring "...
Addstring "...
erstellt wurde, ausdrucken ?



Sebastian Sprenger
Datum:21.10.01 13:01 Antwortenals Email verschicken (prof.chaos@netcologne.de) 


Hallo, die Befehle assign und rewrite können auch den Drucker ansprechen:

  declare a%,a$
  clearlist
  addstring "Eintrag 1"
  addstring "Eintrag 2"
  addstring "Eintrag 3"
  assign #2,"PRN"
  rewrite #2
  let a%=0
  whilenot equ(a%,%getcount)
    let a$=listboxitem$(a%)
    let a$=ansitooem$(a$)
    print #2,a$
    inc a%
  endwhile
  print #2,chr$(12)
  close #2
Das Beispiel funktioniert allerdings nicht unter Windows NT und Windows 2000. (wie immer?)
Gruß, Sebastian


Horst Horn
Datum:21.10.01 14:19 Antwortenals Email verschicken (privat@horsthorn.de) 


Danke für die schnelle Auskunft
Da ich Windows-ME habe, hat es funktioniert ;o))


Rolanmd G. Hülsmann
Datum:22.10.01 08:44 Antwortenals Email verschicken (rgh-soft@t-online.de) 


Nur ein Hinweis: Auch unter Windows XP wird es nicht mehr so funktionieren, da es ebenso wie Windows 2000 auf Windows NT aufbaut und dieses aus Sicherheitsgründen keinen direkten Zugriff auf die Hardware unterstützt. Und danmit fällt auch der bisher im Betriebssystem verankerte "Dateiname" für den Drucker flach.
Es sollte aber kein Problem sein, das Beispiel zur Ausgabe über StartPrint, Drawtext, Endprint umzuschreiben.

Gruß Roland


Horst Horn
Datum: 22.10.01 09:07 Antwortenals Email verschicken (privat@horsthorn.de) 


Hallo Roland
Danke für den Hinweis. Da ich mir so in der Art was gedacht habe, speichere ich jetzt den Inhalt der Listbox nach dem Beispiel in einer temporären Datei ab und lasse die dann ausdrucken. Klappt im Moment perfekt und ich denke mal, das wird unter ...XP auch funktionieren ...und Tschüss


 Zurück zur Übersicht