\    File: DllVersion.f
\  Author: Jeff Kelm
\ Created: 22-May-1999
\ Updated: 22-May-1999

Comment:  ------------------------------------------------------
New controls released with IE 3/IE 4 are only available
in the following versions of COMCTL32.DLL:

   Version  Distribution Platform
    4.00    Microsoft Windows 95 or Windows NT 4.0
    4.70    Microsoft Internet Explorer 3.x
    4.71    Microsoft Internet Explorer 4.0

The routine below determines the version of the COMCTL32.DLL.
------------------------------------------------------  Comment;

: .DllVersion
   Z" comctl32.dll" rel>abs Call LoadLibrary
   Z" DllGetVersion" rel>abs  OVER Call GetProcAddress
     IF  \ procedure found, use it to get actual version
         0 0 0 0 5 cells sp@ rel>abs Call DllGetVersion  2DROP
         ( PlatformID BuildNumber MinorVersion MajorVersion)
         CR  ." COMCTL32.DLL Version" 2 U.R ." ." 2 U.R  2DROP
   ELSE  \ procedure not found, ==> older version of DLL
         CR  ." COMCTL32.DLL Version 4.0"
   THEN
   Call FreeLibrary DROP ;