ADO对查询出的数据分页显示delphi

ADO对查询出的数据分页显示delphi(转) unit MainFrm; interface uses Classes, Controls, Forms, Grids, ToolWin, ComCt

ADO对查询出的数据分页显示delphi(转) unitMainFrm; interface uses Classes,Controls,Forms,Grids,ToolWin,ComCtrls,StdCtrls, ExtCtrls,DB,ADODB; type TfrmMain=class(TForm) cnn:TADOConnection; rst:TADODataset; pnlNavigate:TPanel; btnFirst:TButton; btnPrior:TButton; btnNext:TButton; btnLast:TButton; edtPageNO:TEdit; sgData:TStringGrid;