高手帮忙啊!关于插入数据库的问题!急急!菜鸟提问!

高手帮忙啊!关于插入数据库的问题!急急!菜鸟提问! Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiDB/html/delphi_20061218182608236.html
高手帮忙!我要向一个表中插入数据!要求的规则是这个的!  
  需要向表中手工插入姓名,所在单位和年龄!需要用年龄算出一个系数,40的系数为1,每增加4,系数增加0.05.年龄的最低值为32,系数为0.9!请问高手,需要自动插入系数,不能手工输入,这个该怎么做啊!帮忙啊!

用触发器  
  或者在设计表的时候,把系数字段设为和年龄关联的公式

先定义好最低年龄和系数,设有Edit_NL   Edit_XS  
  ZXNL   =   32;     //最小年龄  
  XS   =   0.9;       //系数基数  
  var   NL:   integer;  
  if   (NL   :=   StrToInt(Edit_NL.Text))>=ZXNL   then  
      if   (NL   -   32)   mod   4   then  
          Edit_XS   :=   IntTo(XS   +   0.05);  
  这样就OK了.

转载于:https://www.cnblogs.com/delphi2007/archive/2009/02/19/1394137.html

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值