ImageEn, unit iexWindowsFunctions

PasteFilesFromClipboard


Declaration

function PasteFilesFromClipboard(Handle: HWND; ssFilenames: TStrings; out bMoveFiles : Boolean) : Boolean;
function PasteFilesFromClipboard(Handle: HWND; const sDestFolder : String; bRenameOnCollision, bShowConfirmation, bShowProgress: boolean; bVerboseErrors : boolean = True): Boolean; overload;


Description

Handles pasting of files from the clipboard that have been copied from Windows Explorer or TImageEnFolderMView.

With First overload, files are not moved or copied, but only as assigned to ssFilenames. bMoveFiles will be true if they are marked to be moved (i.e. Ctrl+X was used instead of Ctrl+V).
With Second overload, files will be actually moved or copied to the destination folder.
Parameter Description
bSendToRecycleBin Moves the file to the Recycle Bin rather than permanently deleting it (pertains to FOF_ALLOWUNDO
bShowConfirmation If not specified then will automatically respond with "Yes to All" for any dialog box that is displayed (undefines FOF_NOCONFIRMATION
bShowProgress Displays a progress dialog box (undefines FOF_SILENT
bVerboseErrors Displays a dialog to the user if an error occurs (undefines FOF_NOERRORUI

Result is true if there are files on the clipboard


Examples

// First overload
bHaveFiles := PasteFilesFromClipboard(Form1.Handle, ssFilenames, bMoveFiles);
if bHaveFiles then
  ShowMessage('No Files to paste')
else
if bMoveFiles  then
  ShowMessage('Files to Move:' + #13#10 + ssFilenames.Text)
else
  ShowMessage('Files to Copy:' + #13#10 + ssFilenames.Text);
// Now you actually need to move or copy the files

// Second overload - will handle whole process
bHaveFiles := PasteFilesFromClipboard( Form1.Handle, 'C:\My Folder, bMoveFiles, True, True, True );