Source position: msefiledialog.pas line 613
procedure getfileicon(
const info: fileinfoty;
var imagelist: timagelist;
out imagenr: Integer
);