delphi - 如何使用 LiveBindings 在 TStringGrid 中显示超过 200 行？

Question

我有一个 TDataSource，它由绑定(bind)到 TStringGrid 的 TClientDataset 支持。我通过右键单击网格，选择“链接到数据库数据源...”，然后选择数据源来完成此操作。这为我设置了 LiveBindings。

当我运行应用程序时，即使数据集中有 5000 条记录，网格也仅填充 200 行。

我找不到任何有关如何更改显示的行数或允许用户滚动浏览所有数据的正确方法的文档。

我确实在Data.Bind.DBScope单元的TBindScopeDBEnumerator.Create中找到了硬编码的200值，当我增加它时到 10000，我在网格中看到了所有 5000 行，但这看起来像是一个 hack。

在 TStringGrid 中显示 200 多行的正确方法是什么？

Answer 1

您可以将TBindDBGridLink.BufferCount更改为您想要的值，而不是-1。但最好将 TBindDBGridLink.AutoBufferCount 设置为 True。