Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> сумма колонки DBGrid, как получить 
V
    Опции темы
wofs
Дата 13.8.2008, 22:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 82
Регистрация: 1.5.2007

Репутация: нет
Всего: нет
есть колонка в dbgrid (пуст будет 7я) необходимо ссумировать все вещественные числа в этой колонке.
проблема  в том, что не известно количество строк в DBGrid... т.е. может быть и 5, а может и 500.
помогите плиз...
PM MAIL   Вверх
Данкинг
Дата 13.8.2008, 22:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130
Запросом выбираешь из датасета, к которому подключён DbGrid.

Это сообщение отредактировал(а) Данкинг - 13.8.2008, 22:50


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
wofs
Дата 14.8.2008, 09:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 82
Регистрация: 1.5.2007

Репутация: нет
Всего: нет
Цитата(Данкинг @ 13.8.2008,  22:50)
Запросом выбираешь из датасета, к которому подключён DbGrid.

можно обнародовать пример запроса? плиз..
 smile 
PM MAIL   Вверх
Данкинг
Дата 14.8.2008, 10:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130
Цитата(wofs @  14.8.2008,  10:53 Найти цитируемый пост)
можно обнародовать пример запроса? плиз..

В общем случае, видимо

Код

select sum (pole) from table

 smile 

Это сообщение отредактировал(а) Данкинг - 14.8.2008, 15:53


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Teleport
Дата 14.8.2008, 12:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 557
Регистрация: 5.7.2008
Где: Прибалтика

Репутация: 1
Всего: 6
Вот держи  smile 

Код

procedure TForm1.Button1Click(Sender: TObject);
begin
  Adoquery1.Active:=false;
  AdoQuery1.SQL.Clear;
  AdoQuery1.SQL.Add('select sum (pole1) from tab1 ');
  Adoquery1.Active:=true;
  Label1.Caption:= AdoQuery1.Fields[0].AsString;
end;


Это сообщение отредактировал(а) Teleport - 14.8.2008, 12:56


--------------------
user posted image
user posted image 
PM MAIL   Вверх
Poseidon
Дата 14.8.2008, 13:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 9
Всего: 133
Цитата(wofs @  13.8.2008,  22:36 Найти цитируемый пост)
проблема  в том, что не известно количество строк в DBGrid
Количество строк, как-раз, известно 
Код
DBGrid.FieldCount


Но правильнее, конечно, подсчитать запросом. Хотя никто не запрещает извращаться с циклами  smile 



--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
Teleport
Дата 14.8.2008, 13:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 557
Регистрация: 5.7.2008
Где: Прибалтика

Репутация: 1
Всего: 6
2 Poseidon эм... DBGrid.FieldCount - это, вроде, было количество полей, а не строк.  smile 

Это сообщение отредактировал(а) Teleport - 14.8.2008, 13:32


--------------------
user posted image
user posted image 
PM MAIL   Вверх
Poseidon
Дата 14.8.2008, 15:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 9
Всего: 133
Цитата(Teleport @  14.8.2008,  13:31 Найти цитируемый пост)
DBGrid.FieldCount - это, вроде, было количество полей, а не строк.
Прошу прощения, заработался  smile 



--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
Данкинг
Дата 14.8.2008, 15:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130
Цитата(Poseidon @  14.8.2008,  14:20 Найти цитируемый пост)
Хотя никто не запрещает извращаться с циклами

Ну да, только скорость раз в -цать упадёт, а так ничего страшного в остальном. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
wofs
Дата 14.8.2008, 23:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 82
Регистрация: 1.5.2007

Репутация: нет
Всего: нет
спасибо, пошел пробовать smile самое главное, что идея ясна smile бум разбираться.
PM MAIL   Вверх
wofs
Дата 18.8.2008, 10:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 82
Регистрация: 1.5.2007

Репутация: нет
Всего: нет
всем спасибо, нужный толчек получен, тема закрыта smile
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0869 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.