记录号的变动问题(100分)

如用LISTVIEW显示如下
单位代码 单位名称
1 A
2 B
3 C
4 D

代码是自动编号，现在我想将单位名称上下调换，
如
2 C
3 B
，该怎么做谢谢。

那你最好内部加一个编号 orderno字段，通过改变这个的值，然后按orderno排序

不会吧用LISTBOX也可以
我的意思是当按下 上移 按纽时，
2 C
3 B
里面的代码如何写

if qrydata.RecordCount<1 then exit;
nno:=qrydata.fieldbyname('curno').asinteger;
n_id:=qrydata.fieldbyname('id').AsInteger;
if nno=1 then exit;
with qrytmp do
begin
close;
sql.Clear;
//让它的前一条记录编号加1
sql.Add('update tbl_p_combin set curno=curno+1 where curno=:n and per_id=er_id');
parambyname('per_id').AsInteger:=nid;
parambyname('n').AsInteger:=nno-1;
execsql;
close;
sql.Clear;
//根据自动编号改变用来排序的编号
sql.Add('update tbl_p_combin set curno=curno-1 where id=:id and per_id=er_id');
parambyname('id').AsInteger:=n_id;
parambyname('per_id').AsInteger:=nid;
execsql;
end;
我的程序用的可能比较麻烦
还需要重新打开刷新

直接把这两个listitem删除，再加上不就行了！
加上的时候，要记住开始llistitem的位置和相应的值就行了！

多人接受答案了。