Create / Select Folder alternative

I'm looking for a create / select folder alternative. The selectDirectory
dialog(s) in Delphi 7 are not flexible enough.

I need the option of navigating to a folder and optionally create a new one
there. Isn't it possible to use the same kind of dialog as other windows
applications generally use with the "create new folder" button built-in.