Writeln(Format('pathToEnableUI %s',)) // String Writeln(Format('enableUIParameters %s',)) // String Writeln(Format('enableUIMd5Hash %s',)) // Uint8 Writeln(Format('enabled %s',)) // Boolean Writeln(Format('versionNumber %s',)) // String Writeln(Format('updateUIParameters %s',)) // String Writeln(Format('updateUIMd5Hash %s',)) // Uint8 Writeln(Format('productUptoDate %s',)) // Boolean
Writeln(Format('pathToUpdateUI %s',)) // String Writeln(Format('pathToEnableOnAccessUI %s',)) // String
Writeln(Format('onAccessScanningEnabled %s',)) // Boolean Writeln(Format('enableOnAccessUIParameters %s',)) // String Writeln(Format('enableOnAccessUIMd5Hash %s',)) // Uint8 Writeln(Format('companyName %s',)) // String Writeln(Format('productState %s',)) // Uint32 Writeln(Format('pathToSignedReportingExe %s',)) // String Writeln(Format('pathToSignedProductExe %s',)) // String Writeln(Format('instanceGuid %s',)) // String Writeln(Format('displayName %s',)) // String If osVerInfo.dwMajorVersion>=6 then //windows vista or newer While oEnum.Next(1, FWbemObject, iValue) = 0 do OEnum := IUnknown(FWbemObjectSet._NewEnum) as IEnumVariant If (SCProduct=AntiSpywareProduct) and (osVerInfo.dwMajorVersion=6]]), '', '') įWbemObjectSet:= FWMIService.ExecQuery(Format('SELECT * FROM %s',]),'WQL',0) OsVerInfo.dwOSVersionInfoSize:=SizeOf(TOSVersionInfo) Procedure GetSCProductInfo(SCProduct:TSecurit圜enterProduct) VER_SERVICEPACKMAJOR OR VER_SERVICEPACKMINOR OR VER_PRODUCT_TYPE, dwlConditionMask) Result:=VerifyVersionInfo(osvi,VER_MAJORVERSION OR VER_MINORVERSION OR Osvi.dwOSVersionInfoSize := sizeof(OSVERSIONINFOEX) ĭwlConditionMask:=VerSetConditionMask( dwlConditionMask, VER_MAJORVERSION, op ) ĭwlConditionMask:=VerSetConditionMask( dwlConditionMask, VER_MINORVERSION, op ) ĭwlConditionMask:=VerSetConditionMask( dwlConditionMask, VER_SERVICEPACKMAJOR, op ) ĭwlConditionMask:=VerSetConditionMask( dwlConditionMask, VER_SERVICEPACKMINOR, op ) ĭwlConditionMask:=VerSetConditionMask( dwlConditionMask, VER_PRODUCT_TYPE, VER_EQUAL )
#CTIVO ANTIVIRUS WINDOWS#
verifies that the application is running on Windows 2000 Server or a later server, such as Windows Server 2003 or Windows Server 2008.ĭwlConditionMask := sizeof(OSVERSIONINFOEX)) WmiNamespaceSCProduct : array of string = ('Securit圜enter','Securit圜enter2') įunction VerSetConditionMask(dwlConditionMask: int64 dwTypeBitMask: DWORD dwConditionMask: Byte): int64 stdcall external kernel32 įunction VerifyVersionInfo(var LPOSVERSIONINFOEX : OSVERSIONINFOEX dwTypeMask: DWORD dwlConditionMask: int64): BOOL stdcall external kernel32 name 'VerifyVersionInfoW' įunction VerifyVersionInfo(var LPOSVERSIONINFOEX : OSVERSIONINFOEX dwTypeMask: DWORD dwlConditionMask: int64): BOOL stdcall external kernel32 name 'VerifyVersionInfoA' WmiClassSCProduct : array of string = ('AntiVirusProduct','AntiSpywareProduct','FirewallProduct') TSecurit圜enterProduct = (AntiVirusProduct,AntiSpywareProduct,FirewallProduct)
#CTIVO ANTIVIRUS SOFTWARE#
This is a sample project which determine the Antivirus, AntiSpyware and Firewall software installed in the system.
this is a summary of the classes and properties availables depending of the windows version Windows XPĬlasses availables: AntiVirusProduct, FirewallProduct AntiVirusProduct-PropertiesĬlasses availables : AntiVirusProduct, AntiSpywareProduct, FirewallProduct AntiVirusProduct, AntiSpywareProduct, FirewallProduct – Properties Now depending of the Windows version the properties retrieved by the the same class can change. The WMI allow you to get the installed Antivirus, AntiSpyware and Firewall (third party) software using the root\Securit圜enter or the root\Securit圜enter2 namespaces and the AntiVirusProduct, AntiSpywareProduct, FirewallProduct classes.įirst you must know which these classes and namespaces are not documented by Microsoft and only are supported in Windows Desktops editions (Windows XP, Windows Vista and Windows 7).
0 kommentar(er)
