title: I can not find the same extension in the Open Dialog
body: <p>Why sometimes in the Open dialog I cannot load the same file extension on the Open dialog filters, so I had to refresh the first to find the file.</p>
  
  <p>E.g.: <code>Filter = *.jpg</code></p>
  
  <p>I can not find the file <code>*.jpg</code> in Explorer Open dialog, but there are a lot of images with extension <code>*.jpg</code>.</p>
  
  <p>This happens on Win 7 OS [x86 &amp; x64]. The compiler version I am using is Delphi 7.</p>
  
  <pre><code>procedure TForm1.Button1Click(Sender: TObject);
  var
    JpgIF: TJpegImage;
    BmpIF: TBitmap;
  begin
    JpgIF := TJpegImage.Create;
    BmpIF := TBitmap.Create;
    OD.FileName := '';
    OD.DefaultExt := '*.jpg;*.jpeg;*.psd;*.tga*.png;*.gif;*.bmp';
    OD.Filter := 'JPG|*.jpg|Jpeg|*.jpeg|PSD|*.psd|TGA|*.tga|PNG|*.png|GIF|*.gif|Bmp|*.bmp';
    if not OD.Execute then
      Exit
    else if LowerCase(ExtractFileExt(OD.FileName)) = '.jpg' then
    begin
      JpgIF.LoadFromFile(OD.FileName);
      Img1.Picture.Bitmap.Assign(JpgIF);
    end
    else
    begin
      if LowerCase(ExtractFileExt(OD.FileName)) = '.bmp' then
      begin
        BmpIF.LoadFromFile(OD.FileName);
        Img1.Picture.Bitmap.Assign(BmpIF);
      end;
      //etc...
    end;
    JpgIF.Free;
    BmpIF.Free;
  end;
  </code></pre>