Das deutsche QBasic- und FreeBASIC-Forum

[Jean-Marc]

Hallo,

Ich habe viele QB (Qbasci, QB45, egal) Progr. die sehr gut funktionieren.
Es geht nur um Daten (Texte, Zahlen) und das Umprogrammieren
auf VB bringt weitgehend nicht die gleiche Benützungsvorteile wie bei
QB ! Jedoch, Ausdrucken auf meinem Drucker (nur USB-Anschluss)
geht nicht direkt ... ist ja bekannt.

Ich suche also eine Lösung.
>> Ich habe erfolglos schon folgendes
probiert:
a) statt "LPT1", "PRN" benützt (Open "PRN" ...), geht nicht;
b) die Daten in eine Datei schreiben und mit einem VB-Programm
lesen und auf den Drucker auszudrucken ... funktionniert nur wenn
das VB-Programm gestart wird nachdem das QB-Programm zu Ende
ist .... ist aber zu kompliziert, für jeden Ausdruck, diese Umschalterei !
Also, ich suche eine Idee im Stil: VB-Programm im Hintergrund
laufen lassen ohne QB zu stören, oder .... ?

WER HAT IDEEN ZU DIESEM THEMA ?

Danke im Voraus, einen guten Rutsch ins neue Jahr
und schönen Gruss aus Gran Canaria mit viel Sonne ! :)

Jean-Marc

email: vario25@wanadoo.es
_________________
VIVA ESPAÑA

[Devilkevin]

Warum nicht einfach mit Word öffnen ?
_________________
www.piratenpartei.de

[Jean-Marc]

Hi,
Für Testzwecke OK mit Word, in der Praxis viel zu kompliziert,
da ich zur Datei per Programm noch Config-Daten mit gebe für die gute
Gestaltung auf dem Papier,
Darum suche ich die Lösung durch Programmierung.
Aber Danke für Deine Antwort.
J-Marc

_________________
VIVA ESPAÑA

[Sebastian]

Hallo.

Mit dem Prinzip Serverprogramm im Hintergrund hab ich schon vieles gemacht. Ich verwende diese Konstellation öfters, wie zum Beispiel in meinem Quiz für das Soundmodul (=> Siehe Signatur).

Alsoo...

Am besten du startest das VB Programm gleich am Anfang des QB Programms.
Das VB Programm muss in einer Endlosschleife wie dieser laufen:

[Thomas Antoni]

Zu diesem Thema habe ich mir für die QB-MonterFAQ Folgendes vorgemerkt ...

--------------------------------------------------------------------------------

Frage:
--------
Wie drucke ich QB-Programme auf einen Windows-Drucker aus?

Ich will QBasic-Programme oder andere DOS-ASCII-Textdateien in MS-Word einlesen
und korrekt mit Sonderzeichen ausdrucken!

Hilfe - Meine neue Windows-Textverarbeitung kann keine DOS-ASCII-Text mehr
einlesen!

((z.T. aus meiner MS-DOS-FAQ übernommen ))


Antwort 1
----------
[ von Thomas Antoni, 27.6.2003 - 19.3.2004 ]

*** BAS-Dateien ausdrucken mit dem normalen Windows-Editor
BAS-Quellspracheprogramme kann man mit dem Windows-Editor ausdrucken, der in der
Programmgruppe "Zubehör" zur Verfügung steht. Dazu muss man im Menüpunkt [Datei|
Öffnen...] als Dateityp "Alle Dateien" wählen. Leider werden dort die Umlaute
und Sonderzeichen nicht korrekt dargestellt, weil Windows den ANSI-Zeichencode
und nicht den DOS-ASCCI-Code verwendet. Du kannst das Problem umgehen, indem Du
ind Deinen Quellspracheprogrammen für die Umlaute die Schreibweise mit ae statt
ä, ue statt ü, ss statt ? usw. verwendest. Das ist imer zu empfehlen, wenn Du
die Quelltexte im Internet oder in Tutorials wiedergeben willst. Ansonsten
helfen Dir die folgenden Tipps weiter.

Verwendest Du QickBASIC 4.5 oder 7.1? Dann musst Du beim Abspeichern Deiner
Programme undbedingt die Option "Text - von anderen Programmen lesbar" wählen.
Sonst speichert QB das Programm im eigenen gepackten Format ab, das für
andere Programme nicht lesbar ist.


*** DOS-ASCII- und Windows-ANSI-Code
Unter DOS - und somit auch bei QBasic wird Text im ASCII-Code dargestellt, so
auch QBasic- Quellspracheprogramme. Unter Windows erfolgt die Textdarstellung
jedoch im ANSI- Code. Siehe die LEXIKON-Einträge zu -> ASCII und ->ANSI sowie
die Frage -> "Wie wandle ich DOS-ASCII in Windows-ANSI-Text um?" in der
Kategorie "Texte bearbeiten".

Aufgrund der unterschiedlichen Zeichencodes werden die Umlaute und einige
Sonderzeichen (z.B. Kastensymbole) von DOS-Text in den meisten Windows-
Textverarbeitungen nicht richtig angezeigt und lassen sich nicht mit korrekten
Sonderzeichen ausdrucken.


*** Dateiformat von .BAS-Programmen bei QBasic und QuickBasic
QBasic speichert .BAS-Programme grundsätzlich immer im DOS-ASCII-Format.
QuickBasic verwendet alternativ ein eigenes (gepacktes) Format; dort musst Du
die folgenden Bedienschritte durchführen, um ein Programm als reinen DOS-Text
abzuspeichern: <Datei | Speichern unter... | Text - von anderen Dateien lesbar>.


*** Umwandlung von DOS- in Windows-Text
Bevor Du DOS-Text unter Windows ausdrucken kannst, musst Du ihn in Windows-
ANSII-Text umwandeln. Das geht völlig problemlos: Jeder halbwegs komfortable
Windows-Texteditor kann ASCII- in ANSI-Text umwandeln, z.B. mein
heißgeliebter M&I-WinEditor ( http://www.mitan.de/misoft.htm ).

Auch nahezu jede Textverarbeitung (Word für Windows & Co.) kann diese Datei-
Konvertierung bewerkstelligen. Bei älteren Word-Versionen geht das einfach über
<Datei | Öffnen bzw. Import | DOS-Text>

Es gibt natürlich einige wenige exotische Sonderzeichen, etwa die Kastensymbole
mit Doppelstrichen, die grundsätzlich nicht korrekt umgewandelt werden können,
da es dafür kein entsprechendes ANSI-Zeichen gibt.


*** QB-Programme und andere ASCII-Textdateien mit Word öffnen
Word für Windows ab Version 97 konvertiert beim Öffnen von Dateien diese nicht
mehr automatisch von MS-DOS nach ANSI. Daher werden die Umlaute und viele
Sonderzeichen nicht richtig dargestellt und lassen sich nicht korrekt
ausdrucken. Dies Problem ist jedoch leicht zu umgehen, wofür es zwei Lösungen
gibt:

*** Lösung 1
Ändere die Dateierweiterung "TXT" in "ASC", dann konvertiert Word die Datei beim
Öffnen automatisch in das Windows ANSI-Format

*** Lösung 2
Der Konverter ist bereits installiert, Du musst ihn nur unter
‘Extras/Optionen/Allgemein’ mit dem Schalter ‘Konvertierung beim Öffnen
bestätigen’ aktivieren. Danach fragt Dich Word beim Öffnen einer txt-Datei, in
welchem Format genau diese vorliegt ("Nur Text", entspricht ANSI-Text oder "MS-
DOS-Text" entspricht ASCII.Text etc.).

Übrigens: Eine falsche Entscheidung - egal bei welchem Format - hat keine
Folgen. Du darfst den Text nur nicht speichern. Schließe ihn umgehend und öffne
ihn erneut - diesmal mit dem richtigen Filter.


Antwort 2
---------
[ von Thomas Antoni, 24.4.2003 ]

1) in beliebigen Editor, aber Problem mit Umlauten (ASCII/ANSI)

2) in Word als DOS-Text einlesen

3) unter QB4.5/7.1 als ASCII-lesbaren Text abspeichern:
Dein Problem ist, dass Du die Datei mit QB im falschen Modus gespeichert hast.
Wenn Du Datei|Datei speichern unter... aufrufst, dann gibt es dort bei "Format" zwei Optionen:

QuickBasic (das hast Du benutzt) -
ein komprimiertes, verschlüsseltes Format

und Text (das musst Du anklicken) -
das normale, unverschlüsselte Textformat

Ja, das speicherst Du dann so im Textformat und dann sollte alles gehen...


Antwort 3
------------
[ von Andreas Meile ("Dreael", ), im QB-Forum, 22.11.04 ]

Siehe dazu

http://www.dreael.ch/Deutsch/BASIC-Knowhow-Ecke/BASICunterWindows95_98_NT.html

Ansonsten meine Tipps bzw. Vorschläge zumindest, die Du einmal ausprobieren kannst: Gib das Gerät im Netzwerk frei (NET SHARE im Prompt oder einfacher rechte Maustaste und "Freigabe"). Anschliessend gib in der Eingabeaufforderung
Code:
NET USE LPT1: \\PCNAME\FREIGABE

ein. Damit verpasst Du dem Drucker ein DOS-konformes LPT, so dass QB damit etwas anfangen können sollte. :-) Allerdings bist Du darauf angewiesen, dass der Drucker noch einen klassischen Befehlssatz versteht; dies ist typischerweise bei diesen ganz billigen GDI-Druckern nicht mehr gegeben, sondern nur die etwas teureren Laserdrucker mit PostScript-Emulation sind in der Lage, solche klassischen Befehlssätze zu verarbeiten. Am besten einmal damit etwas herumexperimentieren.

Ansonsten dürfte http://www.dosprint.com/ Dein wirklicher Freund und Helfer sein, denn diese Firma hat eine Emulationssoftware entwickelt.


--------------------------------------------------------------------------------
_________________
+++ Die beliebte QBasic CD-ROM von QBasic.de - 670 MB QBasic-Stuff mit komfortabler HTML-Oberfläche. Für nur 5 EUR bestellbar auf www.antonis.de/qbcdueb.htm +++

[Jean-Marc]

Das Problem liegt nicht bei der Code-Umwandlung zum Drucken,
habe bereits eine Tabelle in Vorbereitung.
Wichtig ist das der Drucker funzt und QB auch weiter nicht
blockiert.
Aber, Vielen Dank für die Angaben.

Auch Dank an Sebastian für die Programm-Codes.

Alles wird ausprobiert - und Resultat mitgeteilt,
dass es für weitere nütlich ist.

Tschüss an allen.

Jean-Marc
_________________
VIVA ESPAÑA

[Sebastian]

Hallo.

Du könntest auch noch Folgendes probieren:

VB Programm:

[Mr.Qb.4.5]

Hallo,

wenn du eine reine Textdatei über einen USB-Drucker drucken willst, dann mach das mit dem integrierten Editor.
und schreib dann in dein QB-Programm folgende Zeile rein:
SHELL"notepad /p Datei.txt"

Hoffe das hilft dir.
MFG
Mr.Qb.4.5

[dreael]

Artikel zum Thema:

http://www.dreael.ch/Deutsch/BASIC-Knowhow-Ecke/BASICunterWindows95_98_NT.html

Ansonsten ein kleiner Versuch wert (Achtung: NAT-Hardware-Firewall nötig, damit der PC nicht nackt im Internet draussen steht!): Datei- und Druckerfreigabe aktiveren, anschliessend Drucker freigeben und diesen mit