请教，DBGrid如何显示序号？？(100分)

苍

苍山@狼

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #1

数据集控件是Query
New了一个计算字段
类型选择Integer，field type 选calculated
然后在该计算字段的OnGetText事件里写：
Text := Query.RecNo
但看到的所有行都显示为-1,

 

F

fpsky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #2

procedure TDM.ClientDataSet1CalcFields(DataSet: TDataSet);
begin
ClientDataSet1XUHAO.Value := ClientDataSet1.RecNo;
end;

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #3

应该放在 OncalcFields 事件中，
但不是所有的库都支持 RecNo

 

苍

苍山@狼

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #4

我按上面的方法试了，但新加的那个计算字段什么也不显示
我的数据库是Informix是不是不支持这个属性

 

Z

zhengbo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #5

你在ClientDataSet的AfterScroll事件中写：
ClientDataSet1XUHAO.Value := ClientDataSet1.RecNo;

 

苍

苍山@狼

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #6

这样也不行，我现在用sql_server数据库也还是得出同样的结果；

 

J

jackshow

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-27

• #7

dbgrid.datasource.dataset.recno

 

F

faller

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-27

• #8

FieldDefs[0].DataType:=ftAutoInc

 

苍

苍山@狼

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #9

谢谢各位的参与，但还是没解决，我用别的方法解决了（同样送出分数）
在OncalcFields事件中
QrySfbzRecNo.Value :=QrySfbz.RecNo + intGlbXh ;
intGlbXh:=intGlbXh+1;
然后在该计算字段的OnGetText事件里写：
Text := IntTostr(Query.RecNo);
然后就能序号显示了