TIEPortableDevices.CopyFileFromDevice
Declaration
function CopyFileFromDevice(const sDeviceID, sObjectID, sDestFilename: WideString; Thumbnail: Boolean = False; MoveFile: Boolean = False): Boolean; overload;
function CopyFileFromDevice(Index: Integer; const sDestFilename: WideString; Thumbnail: Boolean = False; MoveFile: Boolean = False): Boolean; overload;
function CopyFileFromDevice(Indexes: TStrings; const sDestFolder: WideString; Thumbnail: Boolean = False; MoveFile: Boolean = False): Integer; overload;
Description
Copy a file of the specified
sObjectID from a device to a local filename
Parameter | Description |
sDeviceID | The ID of the device to copy from (e.g. ActiveDeviceID |
sFileID | The ID of the file to copy (ID cannot point to a folder) |
Index | Index of the current item in the Objects array |
sDestFilename | The local filename to copy the file to |
Thumbnail | Requests a thumbnail rather than a file (typically returns a 256x256 image). If thumbnail loading fails, or it is not an image file, the full file is returned |
MoveFile | The file is deleted from the device after copying |
Note: Only files are supported, not folders.
// Prompt the user to specify a destination file to copy to
procedure TfrmMain.btnCopyFromDeviceClick(Sender: TObject);
var
Idx: Integer;
aObject: TIEWPDObject;
begin
if lbxObjects.ItemIndex < 0 then
exit;
Idx := IEPortableDevices.ObjectIDToIndex( lbxObjects.Items[ lbxObjects.ItemIndex ] );
aObject := IEPortableDevices.Objects[ Idx ];
if aObject.ObjectType = iewFolder then
exit;
SaveDialog1.FileName := aObject.Filename;
if SaveDialog1.Execute then
IEPortableDevices.CopyFileFromDevice( IEPortableDevices.ActiveDeviceID, aObject.ID, SaveDialog1.FileName );
end;
See Also
◼IEGetFileFromDevice