|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
11.02.2007, 23:15 | #1 |
Пользователь
Регистрация: 13.12.2006
Сообщений: 13
|
Как же мне это сделать? DBgrid
Вообщем такая загвоздка-
Нужно сложить все числа определенной колонки dbgrid и вывести куда нибудь результат. Я в затруднении, помогите пожалуйста, господа программисты. |
12.02.2007, 00:41 | #2 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
Пусть грид подключен к некоей Table1. И пусть искомая колонка подключена к полю Table1MyCol.
Тогда процедура нахождения суммы будет выглядеть так: sum:=0; Table1.First; while not Table1.Eof do begin sum:=sum+Table1Mycol.Value; Table1.Next; end; |
12.02.2007, 00:59 | #3 |
Пользователь
Регистрация: 06.11.2006
Сообщений: 51
|
Можно и таким циклом:
sum:=0; Table.First; For i:=1 to RecordCount.Table do begin sum:=sum+Table['Имя_поля']; Table.Next; end; // если числа хранятся в строковом формате, то пользуйся //конвертами типа IntToStr(Table[Имя_поля']) или //FloatToStr(Table[Имя_поля']) |
12.02.2007, 01:04 | #4 | |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
Цитата:
Куда торопимся? Как голый в баню, ей-богу... |
|
12.02.2007, 08:58 | #5 |
Пользователь
Регистрация: 13.12.2006
Сообщений: 13
|
mihali4
nova-alex sum:=0; Table1.First; while not Table1.Eof do begin sum:=sum+Table1Mycol.Value; Table1.Next; end; IT WORKS!!! Огромнейшее спасибо вам за ответы |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сделать так, чтобы в DBGrid выводилась таблица Excel | Илюха | БД в Delphi | 10 | 06.05.2010 15:59 |
DBGrid | DOLBY | Компоненты Delphi | 29 | 08.10.2008 00:05 |
DBGrid | Ane4ka | БД в Delphi | 28 | 01.06.2008 10:00 |
DBGrid | sergei64_89 | БД в Delphi | 0 | 09.05.2008 19:48 |
DBGrid | 1nurik1 | БД в Delphi | 17 | 17.07.2007 17:20 |