anchor.diff:  procedure TfpgFileDialog.edFilenameChanged(Sender: TObject);
   begin
     UpdateButtonState;
  +end;
  +
  +procedure TfpgFileDialog.edFilenameKeyPressed(Sender: TObject;
  +  var KeyCode: word; var ShiftState: TShiftState; var Consumed: boolean);
  +begin
  +  if KeyCode = keyReturn then
  +  begin
  +    Consumed := True;
  +    btnOK.Click;
  +  end;
   end;
   
   procedure TfpgFileDialog.UpdateButtonState;
  
positive.code:     Text := '';
      FontDesc := '#Edit1';
      OnChange := @edFilenameChanged;
    end;
    
    { Filter section }
  
negative.code:     procedure   btnGoHomeClicked(Sender: TObject);
      procedure   btnBookmarkClicked(Sender: TObject);
      procedure   edFilenameChanged(Sender: TObject);
      procedure   edFilenameKeyPressed(Sender: TObject; var KeyCode: word; var ShiftState: TShiftState; var Consumed: boolean);
      procedure   UpdateButtonState;
      function    HighlightFile(const AFilename: string): boolean;
      function    CreatePopupMenu: TfpgPopupMenu;
  