要實現Delphi的ListView分頁顯示，可以按照以下步驟進行操作：

1. 在Delphi的窗體上放置一個ListView控件，用于顯示數據。
2. 設置ListView的ViewStyle屬性為vsReport，這樣可以以報表形式顯示數據。
3. 在窗體上放置一個ComboBox控件，用于選擇每頁顯示的數據條數。
4. 在窗體上放置一個Button控件，用于切換到上一頁。
5. 在窗體上放置一個Button控件，用于切換到下一頁。
6. 在窗體的FormCreate事件中，初始化ListView的列標題和數據。
7. 在ComboBox的OnChange事件中，更新每頁顯示的數據條數，并重新計算總頁數。
8. 在上一頁按鈕的OnClick事件中，計算當前頁的起始索引和結束索引，并更新ListView的顯示數據。
9. 在下一頁按鈕的OnClick事件中，計算當前頁的起始索引和結束索引，并更新ListView的顯示數據。
10. 在窗體的UpdateListView方法中，根據當前頁的起始索引和結束索引，從數據源中取出對應的數據，并更新到ListView中。
11. 在窗體的UpdatePager方法中，根據總頁數和當前頁數，更新上一頁按鈕和下一頁按鈕的Enabled屬性。

下面是一個簡單的示例代碼：

unit MainForm;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ComCtrls, StdCtrls;

type
  TMainForm = class(TForm)
    ListView1: TListView;
    ComboBox1: TComboBox;
    ButtonPrev: TButton;
    ButtonNext: TButton;
    procedure FormCreate(Sender: TObject);
    procedure ComboBox1Change(Sender: TObject);
    procedure ButtonPrevClick(Sender: TObject);
    procedure ButtonNextClick(Sender: TObject);
  private
    FData: TStringList;
    FPageSize: Integer;
    FTotalPages: Integer;
    FCurrentPage: Integer;
    procedure UpdateListView;
    procedure UpdatePager;
  public
    { Public declarations }
  end;

var
  MainForm: TMainForm;

implementation

{$R *.dfm}

procedure TMainForm.FormCreate(Sender: TObject);
var
  I: Integer;
begin
  FPageSize := 10;
  FCurrentPage := 1;

  FData := TStringList.Create;
  for I := 1 to 100 do
    FData.Add('Item ' + IntToStr(I));

  ListView1.Columns.Add.Caption := 'Items';

  UpdateListView;
  UpdatePager;
end;

procedure TMainForm.ComboBox1Change(Sender: TObject);
begin
  FPageSize := StrToIntDef(ComboBox1.Text, 10);
  FCurrentPage := 1;

  UpdateListView;
  UpdatePager;
end;

procedure TMainForm.ButtonPrevClick(Sender: TObject);
begin
  if FCurrentPage > 1 then
  begin
    Dec(FCurrentPage);
    UpdateListView;
    UpdatePager;
  end;
end;

procedure TMainForm.ButtonNextClick(Sender: TObject);
begin
  if FCurrentPage < FTotalPages then
  begin
    Inc(FCurrentPage);
    UpdateListView;
    UpdatePager;
  end;
end;

procedure TMainForm.UpdateListView;
var
  I, StartIndex, EndIndex: Integer;
begin
  ListView1.Clear;

  StartIndex := (FCurrentPage - 1) * FPageSize;
  EndIndex := StartIndex + FPageSize - 1;
  if EndIndex >= FData.Count then
    EndIndex := FData.Count - 1;

  for I := StartIndex to EndIndex do
  begin
    with ListView1.Items.Add do
    begin
      Caption := FData[I];
    end;
  end;
end;

procedure TMainForm.UpdatePager;
begin
  FTotalPages := Ceil(FData.Count / FPageSize);

  ButtonPrev.Enabled := FCurrentPage > 1;
  ButtonNext.Enabled := FCurrentPage < FTotalPages;
end;

end.

以上代碼實現了一個簡單的ListView分頁顯示的Delphi程序。通過ComboBox選擇每頁顯示的數據條數，通過按鈕切換上一頁和下一頁。根據當前頁的起始索引和結束索引，從數據源中取出對應的數據，并更新到ListView中。同時，根據總頁數和當前頁數，更新上一頁按鈕和下一頁按鈕的Enabled屬性。