` Printed Icetips Article

Icetips Article



Par2: Detecting NT from 16 bit app
1999-09-18 -- Mark Riffey
 
GetWinFlags will do it. Code below:

Global embeds, inside global map:


  MODULE('Windows.DLL')

    GetWinFlags(),LONG,PASCAL

  END
  
  
  
In your source:

  ver# = getwinflags()   ! Ver# is an implicit define, call me lazy.
  
  If band(ver#,4000H)  !is it NT from a 16 bit app?
     Its NT
  ELSE
     its not NT
  end
  
This is proven, production code. Enjoy!



Printed November 23, 2024, 2:18 am
This article has been viewed/printed 35301 times.