delphi - FireDac 按需轮询记录并在 StringGrid 中显示它们

Question

我正在使用 Delphi 10 Seattle、FireDac、Oracle 数据库和 TMS 组件。

我正在寻找一种方法，允许我从数据集/查询加载数据并根据需要将其放在 StringGrid 上。我认为正确的表达方式是paging。

当我有大量记录(5000+)时，我的应用程序会卡住(约 5 秒)，直到将所有记录加载到网格中为止。

我已阅读 Embarcadero 的关于 Fetching Rows 的 wiki 帖子但我在那里没有找到解决方案。

我尝试了 TFDQuery FetchOptions 和 ResourceOptions 的不同组合，但没有成功。

我注意到 Oracle 的 SQLDeveloper 完全符合我希望我的应用程序的行为。

我录制了这个短片来演示 SQLDeveloper 如何加载大量记录: https://gfycat.com/BlankOrganicIndianpalmsquirrel

它首先加载 50 条记录，当我滚动网格时，其他记录也会加载。

所以问题是我怎样才能获得像 SQLDeveloper 一样的轮询技术。谢谢!

编辑:正在使用 LiveBindings。切换到数据库感知组件，现在看起来快如闪电。

Answer 1

正如评论中提到的，通过从 LiveBindings 切换到数据库感知组件 DBGrid，我获得了巨大的性能速度。

为了平滑滚动，我使用了这个答案: Delphi dbgrid continuous scrolling