delphi - 计算 TDbGrid 中的行数

Question

我有一个 TDbGrid，我可以在运行时使用 FieldCount 属性轻松判断其中有多少列，但似乎没有相应的 RowCount 属性来显示正在显示的记录数。我怎样才能找到这个？

Answer 1

RowCount 和 VisibleRowCount 都是 TCustomGrid 中 protected 属性，不会在 TDBGrid 中公开。但您可以通过执行以下操作来解决这个问题:

type
  TDummyGrid = class(TDBGrid);

  RowCount := TDummyGrid(MyDBGrid).RowCount;
  VisibleRowCount := TDummyGrid(MyDBGrid).VisibleRowCount;

请注意，这包括 header 。