BrowseForFolder диалог +Create new Folder button?

Как да покажа BrowseForFolder диалог , обаче и с 'Make New Folder' бутон ?

Имам един модул взет наготово от някъде който показва BrowseForFolder диалог за избор на директория, с бутони OK & Cancel.
Използва
Private Declare Function SHBrowseForFolder Lib "shell32" (lpbi As BrowseInfo) As Long
Но ми трябва и опция за създаване на нова дир.

10х

Private Const BIF_NEWDIALOGSTYLE = 64

Ако съм обяснил малко неясно какво ми трябва, точно същото го има в GetRight - Tools | Configuration | General | Save To --> ...

Големи thanx-ове Ptr!
Точно това ми трябваше