有个DBGrid1连接表table1,大致如下:
姓名 语文(yw) 数学(sx) 总分(zf)
张三 80 90 170
李四 90 70 160
------------------------------------------------
现在的问题是这个表在dbgrid中编辑,当输入完yw,sx后怎样实现自动计算总分(zf)呢?先谢谢了
姓名 语文(yw) 数学(sx) 总分(zf)
张三 80 90 170
李四 90 70 160
------------------------------------------------
现在的问题是这个表在dbgrid中编辑,当输入完yw,sx后怎样实现自动计算总分(zf)呢?先谢谢了
解决方案 »
- 多IP主机中使用Indy服务端(IdTCPServer或IdUDPServer),收到客户端发来的数据,如何确定客户端是发给本机的哪个地址的?
- ■■■困惑!!!序号自动加一问题,这样的SQL语句怎样写?■■■
- 怎样让TLabel(或TImage)也能像TButton一样获得焦点,有这样改装过的控件吗?
- 关于全角半角字体转换的问题------急死了,急急急!
- 怎样通过Web网传输文本文件?(急!!!!)
- 为什么我怎么也进不了大富翁的全文检索界面?在线等,解决后马上给分..
- 关于窗体实时监测,更改按钮图标
- 紧急求援
- 如何处理输入到数据库的关键字段重复的问题?
- 一个好的问题(快来拿分呀!!!)
- 如何记录鼠标和键盘的所有动作?
- delphi6+access2000+ADO.求SQL语句。分别从A.MDB,B。MDB中的A。1,A。2,B。1表读取数据,加到c.MDB中的c.1,SQL怎么写?
在OnCaculate事件里写
在table的Events中找到计算的项目
procedure TForm1.Table1CalcFields(DataSet: TDataSet);
begin
table1zf.value=table1yw.value+tablesx.value;
end;
end.
简单一点可以这样写:
DBgrid1.fields[3].text:=strtoint(inttostr(dbgrid1.fields[1].text)+inttostr(dbgrid1.fields[2].text));
很久没用delphi了,你试试这样行不行吧。(类型转换有没有写错我就不太清楚了,你自己试一下吧)