[Delirium]

crown.81, смотрите в сторону WMI, а именно на программу WMI Code Creator .
Вот пример кода программы, созданной этой программой(соединяемся с удаленным компом):
VBSCRIPT

читать дальше »

strComputer = "Andronova"
strDomain = "kts.local"
Wscript.StdOut.Write "Please enter your user name:"
strUser = Wscript.StdIn.ReadLine
Set objPassword = CreateObject("ScriptPW.Password")
Wscript.StdOut.Write "Please enter your password:"
strPassword = objPassword.GetPassword()
Wscript.Echo

Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objWMIService = objSWbemLocator.ConnectServer(strComputer, _
"root\CIMV2", _
strUser, _
strPassword, _
"MS_409", _
"ntlmdomain:" + strDomain)
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_OperatingSystem",,48)
For Each objItem in colItems
Wscript.Echo "-----------------------------------"
Wscript.Echo "Win32_OperatingSystem instance"
Wscript.Echo "-----------------------------------"
Wscript.Echo "Description: " & objItem.Description
Next

Также доступен исходник на C# и VB.NET. По аналогии можно перевести на Delphi.

Результат выполнения кода:

Код:

Please enter your user name:del
Please enter your password:
-----------------------------------
Win32_OperatingSystem instance
-----------------------------------
Description: Андронова Г.Д.

Также есть возможность создания кода для подключения к локальной машине.