delphi edit自动产生编码

发布网友发布时间：2024-03-01 05:54

共2个回答

热心网友时间：2024-08-15 04:45

在“输入”按钮的onclick事件里编写响应代码。

生成的客户编码如果没有什么特殊要求，只是最简单的序列式流水号的话，可以直接设立一个全局变量，用以记录当前的序号，当前序号加1，就是新的流水号。

将流水号赋给客户编码这个Edit控件。

热心网友时间：2024-08-15 04:45

你的数据反正要保存进那就设计数据库
设置客户编码字段 sn

在文本框控件的属性 onclick事件里

adoquery.sql.text:='select isnull(max(sn),9999)+1 as k1 from 表';
//获取以前的最大ID号如果以前没有记录那就从10000开始
adoquery.open

sn:=adoquery.fieldbyname('k1').asinteger;

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com