stringgrid能否进行竖行统计?如何统计? //推荐http://www.csdn.net/expert/topic/410/410056.shtm 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.BitBtn1Click(Sender: TObject);var vSum: Real; I: Integer;begin vSum := 0; for I := 0 to StringGrid1.RowCount - 1 do vSum := vSum + StrToFloatDef(StringGrid1.Cells[1, I], 0); Edit1.Text := FloatToStr(vSum);end; EXCEL中xx.00读出来只能是xx? DELPHI 怎么判断SQL是否有存放图片? 十万火急,delphi调用dll莫名其妙的错误! 初学者,一段小代码帮忙看看 我这个总是编译出错,怎么回事谁告诉我一下 有多少人在用DUnit? 今天看见了李维,还有奇遇,来看看哦 adodataset插记录的问题? 呵呵,我发现一个csdn问题,不知道大家是否注意到了。 请大虾快帮忙 在WINDOWS下如何检测应用程序是否停止响应!!高分相送!!问题解决后立即给分!! 请教一个问题——如何在程序一开始时就能隐藏窗体呢?
var
vSum: Real;
I: Integer;
begin
vSum := 0;
for I := 0 to StringGrid1.RowCount - 1 do
vSum := vSum + StrToFloatDef(StringGrid1.Cells[1, I], 0);
Edit1.Text := FloatToStr(vSum);
end;