Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Drucken über winspool

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Windows-spezifische Fragen
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
hhm



Anmeldungsdatum: 28.04.2010
Beiträge: 8

BeitragVerfasst am: 16.11.2011, 16:34    Titel: Drucken über winspool Antworten mit Zitat

Führt zu einem Fehler No 87 = ERROR_INVALID_PARAMETER:

Zitat:
#Include "win/winspool.bi"

Sub drucken()
Dim lhPrinter As Any Pointer
Dim lReturn As Long
Dim pPrinterName As LPSTR

*pPrinterName = "Generic / Text Only"

lReturn = OpenPrinter(pPrinterName , lhPrinter, 0)

If lReturn = 0 Then
MessageBox(0, Str(GetLastError), "Fehler", 0)
Exit Sub
End If


End Sub

Wie übergibt man korrekt den Printer-Namen?
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
XOR



Anmeldungsdatum: 23.07.2010
Beiträge: 161

BeitragVerfasst am: 16.11.2011, 18:37    Titel: Antworten mit Zitat

So sollte es funktionieren. C++ Beispiel
Code:
#Include "windows.bi"
#Include "win/winspool.bi"

Sub drucken()
   Dim As HANDLE hPrinter = NULL
   Dim As Long lReturn
   Dim As LPTSTR pPrinterName
   
   pPrinterName = StrPtr("Generic / Text Only")
   
   lReturn = OpenPrinter(pPrinterName , @hPrinter, NULL)
   
   If lReturn = 0 Then
      MessageBox(NULL, Str(GetLastError()), "Fehler", NULL)
      Exit Sub
   EndIf
End Sub
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
hhm



Anmeldungsdatum: 28.04.2010
Beiträge: 8

BeitragVerfasst am: 17.11.2011, 13:09    Titel: Antworten mit Zitat

Funktioniert!

Besten Dank.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Windows-spezifische Fragen Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz