计算字段求值？？？(100分)

W

wangfu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-11

• #1

procedure TForm1.Table1CalcFields(DataSet: TDataSet);
begin
if table1.fieldbyname('bzcs').asinteger<>0 then
table1.fieldbyname('fenshu').asfloat:=table1.fieldbyname('zccs').asinteger+table1.fieldbyname('bzcs').asinteger;
end;
对吗？
我事想对选择的所有记录， zccs/bzcs
然后求和，再求平均值
请指教
我给分！

 

张

张剑波

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-11

• #2

没有else,结构不完整。

 

张

张剑波

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-11

• #3

在计算字段中“我事想对选择的所有记录，然后求和，再求平均值”
你不怕死机。

 

J

jyh_jack

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-11

• #4

你可以采用bookmark来判断当前的记录是否被选中，选中的就进行运.

 

T

TYZhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-11

• #5

我事想对选择的所有记录， zccs/bzcs
然后求和，再求平均值


对这种问题应该用SQL查询语句，或者ClientDataSet中的TAggregates来解决，或者用数据集
的遍历来解决，用计算字段肯定是不行的。

 

S

st_cumt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-11

• #6

你的意思是对表中（dbgrid）中所有选择的记录进行求和然后再平均，还是对一条记录的两个字
段进行求和然后平均？
如果第一种可以用selected 字段，进行选择，然后进行求和平均
如果第二种就可以直接在sql语句中写，就根本不用计算字段

 

W

wangfu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-11

• #7

to 张剑波：
确实死机，但是有人没有关系的，所以我来问问，除法耗系统资源吗？？
to TYZhang:
希望具体一点，谢谢！

对不起，大家，我一时马虎除了点问题
不是加号，是除号
我想先选择一定的符合条件的记录，当然用query.SQL
再，每条记录的zccs/bzcs得到结果x
然后在把整个 Query中的记录x 求和，在求平均值
运行死机
望指点

 

张

张剑波

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-11

• #8

to wangfu:
引发procedure TForm1.Table1CalcFields(DataSet: TDataSet);的事件
的因素太多，如记录一移动就引发，而你在这里的算法包括整个表，太耗资源，
故死机。

总之思路不对。agree TYZhang 。

 

W

weiweiHU

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-11

• #9

procedure TForm1.Table1CalcFields(DataSet: TDataSet);
begin
if query.fieldbyname('bzcs').asinteger<>0 then
query.close;
query.sql.clear;
query.sql.add('select sum((a.zccs)/(a.bzcs)) as fenshu from table1 a')；
也可以加query.sql.add('where bzcs<>"'+0+'"';
query.Open；
end;
没试，用了行马上说

 

江

江维

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-12

• #10

楼上的兄弟的方法好像可以！

 

W

wangfu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-16

• #11

接受了答案