GdiplusStartup: Unterschied zwischen den Versionen

Aus API-Wiki
Wechseln zu: Navigation, Suche
K
 
Zeile 79: Zeile 79:
 
*Windows NT 4.0 SP6 und später
 
*Windows NT 4.0 SP6 und später
  
[[Kategorie:GDI+]]
+
[[Kategorie:GDIPlus]]

Aktuelle Version vom 1. Oktober 2008, 23:26 Uhr

Die API-Funktion GdiplusStartup initialisiert die GDI+ Instanz. Erst nach erfolgreicher Initialisierung können Sie alle GDI+ Funktionen nutzen.

Declare Function GdiplusStartup Lib "GdiPlus.dll" ( _
                 ByRef token As Long, _
                 ByRef lpInput As GDIPlusStartupInput, _
                 ByRef lpOutput As GdiplusStartupOutput) As Status
                 
Declare Function GdiplusStartup Lib "GdiPlus.dll" ( _
                 ByRef token As Long, _
                 ByRef lpInput As GDIPlusStartupInput, _
                 Optional ByVal lpOutput As Long) As Status
Parameter:

token

Zeiger auf eine Variable vom Typ Long, welche den Zeiger auf die GDI+ Instanz aufnehmen kann.
Die GDI+ Instanz muss, wenn sie nicht mehr verwendet wird, mit dem zurückgegebenen Zeiger mittels GdiplusShutdown wieder beendet werden.

lpInput

Zeiger auf eine GDIPlusStartupInput-Struktur in welchem die Informationen zur Initialisierung übergeben werden.

lpOutput

Zeiger auf eine GdiplusStartupOutput-Struktur. Wenn kein Wert übergeben werden soll, muss in der Deklaration ByVal lpOutput As Long, und im Funktionsaufruf ByVal 0& übergeben werden.
Beispiel:
Private lngToken As Long

' erste Deklaration
Private Sub Form_Load()

    Dim tGDIPlusStartupInput As GDIPlusStartupInput
    Dim tGdiplusStartupOutput As GdiplusStartupOutput

    GdipStartupInput.GdiPlusVersion = 1&

    If GdiplusStartup(lngToken, tGDIPlusStartupInput, _
        tGdiplusStartupOutput) <> OK Then

        MsgBox "Fehler beim initialisieren der GDI+ Instanz!", _
            vbCritical, "Fehler!"

    End If

End Sub

' zweite Deklaration
Private Sub Form_Load()

    Dim tGDIPlusStartupInput As GDIPlusStartupInput

    tGDIPlusStartupInput.GdiPlusVersion = 1&

    If GdiplusStartup(lngToken, tGDIPlusStartupInput) <> OK Then

        MsgBox "Fehler beim initialisieren der GDI+ Instanz!", _
            vbCritical, "Fehler!"

    End If

End Sub
Rückgabe(n):

War der Aufruf der Funktion erfolgreich wird "OK" aus der Enumeration Status zurückgegeben. Im Fehlerfall wird Ihnen ein anderer Wert aus der Enumeration Status zurückgegeben.

Hinweise:

Die GDI+ Instanz muss, wenn sie nicht mehr verwendet wird, mit dem zurückgegebenen Zeiger mittels GdiplusShutdown wieder beendet werden.

Ab Windows XP ist GDI+ standardmäßig installiert. Für alle anderen unterstützten Betriebssysteme kann das "GDI+ Platform SDK Redistributable Paket" unter folgender Adresse kostenlos herruntergeladen werden. GDI+ Platform SDK Redistributable Paket

Beachten Sie unbedingt die Hinweise zur Installation der GdiPlus.dll in der redist.txt, die im "GDI+ Platform SDK Redistributable Paket" enthalten ist.

Betriebssystem:

Die API-Funktion GdiplusStartup ist unter folgenden Betriebssystemen funktionsfähig:

  • Windows 98 und später
  • Windows NT 4.0 SP6 und später