search software installed

i need a program in delphi that show me the software installed (software and license number) of each computer attached at my network. how can i do that?
gonzmarAsked:
Who is Participating?
 
DragonSlayerCommented:
Hi Gonzmar,

I just found out that you can do it with TRegistry as well.

Check out TRegistry.RegistryConnect from the Help file.


Cheers,
DragonSlayer.
0
 
YodaMageCommented:
Huh? What software?  What kind of network?
0
 
gonzmarAuthor Commented:
i need to retrieve de software installled on each computer (this software appear in the add/remove programs in the control panel applet) and our network (LAN) are based on TCP/IP.

For example, if a double click on my network neighborhood icon, i can see a lot of PC's attached to my local network, so, i need to obtain the software installed on each computer and build a report of that information.
0
 
DragonSlayerCommented:
Hi gonzmar,

To do that you would have to remotely connect to each computer's registry, then query the registry entries.

1. You connect to a remote registry via RegConnectRegistry
2. You will get a handle to the registry (if all goes well)
3. Open HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall and read all the values there
4. Also open HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Uninstall and read all the values there
5. Use RegCloseKey to close the remote registry handle
6. Loop 1-5 for each other computer.

NOTE:
You need to read the DisplayName (it's a String Value) under the registry key, e.g. for HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Delphi5, reading the DisplayName value will give you "Borland Delphi 5"


Good luck!


DragonSlayer.
0
 
gonzmarAuthor Commented:
ok, dragon!, would you please send me an example of using regconnectregistry?
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.