如何使用Delphi FireDAC驱动连接MongoDB Atlas数据库？

前提确认 #

确保你使用的Delphi版本为10.4 Sydney及以上——早期版本的FireDAC未内置MongoDB驱动，且不支持Atlas依赖的SRV记录解析。

可视化配置步骤 #

1. 拖放FDConnection组件到窗体，在Object Inspector中设置DriverName为MongoDB。
2. 点击ConnectionDefs右侧的省略号，打开连接定义编辑器，选择MongoDB驱动后点击New。
3. 在弹出的连接属性窗口中，直接填写完整的Atlas连接字符串：
   • 在Params列表中新增一行：ConnectionString=你的Atlas连接字符串（替换成你已有的字符串，格式类似mongodb+srv://<用户名>:<密码>@集群地址/<数据库名>?retryWrites=true&w=majority）
4. 启用SRV支持：找到Options.MongoDB.UseSRV，设置为True。
5. 强制SSL连接：设置Options.MongoDB.SSLMode为sslRequired（Atlas要求必须使用SSL连接）。
6. 点击Test Connection按钮验证连接，成功后保存连接定义。

代码方式配置（可选） #

如果偏好通过代码控制连接逻辑，可直接在代码中设置参数：

procedure TMainForm.FormCreate(Sender: TObject);
begin
  FDConnection1.DriverName := 'MongoDB';
  // 替换为你的实际Atlas连接字符串
  FDConnection1.Params.Add('ConnectionString=mongodb+srv://admin:your_password@cluster0.abc123.mongodb.net/your_db?retryWrites=true&w=majority');
  FDConnection1.Options.MongoDB.UseSRV := True;
  FDConnection1.Options.MongoDB.SSLMode := sslRequired;
  
  try
    FDConnection1.Connected := True;
    ShowMessage('MongoDB Atlas连接成功');
  except
    on E: Exception do
      ShowMessage('连接失败: ' + E.Message);
  end;
end;

常见问题排查 #

• 连接超时/拒绝：检查MongoDB Atlas控制台的IP白名单，确保当前机器的公网IP已添加到允许列表。
• 认证失败：确认连接字符串中的用户名、密码与Atlas控制台的数据库用户信息完全一致（注意特殊字符需转义）。
• SSL错误：确保Delphi依赖的OpenSSL库是最新版本，可从官方下载对应版本的库文件放到程序运行目录。

内容的提问来源于stack exchange，提问作者Matt Ryan