Форум: "Основная";
Поиск по всему сайту: 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.025 c
1-32226           madcap                2002-01-27 01:26  2002.02.11  
Функция не возвращает TStringList


3-32156           KMZ                   2002-01-16 13:03  2002.02.11  
Привет всем,помогите разобратся проблемой


3-32141           TAN                   2002-01-14 13:19  2002.02.11  
TUpdateSQL


14-32336          Moscower              2001-12-21 17:31  2002.02.11  
Никто не знает, что случилось с chat.ru? Уже 3 дня не работает...


1-32283           oomneeq               2002-01-18 18:57  2002.02.11  
Debug & properties evaluation