; German forum: http://robsite.de/php/pureboard/viewtopic.php?t=2320&highlight= ; Author: Rings ; Date: 17. September 2003 Structure DllVersionInfo cbSize.l dwMajorVersion.l dwMinorVersion.l dwBuildNumber.l dwPlatformID.l EndStructure dwVersion.DllVersionInfo dwVersion\cbSize=20 #Shlwapi=1 If OpenLibrary(#Shlwapi,"Shlwapi.dll") ; Example for Internet Explorer FunctionPointer=IsFunction(#Shlwapi,"DllGetVersion") If FunctionPointer Result=CallFunctionFast(FunctionPointer, dwVersion) Debug dwVersion\dwMajorVersion EndIf CloseLibrary(#Shlwapi) EndIf ; ExecutableFormat=Windows ; FirstLine=1 ; EOF