因为只能修改一条如果要修改多条可有循环:
FOR I:=0 TO DM。KFYD_TABLE.RECORDCOUNT-1 DO
BEGIN
dm.kfyd_table.Edit;
dm.kfyd_table.FieldByName('ffbz').AsInteger := 1;
///dm.kfyd_table.Post;
DM.KFYD_TABLE.NEXT;
END;
或者用SQL语句写也可以的
FOR I:=0 TO DM。KFYD_TABLE.RECORDCOUNT-1 DO
BEGIN
dm.kfyd_table.Edit;
dm.kfyd_table.FieldByName('ffbz').AsInteger := 1;
///dm.kfyd_table.Post;
DM.KFYD_TABLE.NEXT;
END;
或者用SQL语句写也可以的
解决方案 »
- delphi 中webbrowser 屏蔽脚本错误提示
- winexec()运行一段DOS程序,怎样将其强行终止?(来顶有分)
- 请问各位仁兄外键冲突会发生在那些情况下?在线等候... ...
- adoConnection 与 sqlserver 的连接
- 请教大家一个问题,象以下一个软件,大概开价多少合适?
- 我想在WIN32程序里调用DOS中断,该怎么办?100分
- 怎样循环播放*.wav和*.mid文件?请给出源代码!百分感谢呀!紧急呀!
- midas学习中遇到的问题
- 请,专家会诊 52分,全给了
- 各位朋友,到哪可以找到制作中文的安装程序!
- API进行串口通讯,请指教?
- 如何对*.txt文件进行操作?
While Not dm.kfyd_table.Eof Do
Begin
dm.kfyd_table.FieldByName('ffbz').AsInteger := 1;
dm.kfyd_table.Next;
End;
dm.kfyd_table.Post;
用导航条连一个表,试一下就知道了