Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];




Вниз

Как сложить (сумировать) все ячейки определенного столбца? 


XX   (2002-01-28 17:12) [0]

Ячейки в Stringgrid.
Напшите, плз, алгоритм.



Johnmen   (2002-01-28 17:17) [1]

Пробежать по всем строкам, суммируя то, что нужно...



Polevi   (2002-01-28 17:26) [2]

Можно выгрузить данные из StringGrid в какую нибудь базу данных, а потом SELECT SUM сделать..



Johnmen   (2002-01-28 17:41) [3]

>>>Polevi : это очень тормознуто ! да и, может быть, человеку не надобно никакой БД :)



Polevi   (2002-01-28 17:43) [4]

2Johnmen ©
Серьезно ??
:)))



Johnmen   (2002-01-28 17:48) [5]

Шютка ! %)))



Rash   (2002-01-28 19:55) [6]

sum:=0;
for i:=1 to grid.rowcount - 1 do
//i:=1 при наличии заголовка
begin
if grid.cells[4,i] = "" then col4:="0" else col4:=grid.cells[4,i];
try
sum:=sum+strtofloat(col4);
except on econverterror do sum:=sum end;
end;
suml.caption:=floattostr(sum);




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.04 c
1-32203           Sasha2                2002-01-26 16:39  2002.02.11  
Help


3-32167           binom                 2002-01-03 15:52  2002.02.11  
SDAC by CoreLab - прямой доступ к MS SQL без БДЕ, АДО и пр.


3-32169           Dmitry V. Averuanov   2002-01-16 16:11  2002.02.11  
Не удается поставить CTLibComps для D6 (WinXP)


1-32236           Rahim & Vad      2002-01-27 16:58  2002.02.11  
Отчаенье! Проблеммы с выводом на широкий формат! ПоМОООО гитееее


1-32270           Dmitriy_R             2002-01-28 14:11  2002.02.11  
Очистка памяти от уже ненужного мусора