Mq4保护方法... - 页 3

[qjol]

kum01049:

阅读注册表不那么帮助满

/ / + ----------------------------------------------- ------------------- +

/ / | Readreg.mq4 | 
/ / + -------------------- ---------------------------------------------- + 
# property  copyright  " "
# Property  Link       "  "
 
//————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————— 
// LIBRARY WORK WITH РЕЕСТРОМ 
//————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————— 
#import  " advapi32.dll "
    int  RegOpenKeyA ( int  hkey , string  lpSubKey , int  phkResult []) ;
     int  RegCloseKey ( int  hkey ) ;
     int  RegQueryValueExA ( int  hkey , string  lpValueName , int  lpReserved , int  lpType [] , string  lpData , int  lpcbData []) ;
     int  RegSetValueExA ( int  hkey , string  lpValueName , int  Reserved , int  dwType , string  lpData , int  cbData ) ;

由于B600>字符串是UNICUDE，你必须调整代码，例如RegOpenKeyW 而不是RegOpenKeyA。

[szgy74]

https://www.mql5.com/en/articles/1572

[Ian Venner]

如何硬编码一个文件的哈希值，然后在运行时进行检查。

[[删除]]

SDC:
如何硬编码一个文件的哈希值，然后在运行时编码来检查。

这将使系统瘫痪，有样本吗？

[[删除]]

szgy74:
https://www.mql5.com/en/articles/1572

这些都是过时的!

[Syed Naufal Gaddafi]

然后，你需要请人帮你编码。

[ozod0309]

如果你有兴趣，我可以做

[Alain Verleyen]

ozod0309:
如果你有兴趣，我可以做

那就做吧，然后把结果发到这里。在这个论坛上不允许做广告。

[lou jiyang]

kum01049:

#import "Kernel32.dll"

bool GetVolumeInformationA(string RootPathName,

string VolumeNameBuffer, int VolumeNameSize,

int& VolumeSerialNumber[], int MaximumComponentLength,

int FileSystemFlags, string FileSystemNameBuffer,

int FileSystemNameSize）。

#导入

//+------------------------------------------------------------------+*/

string SystemDriveSerialNumber(string sDrive) {

int iVolumeSerialNumber[1]={0};

string sVolumeSerialNumber="Lxxxx";

如果(GetVolumeInformationA(sDrive+":\\", " ", 15, iVolumeSerialNumber, 0, 0, " ", 15))

{

sVolumeSerialNumber=IntegerToHexString（iVolumeSerialNumber[0]）。

sVolumeSerialNumber=StringConcatenate(StringSubstr(sVolumeSerialNumber,0,4), "-", StringSubstr(sVolumeSerialNumber,4)) 。

}

return(sVolumeSerialNumber)。

这是不工作的

GetVolumeInformationA =============>GetVolumeInformationW

欢迎你 :)

[[删除]]

appleparty:

GetVolumeInformationA =============>GetVolumeInformationW

欢迎你 :)

除非你不介意这个函数 在每个Mac上都返回0。