FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour function FW_ISWOW64()
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
function FW_ISWOW64()
Posted: Wed Oct 09, 2024 09:38 PM
Code (fw): Select all Collapse
...
IF  FW_ISWOW64()
  ?"The process is running under WOW64."
ELSE
  ?"The process is not running under WOW64."
ENDIF
...


...
#pragma BEGINDUMP

#include <windows.h>
#include <hbapi.h>
#include <tchar.h>

typedef BOOL (WINAPI *LPFN_ISWOW64PROCESS) (HANDLE, PBOOL);

LPFN_ISWOW64PROCESS fnIsWow64Process;

HB_FUNC( FW_ISWOW64 )
{
   BOOL bIsWow64 = FALSE;
 
   fnIsWow64Process = (LPFN_ISWOW64PROCESS) GetProcAddress(GetModuleHandle(TEXT("kernel32")),"IsWow64Process");
 
    if(NULL != fnIsWow64Process)
    {
        if (!fnIsWow64Process(GetCurrentProcess(),&bIsWow64))
        {
            //handle error
        }
    }
 
   hb_retl( bIsWow64 );
}

#pragma ENDDUMP
Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: function FW_ISWOW64()
Posted: Thu Oct 10, 2024 07:06 AM
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: function FW_ISWOW64()
Posted: Fri Oct 11, 2024 05:19 PM

Realmente antonio, no la uso, simpre tratando de aprender cada vez mas del api tanto de windows como harbour, tengo algunas cosas (funciones) que planeo ir dejando en el foro para que no se pierdan y si son de utilidad a alguen, mejor, y si las mejoran aun mejor.

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: function FW_ISWOW64()
Posted: Sat Oct 12, 2024 02:44 AM

Muy bien, gracias!

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion