收录日期:2019/02/20 03:32:40 时间:2016/05/24 00:10:53 标签:VCL组件开发及应用
datamodule1.table_hezhao.Append;
datamodule1.table_hezhao.FieldByName('sl_zlbh').AsString:=edit1.Text;
datamodule1.table_hezhao.post;
datamodule1.table_hezhao.first;
j:=datamodule1.table_hezhao.fieldbyname('sl_bh').AsInteger;
while DataModule1.table_hezhao.Eof<>true do
      begin
            DataModule1.table_hezhao.Next;
           i:=DataModule1.table_hezhao.fieldbyname('sl_bh').asinteger;
           if i>j then j:=i;
       end;
DataModule1.table_hezhao.edit;
DataModule1.table_hezhao.FieldByName('sl_bh').AsInteger:=j+1;
DataModule1.table_hezhao.Post;
我这段程序意思是在form1窗体里有个button按钮,它的onclick属性是这样的。
我想点一下,让table_hezhao表增加一条记录,并且使sl_bh增加1,怎么修改?现在这段程序增加的顺序不是有序的。

两张查询表之间的查询 求助CSDN网友:北京某公司or家乡移动?(手动结贴,纯接分的,水的,可以飘过~~~) 如何改变CTABCTRL控件的背景色和标签的颜色? 招ASP程序员 广州 新手求vb.net增删改查基本页面代码 后台文章发布+审批流程管理 php,你能不能不要理c语言? 【共享】最近在学习STL,找到了一点参考资料,贴出来共享。(一) 怎么点击一下datagridview的单元格,在单元格的下方再显示一个datagridview,方便选择数据 大侠好:我想申请空间和域名,要价格便宜的,免费也行, Delphi中使用OLE方法操作Excel--如何让导出的Excel第一列的属性为文本类型? vb波形显示 关于获取网页链接的正则表达 去掉重复的数据 各位兄弟姐妹帮忙看看如何解决 strncpy未声明? 如何将字符串判断是否为版本格式 带参数的线程该怎么写? 高手请进,jboss新手问题 请教大家一个小问题~ 【保证你的嘴张开】非常经典的搭讪!!!!~~~~~~~笑的都给我散100分 笔记本问题 No buffer space available (maximum connections reached?)问题如何解决? 用VS2005调试程序的时候,为什么模拟器还是英文?(导致中文菜单为乱码) PHPLIB 输出多行多列问题 关于TextBox的一个很简单的问题请教??? 这个简单的程序为什么无法运行呢? 关于ASP.net与css的问题 IdTCPServer1在IdTCPServer1Execute事件里如何控制多个客户端访问服务器?急 MYSQL 2000 子查询BUG