Как передать файл с USB-устройства на компьютер (Delphi)?

Необходимо чтобы по нажатию кнопки файл с телефона, подключенного к компьютеру через Usb, копировался на жёсткий диск. Как можно это реализовать в Delphi?