2

无论出于何种原因，我无法弄清楚如何识别给定页面中的结果数量。我有一个数据列表和一个属性，该属性PageSize标识一页中应该有多少结果。假设有 120 个结果，页面大小为 25。这意味着总共应该有 5 个页面，前 4 个页面有 25 个记录，第 5 个只有 20 个记录。现在，我得到的结果是全面的，例如，50当它应该是时我可能会得到20。

我正在编写此函数以返回指定页面中的结果数，但我似乎无法正确计算简单的数学（我从来不擅长数学）。每页没有实际的列表，我可以简单地阅读Count以识别该页面中的记录数 - 我需要使用此函数动态计算它。

请参阅下面的代码行CALCULATION DONE HERE：

function TMyData.SizeOfPage(const Index: Integer): Integer;
begin
  //Index = Page Number (0 ... MAX)
  //Result = Number of results in given page
  //PageCount = Total number of pages (from other function)
  //RecordCount = Total number of records (all pages)
  Result:= 0; //Default
  //Validate index bounds
  if (Index >= 0) and (Index < PageCount) then begin
    if Index < PageCount-1 then begin
      //Just return full size of one page
      Result:= PageSize;
    end else begin
      //Return number of records in the last page
      //--- CALCULATION DONE HERE ---
      Result:= RecordCount - Trunc(RecordCount / PageSize);
    end;
  end else begin
    raise Exception.Create('Page index out of bounds ('+IntToStr(Index)+')');
  end;
end;
4

1 回答 1

4

我认为没有理由在这里使用浮点运算。如果整数算术足够，我总是避免浮点算术。

我会这样写：

ItemsOnLastPage := 1 + (RecordCount-1) mod PageSize;

或者这个版本：

ItemsOnLastPage := RecordCount - (PageCount-1)*PageSize;

这特别容易理解。您减去所有整页上显示的记录，剩下的是最后一页上的记录。

就目前PageCount而言，您可以这样计算：

PageCount := (RecordCount+PageSize-1) div PageSize;

感谢@Rob 的洞察力。

于 2012-12-17T18:11:32.797 回答