System-Wide Injection Portable-Executable (SwiPE)

IsProcess64Bit()

Example Code

function IsProcess64Bit(const hProcess: THandle): BOOL; stdcall;

// Arg1 specified target process handle to determine process bitness (32-bit or 64-bit)

var
  b64Bit: BOOL;
begin 
  b64Bit := IsProcess64Bit(GetCurrentProcess());
  ShowMessage(Format('Is my current process 64-bit? %s', [BoolToStr(b64Bit, True)]));
end;