1. AdoQuery 移动游标就报 E_FAIL，问题到底出在哪
如果你在 Delphi 或 C++Builder 里用TAdoQuery，代码里只要出现AdoQuery1.RecordCount、AdoQuery1.Next、AdoQuery1.Last这类移动游标或读取记录数的动作，程序立刻抛出“数据提供程序或其他服务返回 E_FAIL 状态”，英文是Data provider or other service returned an E_FAIL status，那这篇就是写给你的。
这个报错的迷惑性在于：它看起来像数据库连不上，但你的Open明明成功了，SELECT也能返回数据，偏偏一碰游标就炸。很多人第一反应是去查连接串、换驱动、重装数据库客户端，折腾半天没结果。实际上，绝大多数情况下问题出在CursorLocation这个属性上——默认的客户端游标（clUseClient）在某些提供程序下不支持向后滚动或取记录数，于是提供程序直接返回 E_FAIL。
这篇排查清单面向三类人：正在被这个报错卡住的 Delphi/C++Builder 开发者、需要把本地数据访问和远程模型调用统一配置的工程团队、以及想把 API Key 和接入通道集中管理的人。我会从CursorLocation=clUseServer这个关键设置讲起，给出可复制的config.toml骨架和 TaoToken 统一 Key/API 通道配置示例，再附上最小复现步骤和逐项验证动作，帮你判断到底是数据提供程序的问题，还是配置层的问题。
2. 先理解 CursorLocation：为什么移动游标会触发 E_FAIL
2.1 客户端游标和服务端游标的区别
ADO 的游标有两种位置：clUseClient（客户端游标）和clUseServer（服务端游标）。默认值通常是clUseClient。
客户端游标的逻辑是：提供程序把整个结果集一次性拉到本地内存，之后Next、RecordCount这些操作都在本地完成。听起来很方便，但问题在于——不是所有提供程序都完整实现了这套本地游标能力。当提供程序不支持某些游标操作时，它不会优雅降级，而是直接抛E_FAIL。
服务端游标的逻辑是：游标留在数据库服务端，Next、RecordCount由服务端执行。只要数据库本身支持，这类操作就稳定得多。
2.2 为什么 RecordCount 和 Next 最容易触发
RecordCount需要提供程序知道结果集的总行数。客户端游标下，如果提供程序没有预先拉取全部数据，就无法给出准确值，某些实现会直接报错。Next涉及游标向前移动，如果游标类型是只进（forward-only）而代码又要求可滚动，也会触发同样的错误。
所以你会看到那个典型现象：Open成功，一移动游标就 E_FAIL。这不是连接问题，是游标能力协商失败。
2.3 最小修复：设置 clUseServer
最直接的修复就是在打开查询之前设置：
AdoQuery1.CursorLocation := clUseServer; AdoQuery1.SQL.Text := 'SELECT * FROM Orders WHERE Status = :Status'; AdoQuery1.Parameters.ParamByName('Status').Value := 'Open'; AdoQuery1.Open;C++Builder 写法：
AdoQuery1->CursorLocation = clUseServer; AdoQuery1->SQL->Text = "SELECT * FROM Orders WHERE Status = :Status"; AdoQuery1->Parameters->ParamByName("Status")->Value = "Open"; AdoQuery1->Open();注意顺序：CursorLocation必须在Open之前设置。如果你在Open之后才改，游标已经建立，改属性不会生效，甚至可能引发新的异常。
3. TaoToken 前置：把 Key 和接入通道统一管起来
3.1 为什么数据访问项目也需要统一配置
很多团队的数据访问层和模型调用层是分开配置的：数据库连接串写在一个 ini 里，模型 API Key 散落在各个开发者的环境变量里。一旦要换 Key、加通道、做审计，就非常痛苦。TaoToken 提供的是统一的 Key 管理和 API 通道，官网是 https://taotoken.net/?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= ，API 入口是 https://taotoken.net/api 。
它的价值在于：你不需要在每个项目里硬编码不同的 Key，而是通过一个统一的 API 通道去调用模型能力。对于 Delphi/C++Builder 这种需要同时处理本地数据访问和远程模型调用的场景，把配置集中到一份config.toml里，维护成本会低很多。
3.2 获取 Key 和配置通道
先到控制台创建 API Key，地址是 https://taotoken.net/console?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= ，Key 管理页面在 https://taotoken.net/api-keys?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= 。创建好之后，把 Key 填进下面的配置文件。
如果你需要长期做编码或 Agent 类任务，可以看 Coding Plan：https://taotoken.net/coding-plan?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= 。想先验证模型是否通，用模型对话页面：https://taotoken.net/models?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= 。接入细节看文档：https://taotoken.net/doc?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= 。
4. 可复制配置：config.toml 骨架与 AdoQuery 参数对照
4.1 config.toml 骨架
下面这份配置把数据库访问和 TaoToken 通道放在一起，你可以直接改成自己的值：
# config.toml [app] name = "delphi-ado-demo" env = "dev" [database] provider = "SQLOLEDB" server = "127.0.0.1" database = "TestDB" trusted_connection = true # 关键：服务端游标，避免 E_FAIL cursor_location = "clUseServer" command_timeout = 30 [taotoken] base_url = "https://taotoken.net/api" api_key = "sk-your-key-here" default_model = "claude-sonnet" timeout_seconds = 60 [taotoken.retry] max_attempts = 3 backoff_ms = 5004.2 连接串与 CursorLocation 对照表
| 配置项 | 推荐值 | 作用 | 不设置的后果 |
|---|---|---|---|
| Provider | SQLOLEDB / MSOLEDBSQL | 指定数据提供程序 | 版本不匹配可能直接连不上 |
| CursorLocation | clUseServer | 游标留在服务端 | 移动游标报 E_FAIL |
| CommandTimeout | 30 | 命令超时秒数 | 长查询被误判为失败 |
| LockType | ltReadOnly | 只读锁，减少冲突 | 并发时可能锁表 |
| CacheSize | 50 | 每次取的行数 | 大批量时内存压力大 |
4.3 在代码里读取配置并应用
uses System.IniFiles, Data.DB, Data.Win.ADODB; procedure TForm1.SetupQuery; var Cfg: TIniFile; begin Cfg := TIniFile.Create('config.ini'); try AdoQuery1.Connection := AdoConnection1; // 关键：先设游标位置，再打开 AdoQuery1.CursorLocation := clUseServer; AdoQuery1.CacheSize := Cfg.ReadInteger('database', 'CacheSize', 50); AdoQuery1.SQL.Text := 'SELECT TOP 100 * FROM Orders'; AdoQuery1.Open; finally Cfg.Free; end; end;如果你用的是 TOML 解析库，把上面的config.toml读进来，把cursor_location映射到clUseServer即可。核心原则不变：游标位置在Open之前确定。
5. 验证请求：最小复现步骤与成功结果
5.1 最小复现步骤
先故意用默认的clUseClient复现一次，确认你遇到的就是这个问题：
AdoQuery1.CursorLocation := clUseClient; // 故意用客户端游标 AdoQuery1.SQL.Text := 'SELECT * FROM Orders'; AdoQuery1.Open; ShowMessage(IntToStr(AdoQuery1.RecordCount)); // 这里大概率抛 E_FAIL如果这一步报错，把clUseClient改成clUseServer，重新编译运行：
AdoQuery1.CursorLocation := clUseServer; AdoQuery1.SQL.Text := 'SELECT * FROM Orders'; AdoQuery1.Open; ShowMessage(IntToStr(AdoQuery1.RecordCount)); // 正常返回行数 AdoQuery1.Next; // 正常移动5.2 验证 TaoToken 通道是否通
配置好 Key 之后，用一条最小请求验证通道：
curl -X POST https://taotoken.net/api/v1/chat/completions \ -H "Authorization: Bearer sk-your-key-here" \ -H "Content-Type: application/json" \ -d '{ "model": "claude-sonnet", "messages": [{"role": "user", "content": "ping"}] }'返回里能看到正常的choices结构，说明 Key 和通道都没问题。如果返回 401，检查 Key 是否复制完整；返回 404，检查base_url是否写成了https://taotoken.net/api。
5.3 成功结果长什么样
AdoQuery 这边：RecordCount返回真实行数，Next能连续移动到最后一行，Last能跳到末尾，不再抛 E_FAIL。
TaoToken 这边：请求返回 200，响应体里有模型输出。两边都通，说明数据访问层和模型调用层都配置正确。
6. 本篇常见错排查清单
6.1 E_FAIL 相关
错误：设置 clUseServer 后仍报 E_FAIL。检查提供程序版本。SQLOLEDB较老，某些新数据库建议换MSOLEDBSQL。连接串里的Provider和实际安装的驱动要匹配。
错误：CursorLocation 设置了但没生效。确认设置顺序在Open之前。如果查询已经打开，先Close，改属性，再Open。
错误：RecordCount 返回 -1。某些游标类型不支持记录数。改用clUseServer加ltReadOnly，或者用SELECT COUNT(*)单独取总数。
6.2 配置层相关
错误：TaoToken 请求 401。Key 没填对，或者Bearer后面多了空格。到 https://taotoken.net/api-keys?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= 重新复制一次。
错误：请求超时。把timeout_seconds调大，或者检查网络出口是否稳定。重试配置里的max_attempts可以适当增加。
错误：模型名不存在。到模型对话页面 https://taotoken.net/models?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= 确认可用模型名，别凭记忆写。
6.3 判断是提供程序还是配置层
一个简单的判断方法：如果Open就失败，多半是连接串或提供程序问题；如果Open成功但移动游标失败，基本就是CursorLocation配置问题；如果本地 AdoQuery 正常但 TaoToken 请求失败，那是 Key 或通道配置问题。把这三层分开验证，定位会快很多。
7. 把配置固定下来，别每次重踩
排查完这一轮，建议你把CursorLocation := clUseServer写进项目的基础查询封装里，而不是每个TAdoQuery单独设。新建查询时统一走一个工厂方法，游标位置、超时、缓存大小都从config.toml读，这样下次换数据库或换提供程序时，只改配置不改代码。
TaoToken 这边同理，Key 和base_url集中在一处，别散落在各个单元里。需要长期跑编码或 Agent 任务的话，Coding Plan 的通道更稳：https://taotoken.net/coding-plan?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= 。接入过程中遇到报错，先翻文档 https://taotoken.net/doc?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= ，大部分错误码都有对应说明。控制台里可以随时看 Key 的使用情况：https://taotoken.net/console?utm_source=taotoken_aicg_blog_end&utm_medium=csdn&utm_campaign=rewrite&utm_content= 。
