Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2012.04.08;
Скачать: CL | DM;

Вниз

SetupAPI -> GUID устройства   Найти похожие ветки 

 
Tailor_McMaffin   (2009-10-06 13:14) [0]

Приветствую мастера! Помогите найти ответ :)

Глобальная задача: необходимо получить список сетевых устройств и работать с ними.

С помощью SetupAPI.SetupDiGetClassDevs я получаю список устройств по GUID класса ({4D36E972-E325-11CE-BFC1-08002BE10318}). Далее вынимаю информацию по каждому устройству при помощи SetupAPI.SetupDiEnumDeviceInfo и SetupAPI.SetupDiGetDeviceRegistryProperty.

Однако нюанс, как получить GUID полученного конкретного устройства?


 
Tailor_McMaffin   (2009-10-06 13:20) [1]

Грубо говоря тот GUID который расположен:
\\HKLM\SYSTEM\CurrentControlSet\Services\{...}.


 
Tailor_McMaffin   (2009-10-06 13:30) [2]

Вернее даже в
\\HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\{...}.


 
Tailor_McMaffin   (2009-10-06 14:11) [3]

Отвечаю сам:

получаем при помощи SetupAPI.SetupDiGetDeviceRegistryProperty параметр SPDRP_DRIVER:


...
const
 SPDRP_DRIVER                      = $00000009; // Driver (R/W)
...


Далее, создаем функцию:


function ConstructCfgLinkage( IOName: String ): String;
var
 SubKey: String;
 Reg: TRegistry;
begin
 SubKey:= "SYSTEM\\CurrentControlSet\\Control\\Class\\";
 SubKey:= SubKey + IOName + "\\";
 Reg:= TRegistry.Create( KEY_READ );
 try
   Reg.RootKey:= HKEY_LOCAL_MACHINE;
   if Reg.OpenKey( SubKey, false ) then
     begin
       Result:= Reg.ReadString("NetCfgInstanceId");
     end;
 finally
   Reg.CloseKey;
   Reg.Free;
 end;
end;


где IOName это параметр SPDRP_DRIVER устройства.

Вопрос решен, всем спасибо, все свободны!



Страницы: 1 вся ветка

Текущий архив: 2012.04.08;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.006 c
6-1254475158
ocean
2009-10-02 13:19
2012.04.08
Как работать с документами в Интернете?


6-1254688951
xarfan
2009-10-05 00:42
2012.04.08
Идентификация пользователей при работе с Сокетами (Delphi)


11-1206012968
Nikfel
2008-03-20 14:36
2012.04.08
Как вывести окно с прозрачным цветом.


3-1274100955
Tima
2010-05-17 16:55
2012.04.08
Вопрос по FIBScripter и fbclient.dll


15-1323231809
кирилл
2011-12-07 08:23
2012.04.08
для лисенка