Некорректная работа OpenDialog в win7

[Gonzo]

Доброго времени суток всем, уважаемые форумчане!
Столкнулся с такой проблемой:
При открытии файла, если фильтр включен,
то не видно файлов нужного формата (хотя они в директории есть - факт).
Если фильтр отключен (поле Filter пусто), то можно выбрать нужный файл и открыть его.
Такое поведение наблюдается при работе с программой в Windows 7.

Программа разрабатывается в Delphi 7 из под WindowsXP.
В XP никаких проблем обнаружено не было.

  if MessageDlg('Отключить фильтр?', mtConfirmation, [mbNo, mbYes], 0) = mrYes then
    OpenDialog.Filter := ''
  else
    OpenDialog.Filter := 'Файлы XML (*.xml)|*.xml';
  ...
  if OpenDialog.Execute and (OpenDialog.FileName<>'') then
  begin
    ...
    //загрузка и обработка XML
    ...
  end;

Кто что думает по этому поводу?