🚀 go-pugleaf

"Mark Jacobs" <mark@jacobsm.com> wrote in message
news:45eca715@newsgroups.borland.com...

> Thanks for your help. However, I also need the new UI as in
> BIF_USENEWUI
>
> This makes your code *not* return the edit box contents when
> stuff is typed in.

The following code works for me now:

    #include <shlobj.h>

    int CALLBACK BrowseCallbackProc(HWND hwnd, UINT uMsg, LPARAM
lParam, LPARAM lpData)
    {
        switch( uMsg )
        {
            case BFFM_INITIALIZED:
            {
                LPTSTR ptr = reinterpret_cast<LPTSTR>(lpData);
                if( ptr[0] != 0 )
                {
                    SendMessage(hwnd, BFFM_SETSELECTION, TRUE,
lpData);
                    ptr[0] = 0;
                }
                break;
            }

            case BFFM_VALIDATEFAILED:
            {
                lstrcpyn(reinterpret_cast<LPTSTR>(lpData),
reinterpret_cast<LPTSTR>(lParam), MAX_PATH);
                break;
            }
        }

        return 0;
    }

    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
        AnsiString Dir = Edit1->Text;
        if( !DirectoryExists(Dir) )
            Dir = GetCurrentDir();

        TCHAR path[MAX_PATH+1] = {0};
        lstrcpyn(path, Dir.c_str(), MAX_PATH);

        BROWSEINFO bi = {0};
        bi.hwndOwner = Handle;
        bi.ulFlags = BIF_USENEWUI | BIF_EDITBOX | BIF_VALIDATE;
        bi.lpfn = BrowseCallbackProc;
        bi.lParam = reinterpret_cast<LPARAM>(path);

        LPITEMIDLIST pidl = SHBrowseForFolder(&bi);
        if( pidl )
        {
            if( path[0] != 0 )
            {
                 // user text was entered ...
            }
            else
            {
                 // no user text was entered ...
                SHGetPathFromIDList(pidl, path);
            }

            CoTaskMemFree(pidl);
            Edit1->Text = path;
        }
        else
        {
            // dialog canceled...
        }
    }

> Without the BIF_USENEWUI (as in your code), I agree, it returns
> the contents of that edit box. But I want the new UI. complete with
> make new folder functionality, and simply or'ing in the BIF_USENEWUI
> flag makes it *not* return the box contents!

That is because the TreeView has priority over the edit box when that
flag is enabled.  Without it, the edit box has priority instead.


Gambit