使用ADO面板的ADOQuery组件，如何分页显示（例如每次显示20条记录，Access数据库）...(100分)

L

ledo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-03

• #1

1. 使用ADO面板的ADOQuery组件，如何分页显示（例如每次显示20条记录），
2. 如何自动给出显示记录的序号，不是Access的自动编号。

 

杜

杜宝

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-04

• #2

1、不明白，不知道你要的是什么效果，是只返回若干条记录还是在Grid中只显示若干条记录
2、增加一个计算段：No,
在TADOQuery或TADOTable的OnCalc...事件（就是计算字段事件了）加上
...
ADOQueryNo.Value:=ADOQuery.RecNo;
...就行了。

 

星

星空

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-04

• #3

我曾使用了一种较笨的方法，定义了一个bookmark，每次翻页时，将当前记录移到此位置。

 

小

小菜

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-08

• #4

1.　使用StringGrid自己显示记录。

ADOQuery.Recordset.PageSize:=20;
ADOQuery.Recordset.AbsolutePage:=1; //定位到第一页
　　rs:=ADOQuery.Recordset;
for i:=1 to 20 do
begin
StringGrid.Cells[iCol,iRow]:=rs.Fields.Get_Item('fieldname_1').Value;
........
StringGrid.Cells[iCol+n,iRow]:=rs.Fields.Get_Item('fieldname_n').Value;
Inc(iRow);
rs.MoveNext;
end;

2. 照杜宝的方法.

 

S

ssjjll

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-10

• #5

李维 的 《实战Delphi 5.x-专业ADO/MTS/COM+程序设计篇》有详细介绍

 

F

fbyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-10

• #6

关注，对了什么地方有李维书的电子版，希望告诉我！谢谢

 

J

jinrui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-11

• #7

listen

 

L

ledo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-20

• #8

多人接受答案了。