sql里面有一个表,格式如下列“总号”和“类型号”一开始为空:类型 总号 类型号
 Z
 Z
 R
 R
 X
 X
 X
.........现在需要对这个表进行编号,实现如下效果: 

类型 总号 类型号
 Z  1  1
 Z  2  2
 R  3  1
 R  4  2
 X  5  1
 X  6  2
 X        7        3 
.........请问这样delphi的代码该如何写

解决方案 »

  1.   

    你是想在STRINGGRID之类的里面实现? 还是DELPHI里读取这样一个数据集?STRINGGRID之类的,即代码实现的话,看你的数据会不会出现 Z,Z,A,A,Z,B,B 即Z会不会隔开,
    如果不会出现隔开的话,第二列自增序号很简单,第三列循环加个判断是否跟上一笔同一个值就行了.SQL的话: 临表(自增列),根据自增列再UPDATE
      

  2.   

    不是在STRINGGRID里实现,有一个窗体:dbgrid显示数据库里的表(通过adoconnection、adoquery连接),点击窗体上的button,实现对表编号。“类型”这一列会出现隔开的情况,如:Z,Z,A,B,Z,B,A。
      

  3.   

    dinoalex:第三列的循环语句该怎么写啊,能不能详细讲解一下。