vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 TOP-Angebot: 17 bzw. 24 Entwickler-Vollversionen zum unschlagbaren Preis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
Re: Mit DeviceCapabilities() Drucker-Papierschächte ermitteln 
Autor: Rainer
Datum: 21.06.15 13:16
Hallo HenryV,
leider hat es mit der Email-Benachrichtigung diesmal nicht geklappt, sodaß ich erst heute auf Deine Antwort gestoßen bin.
In der Zwischenzeit hatte ich Kontakt mit Herrn Schiffer. Er verwies mich letztendlich auch auf den von Dir empfohlenen Befehl. Für die Verwendung der API-Funktion "DeviceCapabilities" hat er eine Korrektur für die Funktionsdefinition, die ebenfalls eine korrekte Lösung ergab. Die korrigierte Definition lautet: 
 
Private Overloads Declare Function DeviceCapabilities _
                                   Lib "winspool.drv" _
                                   Alias "DeviceCapabilitiesA" _
                                         (ByVal DeviceName As String, _
                                          ByVal Port As String, _
                                          ByVal Index As Integer, _
                                          ByVal Output As Short(), _
                                          ByRef lpDevMode As Integer) As Integer
Private Overloads Declare Function DeviceCapabilities _
                                   Lib "winspool.drv" _
                                   Alias "DeviceCapabilitiesA" _
                                         (ByVal DeviceName As String, _
                                          ByVal Port As String, _
                                          ByVal Index As Integer, _
                                          ByVal Output As String, _
                                          ByRef lpDevMode As Integer) As Integer
Die Korrektur verändert den Datentyp des Parameters lpDevMode von ehemals OBJECT in INTEGER. Damit verändert sich dann auch in der Verwendung des Parameters der Parameterinhalt von NOTHING in Null (0). Zu beachten ist dabei noch, daß ich mit .NET Framework Version 3.5 arbeite.
Also etwas verspäteten Dank für Deinen Hinweis.
Gruß, Rainer.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Mit DeviceCapabilities() Drucker-Papierschächte ermitteln2.195Rainer11.06.15 13:05
Re: Mit DeviceCapabilities() Drucker-Papierschächte ermittel...1.408HenryV11.06.15 15:27
Re: Mit DeviceCapabilities() Drucker-Papierschächte ermittel...1.327Rainer21.06.15 13:16

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übersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel