Tema: Listar Memorias USB en windows 8
Ver Mensaje Individual
  #2  
Antiguo 22-04-2013
WkaymQ48 WkaymQ48 is offline
Miembro
NULL
  
Registrado: jul 2012
Posts: 43
Reputación: 0
WkaymQ48 Va por buen camino
Cambia esta linea:
Código Delphi [-]
if OpenKey('\SYSTEM\CurrentControlSet\Services\USBSTOR\Enum',FALSE) then

Por esta otra:
Código Delphi [-]
if OpenKeyReadOnly('\SYSTEM\CurrentControlSet\Services\USBSTOR\Enum') then
Responder Con Cita