特急：有关数据库超简单问题

Question

我正做一个有关 通讯录的程序，想为每一个人加上一编号，如张三0001，李四0002，依次类推，这样查询起来比较方便，希望系统能够自动加上，请问我该如何做？谢谢!

Answer 1

在MS access里就会你试一下就可以了

Answer 2

是在姓名后面直接加编号还是重新建一个字段进行编号？
建议：
重新建一个字段，专门作为每个人的编号。要直接加的话，我没试过：
var
I:Integer;
str1,str2:string;
begin
  for I:=0 to  DBGrid1.FieldCount-1 to
    begin
      Str1:=ADODataSet1.FieldByName('xingming').AsString;      Str2:=Str1+'I';
      ADODataSet1.FieldByName('xingming').AsString:=Str2;
      AdodataSEt1.Active :=false;
      AdodataSEt1.Active :=true;
    end;end;

Answer 3

先把字符型的转换成int型，加上10000，再转换成str型，再取后4位