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

高手帮忙啊!关于插入数据库的问题!急急!菜鸟提问! 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了.

posted on 2009-02-19 16:45  delphi2007  阅读(95)  评论(0编辑  收藏  举报