función para saber si el sistema operativo es original o no

función para saber si el sistema operativo es original o no

Postby MOISES » Sat May 09, 2015 8:52 am

Hola:

¿Alguno tiene esta función?.

Muchas gracias de antemano.
Saludos / Regards,

FWH 20.04, Harbour 3.2.0 dev (r1909261630) y BCC 7.40
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am


Re: función para saber si el sistema operativo es original o no

Postby MOISES » Sun May 10, 2015 12:16 pm

Antonio:

¿Por favor, me podrías decir cómo hacer la llamada en C?:

https://msdn.microsoft.com/en-us/librar ... 37(v=vs.85).aspx

https://theroadtodelphi.wordpress.com/2 ... tion-in-c/

http://www.purebasic.fr/english/viewtop ... =7&t=52321

Muchas gracias. Un saludo muy cordial.
Saludos / Regards,

FWH 20.04, Harbour 3.2.0 dev (r1909261630) y BCC 7.40
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am

Re: función para saber si el sistema operativo es original o no

Postby Antonio Linares » Sun May 10, 2015 3:20 pm

Esta es la función a usar, ahora hay que ver como pasarle los parámetros que solicita:

https://msdn.microsoft.com/en-us/library/windows/desktop/aa965837%28v=vs.85%29.aspx
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41937
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: función para saber si el sistema operativo es original o no

Postby mastintin » Mon May 11, 2015 10:34 am

a mi me dice que es verdadero , seria bueno mirar con uno falso para saber si funciona ...
Se tiene que enlazar slwga.lib al programa .
Code: Select all  Expand view


#pragma BEGINDUMP

#include <Slpublic.h>

HB_FUNC( ISWINGENUINE )
{
   BOOL isGenuineWindows = FALSE;

   SLID windowsSlid = { 0 };

   //Application ID GUID http://technet.microsoft.com/en-us/libr ... 2270.aspx;
   HRESULT hr = CLSIDFromString(L"{55c92734-d682-4d71-983e-d6ec3f16059f}", (LPCLSID)&windowsSlid);
   if (hr == S_OK)
   {
      SL_GENUINE_STATE genuineState = SL_GEN_STATE_LAST;
      hr = SLIsGenuineLocal(&windowsSlid, &genuineState, NULL);
      if (hr == S_OK)
         isGenuineWindows = (genuineState == SL_GEN_STATE_IS_GENUINE);
   }

    hb_retl(( BOOL) isGenuineWindows) ;

}


#pragma ENDDUMP


 
User avatar
mastintin
 
Posts: 1516
Joined: Thu May 27, 2010 2:06 pm

Re: función para saber si el sistema operativo es original o no

Postby MOISES » Mon May 11, 2015 1:12 pm

Hola Manuel:

Muchísimas gracias, voy a probarlo en un equipo pirata.

¿No se puede hacer una llamada a slwga.dll?.

Un saludo muy cordial,
Saludos / Regards,

FWH 20.04, Harbour 3.2.0 dev (r1909261630) y BCC 7.40
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am

Re: función para saber si el sistema operativo es original o no

Postby MOISES » Mon May 11, 2015 1:41 pm

Hola Manuel:

La función funciona perfecta.

El problema de enlazar la librería es que el ejecutable no funcionará en Windows XP, porque esta funcionalidad no está soportada en dicho SO.

Con la llamada a .a dll es posible verificar antes de llamar a la función si existe dicha dll en \Windows\system32.
Saludos / Regards,

FWH 20.04, Harbour 3.2.0 dev (r1909261630) y BCC 7.40
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am

Re: función para saber si el sistema operativo es original o no

Postby karinha » Mon May 11, 2015 1:56 pm

Master,

Header - Slpublic.h donde pudeo bajar?

Gracias.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7664
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: función para saber si el sistema operativo es original o no

Postby MOISES » Mon May 11, 2015 2:07 pm

Lo tienes en BCC6xx o en MSVC2010.
Saludos / Regards,

FWH 20.04, Harbour 3.2.0 dev (r1909261630) y BCC 7.40
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 30 guests