amigos les cuento que tuve un resultado positivo en la prueba que hise con la pequena modificacion que nos mensiono el amigo escafandra
\\.\PhysicalDriveX y el cambio a la funcion que hiso eficas aqui mi ejemplo
Código Delphi
[-]begin
if USB.USBOpenDriver('\\.\PhysicalDrive0') then
Memo1.Lines.Add('Conexion Hecha Correctamente')
else
Memo1.Lines.Add('Error en la conexion');
end;
esta prueba fue realizada con una memoria usb aun no e hecho la prueba con el celular pero es un avance este proyecto que nos interesa a todos
creo que una ves conectado el dipositivo las demas funciones de la libreria USB no deberian dar problemas