TSHBrowseForFolderW = function (var lpbi: TBrowseInfoW): PItemIDList;

TntWindows

This is type TntWindows.TSHBrowseForFolderW.