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了.