Filtro em ShellListView
Oi Pessoal,
É o seguinte... Estou querendo que um ShellListView exiba apenas um tipo de arquivo, por exemplo, *.DOC. Mas o componente não tem nenhuma poropriedade de filtro ou mascará. Sei que é possível fazer isso de outra forma, só que tô um pouco enrolado. Se alguém puder me ajudar, ficarei muito agradecido.
Abraços...
É o seguinte... Estou querendo que um ShellListView exiba apenas um tipo de arquivo, por exemplo, *.DOC. Mas o componente não tem nenhuma poropriedade de filtro ou mascará. Sei que é possível fazer isso de outra forma, só que tô um pouco enrolado. Se alguém puder me ajudar, ficarei muito agradecido.
Abraços...
Lenin
Curtidas 0
Respostas
Lenin
22/11/2003
Pessoal,
Já resolvi o problema.
Se alguém tiver a mesma dúvida ta aí a solução:
Evento OnAddFolder do ShellListView:
Já resolvi o problema.
Se alguém tiver a mesma dúvida ta aí a solução:
Evento OnAddFolder do ShellListView:
Var
XFilterExt, XExt: string;
begin
XFilterExt := ExtractFileExt(´*.dwg´);
XExt := ExtractFileExt(AFolder.PathName);
if (CompareText(XExt, XFilterExt) = 0) or AFolder.IsFolder then
CanAdd := True
else
CanAdd := False;
end;
GOSTEI 0