Page 1 of 1

OSVersion

Posted: Tue Jul 28, 2009 11:37 pm
by 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

Re: OSVersion

Posted: Sun Aug 02, 2009 2:53 pm
by Antonio Linares
Arturo,

Tienes un ejemplo en FWPPC\samples\TestVer.prg

Re: OSVersion

Posted: Mon Aug 03, 2009 6:41 pm
by Arturo Lopesoria
Gracias!!
ShowVersion() que entrega un array de 4 elementos con los numeros de version detallada.
Saludos

Re: OSVersion

Posted: Mon Aug 03, 2009 10:20 pm
by Antonio Linares
Arturo,

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