Mq4 보호 방법.. - 페이지 2

새 코멘트
 
아무도 이것으로 나를 도와주세요 ....
 

문제를 설명

내가 올바르게 이해한다면(위에서 설명한 대로) 당신의 프로그래밍 기술은 그다지 뛰어나지 않습니다

나는 그것이 당신의 능력 밖 이라고 생각합니다

 
그리고 무료 웹 호스팅 을 사용하는 것도 또 다른 실패입니다.
 
//+----------------------------------------------- -------------------+
//| GetVolumeInformation.mq4 |
//+----------------------------------------------- -------------------+
#property copyright "저작권 © 무료"
#속성 링크 "무료"
#속성엄격
#property show_inputs

#가져오기 "kernel32.dll"
bool GetVolumeInformationW(문자열 lpRootPathName,
문자열 lpVolumeNameBuffer,
정수 nVolumeNameSize,
정수 & lpVolumeSerialNumber[],
정수 &lpMaximumComponentLength[],
정수 & lpFileSystemFlags[],
문자열 lpFileSystemNameBuffer,
int nFileSystemNameSize);
#수입

외부 문자열 DriveLetter = "C";

무효 시작()
{
문자열 sNameDisk = DriveLetter + ":\\";
문자열 sNameBuffer = " ";
문자열 sSysNameBuffer = " ";
정수 dwVSNumber[1] = {0};
정수 dwMCLength[1] = {0};
정수 dwFileSF[1] = {0};
bool FunctionOk = GetVolumeInformationW(sNameDisk,
sName 버퍼,
StringLen(sNameBuffer) + 1,
dwVSN번호,
dwMC길이,
dw파일SF,
sSysName 버퍼,
StringLen(sSysNameBuffer) + 1);
if (FunctionOk)
Comment("이름 버퍼: \'", sNameBuffer,"\'",
"\nSysNameBuffer: \'", sSysNameBuffer,"\'",
"\nSysNameBuffer: ", sSysNameBuffer,
"\nVSNumber = ", dwVSNumber[0],
"\nMCLength = ", dwMCLength[0],
"\nFileSF = ", dwFileSF[0]);
또 다른
Comment("GetVolumeInformationA 요청한 정보가 모두 검색되지 않았습니다!"
"\n이름 버퍼: \'", sNameBuffer,"\'",
"\nSysNameBuffer: \'", sSysNameBuffer,"\'",
"\nVSNumber = ", dwVSNumber[0],
"\nMCLength = ", dwMCLength[0],
"\nFileSF = ", dwFileSF[0]);

반품;
}


빌드 600+에서 작동하지 않습니다.

 
괴짜처럼 말하지마, 아무것도 하지 않고 지옥처럼 말하지마..
 
좋은 나눔을 실천하다
 

레지스트리를 읽는 중이 아니므로 전체 도움말

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

 / / | 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 ) ;
 
int  start () 
{ 
  string  Res = GetRegString ( 0x80000002 , " SOFTWARE \\ Microsoft \\ Windows \\ CurrentVersion \\ Explorer \\ Shell Folders " , " Personal " ) ;
    
  Print ( Res ) ; MessageBox ( Res ) ;
 }
 
string  GetRegString ( int  HomeKey , string  KeyName , string  ValueName )  
{ 
  int  hkey [ 1 ] ;        / / Handle the registry 
  string  sData ;       / / variable to store the value 
  int  lRes ;           / / The result of the API functions 
  int  lDataType [ 1 ] ;   / / The return type is 
  int  lDlen [ 1 ] ,       / / variable to store the length of the string 
  int  P ;              / / variable to trim the last blank lines 
  lRes = RegOpenKeyA ( HomeKey , KeyName , hkey ) ; / / Open Section
  
  Print ( " RegOpenKeyA ret code = " + lRes ) ; 
 / *
Return values
Public Const ERROR_SUCCESS = 0 &
Public Const ERROR_FILE_NOT_FOUND = 2 &
Public Const ERROR_ACCESS_DENIED = 5 &
Public Const ERROR_INVALID_HANDLE = 6 &
Public Const ERROR_INVALID_PARAMETER = 87
Public Const ERROR_CALL_NOT_IMPLEMENTED = 120 &
Public Const ERROR_INSUFFICIENT_BUFFER = 122
Public Const ERROR_MORE_DATA = 234
Public Const ERROR_NO_MORE_ITEMS = 259 &
Public Const ERROR_CANTOPEN = 1011 &
Public Const ERROR_CANTREAD = 1012 &
Public Const ERROR_CANTWRITE = 1013 &
Public Const ERROR_REGISTRY_RECOVERED = 1014 &
Public Const ERROR_REGISTRY_CORRUPT = 1015 &
Public Const ERROR_REGISTRY_IO_FAILED = 1016 &
Public Const ERROR_NOT_REGISTRY_FILE = 1017 &
Public Const ERROR_KEY_DELETED = 1018 &
* /   
  if  ( lRes ! = 0 )  return ( "" ) ; / / If not returned zero - error 
                                                                                                                          value
  
  Print ( " RegQueryValueExA ret code = " + lRes + "   Value = " + sData ) ;
  
  if  ( lRes ! = 0 )  return ( "" ) ; / / If not returned zero - error exit
 
  if  ( lDataType [ 0 ] == 1 | | lDataType [ 0 ] == 2 )  return ( StringSubstr ( sData , 0 , lDlen [ 0 ] - 1 )) ; / / REG_SZ, REG_EXPAND_SZ - nul terminated Unicode string 
  else  if  ( lDataType [ 0 ] == 7 )  / / REG_MULTI_SZ - Multiple Unicode 
      
         zeros on the newline             
    return ( sData ) ;
   } 
  else  return ( "" ) ; / / other data types are not converted to a string: ( 
  lRes = RegCloseKey ( hkey [ 0 ]) ;
 }
 
DISK SERIAL NUMBER를 비교하고 싶습니다. 사실이라면 나머지 코드를 실행해야합니다.
 
kum01049 :
DISK SERIAL NUMBER를 비교하고 싶습니다. 사실이라면 나머지 코드를 실행해야합니다.

이 포럼에서는 광고가 허용되지 않음을 알려드립니다. 그리고 진정하고 답장을 기다리며 강박적 으로 게시하지 않는 것이 좋습니다.

 
나는 타투를 제거했다 ...
1234
새 코멘트