Detect Windows Version

#1
First Post: Mar 22, 2011 7:43am Mar 22, 2011 7:43am

pgiani
| Commercial User | Joined Aug 2008 | 16 Posts

Does any one now a easy way to find out what version of windows MT4 is running using just a windows API call.
Can any one tell me how to make this work:

#import "kernel32.dll"
int GWINAPI GetVersionEA(_inout LPOSVERSIONINFO lpVersionInfo);
#import

http://msdn.microsoft.com/en-us/libr...(v=VS.85).aspx

Thank You

#2
Mar 22, 2011 2:08pm Mar 22, 2011 2:08pm

Shabs19
Joined Aug 2006 | Status: Trader | 5,317 Posts

Use the Help button, then About. Current version I have is Build 229 (updated 16th Nov 2010).

It never gets easier, you just get better

#3
Mar 22, 2011 4:31pm Mar 22, 2011 4:31pm

Kenz987
| Joined Aug 2006 | Status: Trader | 737 Posts

Here is what I have - it still works, tho not the newest Ex version.
quickie script
//+----------+
//| test getting the windows version number
//| major and minor numbers
//+----------+
#property copyright ""
#property link ""
//#property show_confirm //popup do you really want to...?
//#property show_inputs //shows parm dialog
#include <stdlib.mqh>
#include <WinUser32.mqh>
//
int iRtn = 0;
int iWVerMaj = 0;
int iWVerMin = 0;
#import "kernel32.dll"
int GetVersion();
#import
//+------------------------------------------------------------------+
int start()
{
iRtn = GetVersion();
iWVerMaj = ((iRtn & 65535) & 255);
iWVerMin = ((iRtn & 65535) / 255);
Print("iRtn: " + iRtn + ", maj:" + iWVerMaj + ", min:" + iWVerMin);
return(0);
}
//+------------------------------------------------------------------+

#4
Edited 6:59pm Apr 7, 2011 6:31pm | Edited 6:59pm

Xaphod
Joined Mar 2010 | Status: Trader | 1,380 Posts

This works too:

PHP Code

#import "kernel32.dll"
  bool GetVersionExA(int& lpOSData[]); 
#import

#define OSVERINFO_DIM  37
#define OSVERINFO_SIZE 148

//+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
int start()
  {
  int iaOSVer[OSVERINFO_DIM];

  iaOSVer[0]=OSVERINFO_SIZE;
  if (GetVersionExA(iaOSVer)==0)
    Comment("Fail");
  else
    Comment("OSVersion Major=",iaOSVer[1]," Minor=",iaOSVer[2],
            " Build=",iaOSVer[3]," Platform=",iaOSVer[4]);
  return(0); 
  }

#5
Last Post: Apr 8, 2011 2:37am Apr 8, 2011 2:37am

pgiani
| Commercial User | Joined Aug 2008 | 16 Posts

I found that I could read the registry, I will share my findings here, It works best on XP, Vista and Win 7 64 bit have some restrictions on what key you can read.

Inserted Code

 string Res = GetRegString(0x80000002,"SOFTWAREMicrosoftWindows NTCurrentVersion", "CurrentVersion");  

/// reads the CurrentVersion key from registry
    

string GetRegString(int HomeKey, string KeyName, string ValueName) 
{
  int hkey[1];       
  string sData;      
  int lres;           
  int lDataType[1];   
  int lDlen[1];       
  int p;              
  lres = RegOpenKeyA(HomeKey, KeyName, hkey);  
  
 // 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(""); //???? ???????? ?? ???? - ??????, ???????
  sData = "                                                                                                                       ";
  lDlen[0] = StringLen(sData);
  lres = RegQueryValueExA(hkey[0], ValueName, 0, lDataType, sData, lDlen);  
  
 // Print("RegQueryValueExA ret code="+lres+"  Value="+sData); 
  
  if (lres!=0) return("");  
 
  if (lDataType[0]==1 || lDataType[0]==2) return(StringSubstr(sData,0,lDlen[0]-1)); //  REG_SZ, REG_EXPAND_SZ - Unicode nul terminated string
  else if (lDataType[0]==7) // REG_MULTI_SZ - Multiple Unicode Strings
  {    
    for(p=lDlen[0];0<p;p--) if(StringGetChar(sData,p)!=0) break; 
    sData = StringSubstr(sData,0,p);
    for(p=StringLen(sData);0<p;p--) if(StringGetChar(sData,p)==0) StringSetChar(sData,p,10); //??????? ???? ?? ??????? ???????? ??????            
    return(sData);
  }
  else return(""); //????????? ???? ?????? ?? ????????????? ? ?????? :(
  lres = RegCloseKey(hkey[0]);
}

string ReadFile1 ( string FileName )

{
   string Lixo ;
   string Text ; 
   
   int handle = FileOpen ( FileName  , FILE_CSV|FILE_READ );
if(handle<1)
{
 return ("");
}
else
{ while ( !FileIsEnding(handle ) )
{
Lixo  =   FileReadString ( handle );
//if (StringFind ( FileName, "ID.bin", 0 ) > -1 ) Print ( "----> ",Lixo );
Lixo = StringTrimLeft ( StringTrimRight (Lixo));
Lixo = stringReplace( Lixo , "n", "");
         Lixo = stringReplace( Lixo , "f", ""); 
Text = StringConcatenate ( Text  ,Lixo ," ") ;
}
FileClose (handle ) ;
}



   return (Text);

}

Thank You for helping with this problem.

Platform Tech
/
Detect Windows Version
Reply to Thread

0 traders viewing now

Options

Similar Threads

Detect Windows Version