收录日期:2019/06/20 01:18:27 时间: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,怎么修改?现在这段程序增加的顺序不是有序的。

小弟做了一个oracle存储过程访问代码生成工具。希望这个工具对大家有用。也能帮我测试,测试。 请求word开发接口文档!!谢谢 DrawString怎么画竖的文字? VB中如何用ADO访问FoxPro的DBF文件 寻找兼职美工 实时数据库技术中的一个压缩算法的误差计算 随想:认为有\"空间跳跃点\"存在,或是能创造出来. 在datagrid 中, 如何自動創建 checkbox那列 comp.**.**新闻组服务器是什么? Apache如何配置。急啊 outlook2000帐号不能记住密码 XSLT对XML的转换是在服务器端进行还是在客户端进行啊? 新创窗体那个\"关闭按钮\"它的代码是? 防止SQL输入攻击用的一个正则问题..pattern = \"^([^\']|(\'\'))*$\";是什么意思啊? [讨论]C/S系统也应该有防止SQL注入处理吗? 基于MIPS体系结构的嵌入式Linux开发系列免费讲座 菜鸟问题……datareprot 统计结果显示问题(关于行列变换)?在线等。。。。。。 发帖咨询问题前,建议你搜索,看是不是已经有人解决了这个问题。 一段as代码,没看懂 请问,在XP frofessional上应该安装什么版本的SQLServer2000阿?我想自己测试用 [请求]学习溢出遇到的问题,帮忙解答下 turboc 3.0 的make.exe在行命令的情况下如何使用? CheckBoxList.render();的执行顺序问题!! 请问怎么解决大文件上传的问题? Java书目大调查,进者有分 关于c++中的静态和动态存储 基于MIPS体系结构的嵌入式Linux开发系列免费讲座 请问PHP中怎么复制文件,包括文件夹的啊??