XProfan

Français

Beschreibung:

qui LoadLibrary Funktion ermittelt den Modul-Handle einer DLL. encore pas geladene DLL volonté beim Aufruf automatisch geladen, chez anderen wird seulement qui interne Verwendungszähler augmenté

Deklaration:

Def LoadLibrary(1) !Kernel32, LoadLibraryA

paramètre:

1.paramètre: Bereichsvariable, qui den Namen qui DLL contient

Rückgabewert:

0 chez Mißerfolg, ansonsten cela Handle zur DLL

Beispiele:

Kompilieren Marque Séparation

Beispiel ab XProfan 8
benötigt SKControl.dll
Definitionen
Def LoadLibrary(1) !"Kernel32", "LoadLibraryA"
Def GetProcAddress(2) !"Kernel32", "GetProcAddress"
Def FreeLibrary(1) !"Kernel32", "FreeLibrary"
Deklarationen
Declare hSKControl&
Declare SKCtrl_InitDll&, SKCtrl_DeInitDll&, SKCtrl_InfoBox&
DLL laden (entspricht UseDLL)
hSKControl& = LoadLibrary("SKControl.dll")

If hSKControl& nur wenn die DLL auch gefunden wurde

    Funktionsadressen ermitteln
    SKCtrl_InitDll& = GetProcAddress(hSKControl&, "SKCtrl_InitDll")
    SKCtrl_DeInitDll& = GetProcAddress(hSKControl&, "SKCtrl_DeInitDll")
    SKCtrl_InfoBox& = GetProcAddress(hSKControl&, "SKCtrl_InfoBox")

Else

    End

EndIf

Funktionen direkt aufrufen
Call(SKCtrl_InitDll&)
Call(SKCtrl_InfoBox&)
Call(SKCtrl_DeInitDll&)
DLL freigeben, entspricht FreeDLL
FreeLibrary(hSKC