Tento por esse codigo em public public
pild : PItemIDList;
caminho : array [0..MAX_PATH] of char;
procedure Favoritos (str : TStrings;
const caminho : string);
end; Me ajudem da um erro em PItemIDList erro -> Undeclared Identifier: 'PItemIDList' Grato desde já