1. 创建一个表N, 其中只有一个字段CurNo(int),代表当前歌号, 编写一个从N表取号并将原号加1的函数 fuction getNo():integer var n: integer; begin 用Query执行"SELECT CurNo From N" n=Query.FieldByName('CurNo').asInteger; 用Query执行"update N set curno=curno+1" result:= n; end 2. 在A表中插入记录时,调用getNo获得新的歌号
在存储过程里取号,每取一次号,UPDATE字段+1。
这样会保证数据一定不会重!因为UPDATE时会锁住此表...
当你向表里添加一条新记录时 编号字段自动编号,谢谢 请帮忙解决
编写一个从N表取号并将原号加1的函数
fuction getNo():integer
var
n: integer;
begin
用Query执行"SELECT CurNo From N"
n=Query.FieldByName('CurNo').asInteger;
用Query执行"update N set curno=curno+1"
result:= n;
end
2. 在A表中插入记录时,调用getNo获得新的歌号