Удаление в ShellListView

[UnRay]

Здравствуйте уважаемые форумчане!

У меня возникла проблема, не знаю что и делать. В Delphi 7 я использую компонент ShellListView. мне необходимо выводить файлы в него по маске, подскажите, как это можно реализовать. И еще, можно ли в этом компоненте удалять элементы, обычные способы не помогают.
Надеюсь на вашу помощь, очень нужно узнать, заранее спасибо.

[UnRay]

Если кто здесь, то хай. Я тут покопался и сам решение нашел, вот:
procedure TForm1.ShellListView1AddFolder(Sender: TObject;
  AFolder: TShellFolder; var CanAdd: Boolean);
var
  XFilterExt, XExt: string;
begin
  if FilterComboBox1.Mask <> '*.*' then
  begin
    XFilterExt := ExtractFileExt(FilterComboBox1.Mask);
    XExt := ExtractFileExt(AFolder.PathName);
    // Only accept filter and folders
    if (CompareText(XExt, XFilterExt) = 0) or AFolder.IsFolder then
      CanAdd := True
    else
      CanAdd := False;
  end;
end;

// Refresh the ShellListView when the filter changes
procedure TForm1.FilterComboBox1Change(Sender: TObject);
begin
  ShellListView1.Refresh;
end;

работает на ура!