如何每次将新添加到数据库的记录移到最底部? 就好像写字一样. 急, pls help!!!

Question

with query do
  begin
  close
  sql.clear;
  sql.add(Insert into table ....);
  Execsql;
  end;
这已是最后一条记录的了，不知道符不符你的意思!

Answer 1

不太明白, 我的源代码是这样的:procedure TForm1.Button1Click(Sender: TObject);
begin
with table1 do
begin
insert;
fieldbyname('订单号').AsString:=edit1.Text;
fieldbyname('序号').AsString:=edit2.Text;
fieldbyname('型号').AsString:=edit3.Text;
fieldbyname('材质').AsString:=combobox1.text;
fieldbyname('材料').AsString:=combobox2.text;
post;
refresh;
end;
end;

Answer 2

关系数据库中的记当实现上并没有"最后一条记录"这个物理概念，表现出来的只是它的假象而已……（你可以用Order by来得到这种假象……)

Answer 3

建一自增长的索引字段。再insert就可以了

Answer 4

可否用我上面的代码做一做? thanks!

Answer 5

如果你用ADOSDataSet的话，用append添加新的数据，就会排在其他数据的后面。