delphi中的SQL语句

Posted 2023-03-15

delphi中，如何在某个条件（如在序号在库中有记录）下执行修改数据库的语句，在另一条件（序号在库中没有记录）下执行插入数据库的语句

用ADO的表或查询或数据集组件，步骤：1，关闭组件；2，清除其中的SQL语句；3，写入新的SQL语句；4，打开组件；此时你就可以看到有无记录，如果有置ADO组件于编辑状态edit，即可修改记录，如果没有记录，则置ADO组件于增加数据状态apped，先对数据集组件连接表的各个字段赋值，然后保存。
SQL语句：
select 字段1，字段2，。。。字段n from 表名 where 序号=‘123’ 参考技术A 建立一个数组t，把表的序号sql出来全部赋值给数组，用textedit控件输入要更新的数据记录字段，在序号的textedit.onexit事件将序号的textedit.text赋给一个变量x，将变量x循环对比数组t的值
t[i,0]，当x=t[i,0]，执行update语句，else执行insert语句。这方法只能在数据量不大的情况下使用，量大的运行会很慢，因为等于需要和全表记录进行循环对比 参考技术B select * from 表A where 序号 in(selcet 序号 from 表B group by 序号 ) 参考技术C 先做一次查询，有的话就做update，没有就insert。