在 Delphi 开发中，处理数据库数据时，经常会遇到需要展示部分数据的情况，也就是分页操作。通常我们都是通过SQL的分页语句进行分页。但是TFDQuery组件的FetchOptions.RecsSkip和FetchOptions.RecsMax属性为我们实现了另一种分页的解决方案，且无需关心不同数据库的分页 SQL 语法差异，使代码具有更好的数据库独立性。
一、属性介绍
FetchOptions.RecsSkip：该属性用于指定从结果集中开始获取记录的偏移量。简单来说，它决定了跳过前面多少条记录后开始获取数据。例如，当RecsSkip设置为 0 时，表示从结果集的第一条记录开始获取；若设置为 5，则会跳过前面 5 条记录，从第 6 条记录开始获取数据。
FetchOptions.RecsMax：此属性用于设定每次获取的记录最大数量，即每页显示的记录数。比如将RecsMax设置为 20，那么每次获取数据时，最多只会获取 20 条记录，这 20 条记录构成了 “一页” 的数据。
二、应用场景
在实际开发中，分页操作随处可见。无论是 Web 开发中为了提升用户体验，每次只展示少量数据，还是在移动应用中避免一次性加载过多数据导致性能问题，RecsSkip和RecsMax属性都发挥着重要作用。以一个 Delphi FireMonkey 应用为例，该应用可能需要从数据库中获取大量用户信息，但在移动设备的有限屏幕上，一次性展示所有信息既不现实也不友好。这时就可以利用这两个属性，实现按页展示用户数据，提升应用的性能和用户体验。
三、使用示例
接下来，我们通过一个完整的示例来详细了解这两个属性的使用方法。假设我们有一个数据库表Users，包含ID、Name、Email等字段，现在要在一个TStringGrid控件中分页展示这些用户信息。
创建数据库连接和查询组件：在 Delphi 的窗体中，添加一个TFDConnection组件用于连接数据库，再添加一个TFDQuery组件用于执行 SQL 查询。配置TFDConnection组件的相关属性，如数据库类型、服务器地址、用户名和密码等，确保能够成功连接到数据库。
设置 LiveBindings：添加一个TBindSourceDB组件和一个TBindingsList组件，以及一个TLinkGridToDataSource组件。将TBindSourceDB的DataSet属性设置为FDQuery1，TLinkGridToDataSource的DataSource属性设置为BindSourceDB1，GridControl属性设置为用于展示数据的TStringGrid。这样就建立了从TFDQuery到TStringGrid的实时绑定，确保数据能实时显示在网格中。
编写代码实现分页功能：在窗体的OnCreate事件中，初始化RecsMax和RecsSkip属性：

procedure TForm1.FormCreate(Sender: TObject);
begin
    FDQuery1.FetchOptions.RecsMax := 10; // 设置每页显示10条记录
    FDQuery1.FetchOptions.RecsSkip := 0;  // 从第一条记录开始
    FDQuery1.SQL.Text := 'SELECT * FROM Users'; // 设置查询语句
    FDQuery1.Open;
end;

在 “上一页” 按钮的点击事件中，实现向前翻页功能：

procedure TForm1.BackBTNClick(Sender: TObject);
begin
    FDQuery1.Close;
    if FDQuery1.FetchOptions.RecsSkip > 0 then
    begin
        FDQuery1.FetchOptions.RecsSkip := FDQuery1.FetchOptions.RecsSkip - 10;
        if FDQuery1.FetchOptions.RecsSkip < 0 then
            FDQuery1.FetchOptions.RecsSkip := 0;
    end;
    FDQuery1.Open;
    LinkGridToDataSourceBindSourceDB1.Active := False;
    LinkGridToDataSourceBindSourceDB1.Active := True;
end;

在 “下一页” 按钮的点击事件中，实现向后翻页功能：

procedure TForm1.NextBTNClick(Sender: TObject);
begin
    FDQuery1.Close;
    FDQuery1.FetchOptions.RecsSkip := FDQuery1.FetchOptions.RecsSkip + 10;
    FDQuery1.Open;
    LinkGridToDataSourceBindSourceDB1.Active := False;
    LinkGridToDataSourceBindSourceDB1.Active := True;
end;

这样每次点击 “上一页” 或 “下一页” 按钮时，都会根据RecsSkip属性的变化重新执行查询，并通过切换LinkGridToDataSourceBindSourceDB1.Active属性的值来刷新TStringGrid中的数据，从而实现分页的效果。
四、注意事项
性能问题：虽然这两个属性使用方便，但如果数据量非常大，一次性获取大量数据再进行分页可能会影响性能。在实际应用中，要根据数据量和应用场景合理设置RecsMax的值，避免过度消耗内存和网络资源。
数据一致性：在多用户环境下，当其他用户对数据进行修改时，可能会导致分页数据的不一致。在需要严格数据一致性的场景中，要考虑采取额外的措施，如加锁机制等。
TFDQuery的FetchOptions.RecsSkip和FetchOptions.RecsMax属性为我们在 Delphi 开发中实现分页功能提供了简单有效的方式。通过合理运用这两个属性，并结合实际需求进行优化，能够开发出高效、稳定的数据库应用程序。