CloseHandle: Unterschied zwischen den Versionen

Aus API-Wiki
Wechseln zu: Navigation, Suche
Zeile 1: Zeile 1:
 
Diese Funktion schließt ein Kernelobjekthandle, z.B. eine Datei oder einen Datenkanal. Kanäle können zu einem COM- oder LPT-Port, ein Gerät, einem Dienst oder einer Console geöffnet worden sein.  
 
Diese Funktion schließt ein Kernelobjekthandle, z.B. eine Datei oder einen Datenkanal. Kanäle können zu einem COM- oder LPT-Port, ein Gerät, einem Dienst oder einer Console geöffnet worden sein.  
  
<syntaxhighlight lang="vb">
+
<syntaxhighlight lang="<syntaxhighlight lang="vb">">
 
' VB 5/6
 
' VB 5/6
 
Declare Function CloseHandle Lib "kernel32.dll" ( _
 
Declare Function CloseHandle Lib "kernel32.dll" ( _
 
                             ByVal hObject As Long) As Long
 
                             ByVal hObject As Long) As Long
 
</syntaxhighlight>
 
</syntaxhighlight>
<syntaxhighlight lang="vbnet">
+
<syntaxhighlight lang="<syntaxhighlight lang="vb">net">
 
' VB.NET
 
' VB.NET
 
<DllImport("kernel32.dll", SetLastError:=True)> _
 
<DllImport("kernel32.dll", SetLastError:=True)> _
Zeile 28: Zeile 28:
 
==Beispiel==
 
==Beispiel==
  
<syntaxhighlight lang="vb">
+
<syntaxhighlight lang="<syntaxhighlight lang="vb">">
 
     Dim CloseResult as Long
 
     Dim CloseResult as Long
  
Zeile 34: Zeile 34:
 
      
 
      
 
     If CloseResult = 0 Then
 
     If CloseResult = 0 Then
         MsgBox "Fehler beim Schließen des Objektes!", vbCritical, "Fehler!"
+
         MsgBox "Fehler beim Schließen des Objektes!", <syntaxhighlight lang="vb">Critical, "Fehler!"
 
     End If
 
     End If
 
</syntaxhighlight>
 
</syntaxhighlight>

Version vom 5. November 2016, 22:09 Uhr

Diese Funktion schließt ein Kernelobjekthandle, z.B. eine Datei oder einen Datenkanal. Kanäle können zu einem COM- oder LPT-Port, ein Gerät, einem Dienst oder einer Console geöffnet worden sein.

">
' VB 5/6
Declare Function CloseHandle Lib "kernel32.dll" ( _
                             ByVal hObject As Long) As Long
net">
' VB.NET
<DllImport("kernel32.dll", SetLastError:=True)> _
Public Shared Function CloseHandle(ByVal hObject As IntPtr) As <MarshalAs(UnmanagedType.Bool)> Boolean
End Function

Übergabe

hObject

hObject erwartet ein gültiges Kernelobjekthandle als Übergabe (z.B. von CreateFile).


Rückgabe

War die Funktion erfolgreich, so erfolgt eine Übergabe eines Wertes ungleich 0. Sollte die Funktion fehlschlagen, so kann die Fehlerursache mittels Err.LastDLLError festgestellt werden.


Beispiel

">
    Dim CloseResult as Long

    CloseResult = CloseHandle(FileHandle)
    
    If CloseResult = 0 Then
        MsgBox "Fehler beim Schließen des Objektes!", <syntaxhighlight lang="vb">Critical, "Fehler!"
    End If