also mit EnableExplicit, ohne läuft es.
Code: Alles auswählen
EnableExplicit ; <- Auskommentieren!!!
Procedure OpenKey(lhKey.i, SubKey$, ulOptions.i)
Protected lhKeyOpen.i
Protected lResult.i
lResult = RegOpenKeyEx_(lhKey, SubKey, 0, ulOptions, @lhKeyOpen)
EndProcedure