delphi 7

来源：百度知道 编辑：UC知道 时间：2024/05/21 06:23:34
想写一段代码
输入一个数字 数据库中相对的数字减去输入的数字 如果为负数停止并发出提示 如果为0则删除这条记录

请高手帮忙！！
就是数据库中的某个字段值减去输入的数值 大于0则数据库保留相减的结果 小于0则提示数据库中数值不够大
等于0则删除数据库中这个字段的记录

建议用ADOTABLE 或ADOQUERY组件得到数据库记录集，再对记录集一条一条做以下操作：
I=字段值-strtoint(edit1.text)
if i>0 then 将记录集字段值更新为I
if i=0 then delete from 表名 where 条件
if i<0 then 提示

以上是一个思路，你可以自己根据实际完善相关代码

问题表述似乎不是很清晰，我的理解好像就是要删除某字段值＝你输入的数值的 记录，如果是这样不是太简单了？
delete from tablename where fieldsname=你输入的数