recNo的值为什么始终为-1？

[xbm2002]

为是dbgrideh的不同行显示不同颜色
用 if table1.recNo mod 2=0 then
但是在程序执行过程中recNo的值始终为-1

[horse_h]

up

[whqcfp]

是表中没有记录所致！

As implemented in TDataSet, the value of RecNo is always -1. Ordinarily an application does not access RecNo at the TDataSet level. Instead a redeclared and implemented RecNo property in a descendant class such as TTable is accessed. RecNo provides a fallback property for derived datasets that do not support record numbers.

[cobi]

对某些数据库来讲，recno始终会是－1的
但是也可能是没有记录所致

[angle097113]

With Table1Do
Begin
Close;
SQL.Clear;
SQL.Add(' SELECT * FROM Kehu ');
Open;
Count := RecordCount;
End;
Table1.First;
While Not Table1.Eof Do
Begin
If Table1.RecNo Mod 2 = 0 Then
..........
Table1.Next;
End;

[superhjw]

oracle也是－1，总是－1。
其他的我没试验。

[IORILI]

你应该加

Table1.First;
While Not Table1.Eof Do

[bbs791109]

建議用ADO吧﹐adodataset1.recno應該是對的。

[dickeybird888]

RECNO之所以为-1是因为你所建立的数据库没有系统创建的自动增加类型的字段！

[xbm2002]

对，我用的就是oracle
谢谢！

[sncel]

看看我的，添加一个计算字段。
void __fastcall TfrmSelectTag::ClientDataSet1CalcFields(TDataSet *DataSet)
{
/**************************************************************
函数名：ClientDataSet1CalcFields(TDataSet *DataSet)
用途：指定记录显示的编号
输入参数列表：DataSet
输入参数1 TDataSet 传递方法（地址）
返回值：
类型
修改者：
修改日期：
**************************************************************/


if(ClientDataSet1->RecNo==-1)
{
if(RecordState==false)
{
ClientDataSet1->FieldByName("RecordID")->Value=1;
}
else
{
ClientDataSet1->FieldByName("RecordID")->Value=
ClientDataSet1->RecordCount;
}
}
else
{
ClientDataSet1->FieldByName("RecordID")->Value=ClientDataSet1->RecNo;
}


}

[RamjetZhang]

select count(yourField or *) from your table不就完事了么？
大型数据库跟桌面型数据库不一样，默认一条记录一条记录塞给你，还是单向不能回走的，哪象桌面数据库一次把一整陀数据往回塞任你处理。

[fsqcling]

As implemented in TDataSet, the value of RecNo is always -1. Ordinarily an application does not access RecNo at the TDataSet level. Instead a redeclared and implemented RecNo property in a descendant class such as TTable is accessed. RecNo provides a fallback property for derived datasets that do not support record numbers.

在帮助中有说明在TDataSet没有实现该方法, 在TBDEDataSet类中实现了,关键代码delphi没提供,但是delphi 是用自己的方法移动光标实现的,看代码有几个条件限制,当记录数很多时,返回-1;建议不要用这方法,可写sql语句用数据库来处理,效率比delhpi高得多.