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