Скачать: CL | DM;

Удалить сведения об ранее подключенных устройствах   Найти похожие ветки 

← →
Diplomat ©   (2009-11-23 17:44) [0]

Как, с помощью Delphi найти и удалить выборочно, имеющуюся в винде информацию о ранее подключенных устройствах (например флешках)?

---

← →
Игорь Шевченко ©   (2009-11-23 19:39) [1]

А как без помощи Delphi ?

---

← →
Smile   (2009-11-23 20:18) [2]

> Игорь Шевченко ©   (23.11.09 19:39) [1]
А как без помощи Delphi ?

HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Enum\USBSTOR\...
:)

---

← →
Омлет ©   (2009-11-23 20:48) [3]

А зачем?

---

← →
Германн ©   (2009-11-24 01:53) [4]

> Игорь Шевченко ©   (23.11.09 19:39) [1]
>
> А как без помощи Delphi ?
>

Х.З. В ряде случаев. :)
Если говорить о USB-COM эмуляторах.

---

← →
Diplomat ©   (2009-11-24 05:14) [5]

Зашел я по этой ветке, удалить не получается. Файл используется.

---

← →
brother ©   (2009-11-24 05:37) [6]

> удалить не получается. Файл используется.

видимо флеш, в начале, нужно отключить

---

← →
Diplomat ©   (2009-11-24 08:37) [7]

Флешка отключена (из разъема я понял)

---

← →
brother ©   (2009-11-24 10:17) [8]

значит - не судьба)

---

← →
oldman ©   (2009-11-25 11:21) [9]

> Омлет ©   (23.11.09 20:48) [3]
> А зачем?


Меня тоже это интересует.

Опять в какую-то в/ч проверка нагрянула?

---

← →
DrPass ©   (2009-11-25 15:36) [10]

> Smile   (23.11.09 20:18) [2]
> > Игорь Шевченко ©   (23.11.09 19:39) [1]
> А как без помощи Delphi ?
>
> HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Enum\USBSTOR\...
>
> :)

set devmgr_show_nonpresent_devices=1
Опосля этого - Show Hidden Devices в менеджере устройств.

---

← →
Rouse_ ©   (2009-11-25 16:47) [11]

var
 dwIndex: DWORD;
 DeviceInfoData: SP_DEVINFO_DATA;
begin
 dwIndex := порядковый номер устройства в списке
 ZeroMemory(@DeviceInfoData, SizeOf(SP_DEVINFO_DATA));
 DeviceInfoData.cbSize := SizeOf(SP_DEVINFO_DATA);
 SetupDiEnumDeviceInfo(hAllDevices, dwIndex, DeviceInfoData);
 SetupDiRemoveDevice(hAllDevices, DeviceInfoData);

---

← →
Rouse_ ©   (2009-11-25 16:49) [12]

ну и

 hAllDevices := SetupDiGetClassDevsExA(nil, nil, 0,
   DIGCF_ALLCLASSES, nil, nil, nil);

---

← →
Diplomat ©   (2009-11-25 20:46) [13]

Как догадался о в/ч?

Объясните для "ч" set devmgr_show_nonpresent_devices=1

---

← →
Rouse_ ©   (2009-11-25 20:51) [14]

> Diplomat ©   (25.11.09 20:46) [13]
>
> Как догадался о в/ч?

В свободное время изучаю MSDN :)


> Объясните для "ч" set devmgr_show_nonpresent_devices=1

Именно для отображения "хвостов"

---

← →
Rouse_ ©   (2009-11-25 20:55) [15]

Вот это глянь, хоть демка и не завершенная но должна помочь: http://rouse.drkb.ru/tmp/devlist.zip

---

← →
Anatoly Podgoretsky ©   (2009-11-25 20:58) [16]

> Diplomat  (25.11.2009 20:46:13)  [13]

Не ты первый.

---

← →
Diplomat ©   (2009-11-25 21:00) [17]

Спасибо а Devmgmt.msc set DEVMGR_SHOW_NONPRESENT_DEVICES=1,
я так понял

---

← →
Rouse_ ©   (2009-11-25 21:02) [18]

> Спасибо а Devmgmt.msc set DEVMGR_SHOW_NONPRESENT_DEVICES=1,
>
> я так понял

Не понял вопроса, но дам линк наугад :)
http://support.microsoft.com/kb/Q315539

---

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

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.005 c