Use this method to check if the item at the passed index is a folder.
function IsFolder(pIndex: Integer): Boolean;
Boolean: True if the passed pIndex parameter is a folder, False otherwise.
TShellBrowser.IsDrive
TShellBrowser.IsFolder
JamSystemShellView.TJamShellControl