八百里加急！！！~~~~elphi6中通过Edit修改 数据库数据？？

Question

我想通过delphi中的Edit（点击按钮提交）对sql（2000）数据中数据进行修改，用的是table（不行的话就换query）请教各位大虾：代码怎么写？顺便提一句：是远端访问c/s结构的。修改条件是，其中第一个Edit值与数据库中主字段的值相同时 修改；否则添加。~~~~~~~~~~很简单的一个问题，但因本人是菜鸟~~实在无奈~ :(

Answer 1

query.sql.clear;
query.sql.add('select * from yourtable where yourfield='+quotedstr(edit1.text));
query.open;
if not query.eof then//如果字段值相同
   begin
       table.edit;
       table.fieldbyname('yourfieldname').asstring:=edit2.text;
       table.post;
   end
else //否则添加
   begin
       table.insert;
       table.fieldbyname('yourfieldname').asstring:=edit2.text;
       table.post;
   end;

Answer 2

用dbedit不行吗？为何一定要用edit

Answer 3

if Edit1.Text=table1.Fieldbyname('字段').Value then
begin
  with Table1 do
  begin
    edit;
    fieldbyname('字段1') .Value:=Edit1.text;
    Post;
  end;
end
else
  with Table1 do
  begin
    Append;
    fieldbyname('字段1') .Value:=Edit1.text;
    fieldbyname('字段2') .Value:=Edit2.text;
    Post;
  end;

Answer 4

这是个费事的选择，dbedit和数据库连接更合理。

Answer 5

在edit.onkeydown中写
if key=#13 then
begin
  //判断是否存在
 if 存在 then
   //修改
 else
   //添加
end;

Answer 6

我建议楼主用dbedit空间，否则就用sql语句操作