🚀 go-pugleaf

"Asger J�rgensen" <junk@Asger-P.dk> wrote in message 
news:MPG.218010608a8f1194989854@newsgroups.borland.com...

> If it is possible I would like to try and use PIDL's
> instead

You will have to use the IShellFolder interface for that.  Use 
SHGetDesktopFolder() to get the IShellFolder for the top-level Desktop 
namespace, then use its ParseDisplayName() and BindToObject() methods to get 
the IShellFolder for the specific folder that you want to begin searching 
from, then use that IShellFolder's EnumObjects() method to enumerate its 
subfolders and files.  For each subfolder, call the parent IShellFolder's 
BindToObject() to get the IShellFolder for the subfolder, then call its 
EnumObjects() method, repeating recursively as needed.  For example:

    void SearchFolder(IShellFolder *ParentFolder, LPITEMIDLIST 
pidlSubFolder)
    {
            IShellFolder *SubFolder = NULL;
            if( SUCCEEDED(ParentFolder->BindToObject(pidlSubFolder, NULL, 
IID_IShellFolder, (LPVOID*)&SubFolder)) )
            {
                IEnumIDList *Enum = NULL;
                if( SUCCEEDED(SubFolder->EnumObjects(NULL, SHCONTF_FOLDERS | 
SHCONTF_NONFOLDERS, &Enum)) )
                {
                    LPITEMIDLIST pidlItem;
                    while( Enum->Next(1, &pidlItem, NULL) == S_OK )
                    {
                        // compare pidlItem to your search criteria as 
needed,
                        // such as by calling 
SubFolder->GetDisplayNameOf(pidlItem, ...)
                        // and other IShellFolder methods to get information
                        // about the current item...

                        ULONG ulAttr = 0;
                        if( SUCCEEDED(SubFolder->GetAttributesOf(1, 
&pidlItem, &ulAttr)) )
                        {
                            if( ulAttr & SFGAO_FOLDER )
                                SearchFolder(SubFolder, pidlItem);
                        }

                        CoTaskMemFree(pidlItem);
                    }

                    Enum->Release();
                }
                SubFolder->Release();
            }
    }

    {
        IShellFolder *Desktop = NULL;
        if( SUCCEEDED(SHGetDesktopFolder(&Desktop)) )
        {
            ULONG eaten = 0;
            LPITEMIDLIST pidlFolder = NULL;

            if( SUCCEEDED(Desktop->ParseDisplayName(NULL, NULL, 
WideString("The starting path here"), &eaten, &pidlFolder, NULL)) )
            {
                SearchFolder(Desktop, pidlFolder);
                CoTaskMemFree(pidlFolder);
            }

            Desktop->Release();
        }
    }


Gambit