关于判断开机是否第一次运行程序的问题

拉风晓晓

1. Func _GlobalAddAtom($lpString, $hDll_Kernel32 = "kernel32.dll")
   
2.     Local $avRval = DllCall($hDll_Kernel32, "short", "GlobalAddAtom", "str", StringLeft($lpString, 255))
   
3.     If @error > 0 Then
   
4.         SetError(1); DllCall Error
   
5.         Return 0
   
6.     ElseIf $avRval[0] = 0 Then
   
7.         SetError(2); GlobalAddAtom Error
   
8.     EndIf
   
9.     Return $avRval[0]
   
10. EndFunc  ;==>_GlobalAddAtom
    
11. 
    
12. Func _GlobalDeleteAtom($iAtom, $hDll_Kernel32 = "kernel32.dll")
    
13.     Local $avRval = DllCall($hDll_Kernel32, "short", "GlobalDeleteAtom", "short", $iAtom)
    
14.     If @error > 0 Then
    
15.         SetError(1); DllCall Error
    
16.         Return 0
    
17.     EndIf
    
18.     Return $avRval[0]
    
19. EndFunc  ;==>_GlobalDeleteAtom
    
20. 
    
21. Func _GlobalGetAtomName($iAtom, $iBuffSize = 256, $hDll_Kernel32 = "kernel32.dll")
    
22.     Local $vBuff = DllStructCreate("char[" & $iBuffSize & "]"), $sBuff
    
23.     Local $avRval = DllCall($hDll_Kernel32, "int", "GlobalGetAtomName", "short", $iAtom, "long", DllStructGetPtr($vBuff, 1), "int", $iBuffSize)
    
24.     If @error > 0 Then
    
25.         SetError(1); DllCall Error
    
26.         Return 0
    
27.     ElseIf $avRval[0] = 0 Then
    
28.         SetError(2); GlobalGetAtomName Error
    
29.         Return $avRval[0]
    
30.     EndIf
    
31.     $sBuff = DllStructGetData($vBuff, 1)
    
32.     $vBuff = 0
    
33.     Return $sBuff
    
34. EndFunc  ;==>_GlobalGetAtomName
    
35. 
    
36. Func _GlobalFindAtom($lpString, $hDll_Kernel32 = "kernel32.dll")
    
37.     Local $avRval = DllCall($hDll_Kernel32, "short", "GlobalFindAtom", "str", $lpString)
    
38.     If @error > 0 Then
    
39.         SetError(1); DllCall Error
    
40.         Return 0
    
41.     ElseIf $avRval[0] = 0 Then
    
42.         SetError(2); GlobalAddAtom Error
    
43.     EndIf
    
44.     Return $avRval[0]
    
45. EndFunc  ;==>_GlobalFindAtom
    
46. 
    

复制代码

我也是搜这个API然后得到了官网上的几个函数，MARK一下，其他人也可以看看，我是不懂怎么弄，只会用