OSVersion

[Arturo Lopesoria]

Hola a Todos

Necesito saber si estoy correindo en WM5 o WM6.
Como puedo conocer el OSVersion?

Dado que lo siguiente me regresa correctamente la OEM Info:

Code: Select all

HB_FUNC(GETOEMINFO)
{
WCHAR wszMachineName[128];
SystemParametersInfo(SPI_GETOEMINFO, sizeof(wszMachineName), &wszMachineName, 0);
hb_retc( WideToAnsi(wszMachineName ) ) ;
}

 

Entonces, en teoria, usando el parametro SPI_GETPLATFORMNAME
( en lugar de usar SPI_GETOEMINFO ) deberia correr:

Code: Select all

HB_FUNC(GETPLATFORMNAME)
{
WCHAR wszPlatformName[128];
SystemParametersInfo(SPI_GETPLATFORMNAME, sizeof(wszPlatformName), &wszPlatformName, 0);
hb_retc( WideToAnsi(wszPlatformName ) ) ;
}
 
 

Pero ekl compilador marca que desconoce SPI_GETPLATFORMNAME.
He intentado buscar donde se declara SPI_GETOEMINFO para buscar el valor correcto de SPI_GETPLATFORMNAME sin exito.

Ha aqui Otra manera, (de un ejemplo usando classes),
pero no se como adaptarlo a FWPPC:

Code: Select all

// Sample for Environment class summary
using namespace System;
using namespace System::Collections;
int main()
{
   String^ str;
   String^ nl = Environment::NewLine;

   //  <-- Keep this information secure! -->
   Console::WriteLine( "MachineName: {0}", Environment::MachineName );
   Console::WriteLine( "OSVersion: {0}", Environment::OSVersion );
}

 

Alguien puede ayudarme?
Gracias
Saludos a todos

[Antonio Linares]

Arturo,

Tienes un ejemplo en FWPPC\samples\TestVer.prg

[Arturo Lopesoria]

Gracias!!
ShowVersion() que entrega un array de 4 elementos con los numeros de version detallada.
Saludos

[Antonio Linares]

Arturo,

GetVersion() es el que devuelve un array con 4 elementos, con la información completa.