Why not just use XCopy? -----Original Message----- From: delphi-boun...@delphi.org.nz [mailto:delphi-boun...@delphi.org.nz] On Behalf Of Todd Sent: Saturday, 14 May 2011 1:02 p.m. To: NZ Borland Developers Group - Delphi List Subject: Re: [DUG] API to Windows explorer
Hi John You need to code a COM object implementing the interfaces IContextMenu and IShellExtInit http://books.google.co.nz/books?id=V9t0lA-BPUAC&pg=PA843&lpg=PA843&dq=%2BIShellExtInit+%2Bdelphi&source=bl&ots=4-UApQ6dcq&sig=Fu6nyTqN-LYMP6gR6fvtjaD-6_c&hl=en&ei=SNHNTZGKEJD8vQPwlq2uCg&sa=X&oi=book_result&ct=result&resnum=2&ved=0CB4Q6AEwAQ#v=onepage&q&f=false Todd. > I am writing a program to copy one or more folder trees to a USB drive (an > extra backup regime for some Canterbury firms who were not able to get at > servers or finding their offsite backups were also inaccessible). > > I have a nice component HAHFindFile to build the list of folders and files in > a stringlist, and a routine using TFilestream to do the copy, but I was > thinking its almost certainly going to be faster and more robust if there > were an API to Windows Explorer to pass the source and destination folders > to, and some parameters (eg copy only newer). > > I read technical articles from Mark Russinovitch about how Vista and Windows > 7 optimise copying files over a network, varying the block sizes etc and > using caching so I would expect an OS-level API to be much faster. > > Does anyone know if such an API exists, and are there options to eg copy only > later files. I saw some hints in Google about a COM interface to Windows > Explorer, but no details if it has options like I am interested in. > > Aside – I heard of one firm that had a server and a Wifi router on a UPS that > had their network guy park outside with a wifi laptop and copy stuff from the > server before the UPS died. Couldn’t go in because the the front of the > building had fallen out into the street. Thats a cool idea for an emergency > backup after the event. > > John > > > > > > _______________________________________________ > NZ Borland Developers Group - Delphi mailing list > Post: delphi@delphi.org.nz > Admin: http://delphi.org.nz/mailman/listinfo/delphi > Unsubscribe: send an email to delphi-requ...@delphi.org.nz with > Subject: unsubscribe -- <b>Passion</b> is no substitute for <b>reason</b> _______________________________________________ NZ Borland Developers Group - Delphi mailing list Post: delphi@delphi.org.nz Admin: http://delphi.org.nz/mailman/listinfo/delphi Unsubscribe: send an email to delphi-requ...@delphi.org.nz with Subject: unsubscribe _______________________________________________ NZ Borland Developers Group - Delphi mailing list Post: delphi@delphi.org.nz Admin: http://delphi.org.nz/mailman/listinfo/delphi Unsubscribe: send an email to delphi-requ...@delphi.org.nz with Subject: unsubscribe
