LB Booster
Programming >> Language extensions >> Folder Deletes
http://lbb.conforums.com/index.cgi?board=extensions&action=display&num=1421444699
Folder Deletes
Post by Alincon on Jan 16th, 2015, 8:44pm

I want a simple way to delete a folder and all its sub-folders and files.
A folder browser program comes with LB4.04, but there is no delete capability. There is another LB program that does browse and has a delete capability, but no way to set the starting point - it always starts at the root directory, and it takes a while to get the folder you want to delete.

Does anyone here know of an API or dll or program that can be called from LB to delete a folder? It should accept the passed folder name, ask "Are you sure", and move the folder to the recycle bin.

It is my understanding that re-naming a file can, in effect, move it to the recycle bin by changing the catalog. Is that correct?

LB4 can only re-name files, not folders. What about BBC basic?

Any other ideas or suggestions?


r.m.
Re: Folder Deletes
Post by Richard Russell on Jan 16th, 2015, 10:43pm

on Jan 16th, 2015, 8:44pm, Alincon wrote:
Does anyone here know of an API or dll or program that can be called from LB to delete a folder?

The API you want is SHFileOperation which is documented at MSDN here:

http://msdn.microsoft.com/en-gb/library/windows/desktop/bb762164.aspx

It's not difficult to call from LB4/LBB:

Code:
sub DeleteFolder folder$
    struct shfo, hwnd as ulong, wFunc as ulong, pFrom as ptr, pTo as ptr, _ 
                 fFlags as ulong, fAnyOperationsAborted as long, _ 
                 hNameMappings as ulong, lpszProgressTitle as ptr
    confirm "Are you sure?"; answer$
    if answer$ <> "yes" then exit sub
    FO.DELETE = 3
    FOF.ALLOWUNDO = 64
    shfo.wFunc.struct = FO.DELETE
    shfo.pFrom.struct = folder$ + chr$(0)
    shfo.fFlags.struct = FOF.ALLOWUNDO
    calldll #shell32, "SHFileOperationA", shfo as struct, res as long
    if res then notice "File or folder could not be deleted"
end sub

(although called DeleteFolder, this will move files to the Recycle Bin just as well).

Quote:
LB4 can only re-name files, not folders. What about BBC basic?

LBB can rename folders using NAME. I hadn't realised that LB4 can't, but it appears to be true.

Richard.
Re: Folder Deletes
Post by Alincon on Jan 17th, 2015, 01:20am

The API call works fine. The folder is moved to the recycle bin.
Also, there is a built-in "are you sure", so these lines are not needed.

Code:
confirm "Are you sure?"; answer$
if answer$ <> "yes" then exit sub


Thank you very much.

r.m.
Re: Folder Deletes
Post by Richard Russell on Jan 17th, 2015, 10:01am

on Jan 17th, 2015, 01:20am, Alincon wrote:
Also, there is a built-in "are you sure", so these lines are not needed.

Be careful; I got no 'built-in' confirmation here (Windows 8.1). If you always want the user to confirm, do it in your code and add the FOF_NOCONFIRMATION flag so you don't get two requests.

Richard.