![SecurityFimage | Embarcadero RAD Studio Delphi C++Builder Blogs securityfimage](https://i0.wp.com/blogs.embarcadero.com/wp-content/uploads/2021/02/SecurityFimage-5203338.jpg?resize=1140%2C694&ssl=1)
Developers may need to detect the installed Security Software of different types such as Antivirus, AntiSpyWare, and Firewall Software programmatically? How to do that? Struck with where to start? Don’t Worry. MiTec’s System Information Management Suite’s component helps to identify easily, and we will learn how to use the TMiTeC_Security component in the blog post.
Platforms: Windows.
Installation Steps:
You can easily install this Component Suite from GetIt Package Manager. The steps are as follows.
- Navigate In RAD Studio IDE->Tools->GetIt Package Manager->select Components in Categories->Components->Trail -MiTec system Information Component Suite 14.3 and click Install Button.
- Read the license and Click Agree All. An Information dialog saying ‘Requires a restart of RAD studio at the end of the process. Do you want to proceed? click yes and continue.
- It will download the plugin and installs it. Once installed, Click Restart now.
How to run the Demo app:
- Navigate to the System Information Management Suite trails setup, Demos folder which is installed during Get It installation e.g) C:UsersDocumentsEmbarcaderoStudio21.0CatalogRepositoryMiTeC-14.3DemosDelphi15
- Open the SC project in RAD studio 10.4.1, compile and run the application.
- This Demo App shows how to detect the security software installed and identify the security product name, states, path, version, etc.
Components used in MSIC SC Demo App:
- TMiTeC_Security: Detects installed AntiVirus, AntiSpyware, and Firewall software.
- 3 TListView To list down the list of security software installed based on product type.
Implementation Details:
- An instance SC of TMiTeC_Security is created. Loop through the Count property to collect the installed security software. Categorize based on Typ property(sptAntiVirus,sptAntiSpyware,sptFirewall) for each TSecurityProduct and list down it properties such as Name, Product State(spsUnknown, spsEnabled, spsDisabled, spsOutOfDate), path in the list view.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 |
procedure TwndMain.FormCreate(Sender: TObject); var i: Integer; begin {$IFDEF THEMESUPPORT} pAV.ParentBackground:=False; pAS.ParentBackground:=False; pFW.ParentBackground:=False; {$ENDIF} SC:=TMiTeC_Security.Create(Self); SC.RefreshData; for i:=0 to SC.Count-1 do begin if SC.Items[i].Typ=sptAntiVirus then with lvAV.Items.Add do begin Caption:=SC.Items[i].Name; SubItems.Add(GetSecurityProductStateStr(SC.Items[i].State)); SubItems.Add(SC.Items[i].Path); end else if SC.Items[i].Typ=sptAntiSpyware then with lvAS.Items.Add do begin Caption:=SC.Items[i].Name; SubItems.Add(GetSecurityProductStateStr(SC.Items[i].State)); SubItems.Add(SC.Items[i].Path); end else if SC.Items[i].Typ=sptFirewall then with lvFW.Items.Add do begin Caption:=SC.Items[i].Name; SubItems.Add(GetSecurityProductStateStr(SC.Items[i].State)); SubItems.Add(SC.Items[i].Path); end; end; end; |
![SecurityDemo8450899 | Embarcadero RAD Studio Delphi C++Builder Blogs securitydemo 8450899](https://i0.wp.com/blogs.embarcadero.com/wp-content/uploads/2021/02/SecurityDemo-8450899.png?resize=750%2C406&ssl=1)
It’s that simple to detect the list of security software installed and its properties from your Delphi application. Use this MiTeC component suite and get the job done quickly.
With the use of a Windows IDE, you can quickly detect installed security software in Windows with a robust component suite. Try your Free Trial here.
Design. Code. Compile. Deploy.
Start Free Trial Upgrade Today
Free Delphi Community Edition Free C++Builder Community Edition