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 21, 2024, 12:36 pm This article has been viewed/printed 35299 times. |