Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.91/11: Рейтинг темы: голосов - 11, средняя оценка - 4.91
3 / 3 / 0
Регистрация: 21.05.2016
Сообщений: 304

Фильтровать данные, а потом суммировать

30.06.2016, 15:31. Показов 2330. Ответов 52
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
хочу написать такой запрос чтобы отфильтровать данные, например по имени а потом суммировать, и вывести сумму edit
компонент использую ADOQuery
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
30.06.2016, 15:31
Ответы с готовыми решениями:

Как фильтровать данные массива
Добрый день. подскажите пожалуйста, как реализовать следующую задачу: после того, как запрос нашел разницу дат (разница в днях), если...

ResultSet... Можно ли фильтровать данные?
Можно ли фильтровать данные у уже полученного из базы данных ResultSet? Такой случай, что крайне нежелательно делать множество...

Нужно ли фильтровать данные вводимые пользователем?
Нужно ли фильтровать данные вводимые пользователем в поля? Может ли юзер заюзать какой либо код отправя его в запросе на сервер , если не...

52
5978 / 4553 / 1095
Регистрация: 29.08.2013
Сообщений: 28,180
Записей в блоге: 3
30.06.2016, 16:04
Цитата Сообщение от kobakoba7 Посмотреть сообщение
хочу написать
вперед

SQL
1
2
3
4
SELECT 1, 2, SUM(3)
FROM t
WHERE 1='ляляля'
GROUP BY 1, 2
0
3 / 3 / 0
Регистрация: 21.05.2016
Сообщений: 304
30.06.2016, 16:11  [ТС]
а можно поконкретнее под кнопку если дадите код буду благодарен
0
5978 / 4553 / 1095
Регистрация: 29.08.2013
Сообщений: 28,180
Записей в блоге: 3
30.06.2016, 16:14
расставите правильно запятые и точки в своем предложении - помогу.
0
3 / 3 / 0
Регистрация: 21.05.2016
Сообщений: 304
30.06.2016, 16:20  [ТС]
причем тут запятые главное что поняли что я хочу
0
 Аватар для krapotkin
6849 / 4676 / 1464
Регистрация: 14.04.2014
Сообщений: 20,671
Записей в блоге: 21
30.06.2016, 21:08
Цитата Сообщение от kobakoba7 Посмотреть сообщение
чтобы отфильтровать данные, например по имени
тут же явно описано, какие данные и по какому имени отфильтровать надо
qwertehok явно тупит

вот хорошая ссылка для таких конкретных вопросов
0
3 / 3 / 0
Регистрация: 21.05.2016
Сообщений: 304
30.06.2016, 23:18  [ТС]
heelp
0
 Аватар для Пытливый
3763 / 2267 / 705
Регистрация: 29.05.2013
Сообщений: 9,622
01.07.2016, 10:33
Delphi
1
2
3
AdoQuery1.SQL.Text := 'select Имя,Sum(Потом) from Данные where Имя=:Фильтр';
AdoQuery1.Parameters.ParamValues['Фильтр'] := 'Вася';
AdoQuery1.Open;
1
3 / 3 / 0
Регистрация: 21.05.2016
Сообщений: 304
01.07.2016, 12:46  [ТС]
Пытливый, а где вывести сумированное значение.
Цитата Сообщение от Пытливый Посмотреть сообщение
'select Имя,Sum(Потом) from Данные where Имя=:Фильтр';
- а этот запрос можна поконкретнее. select Имя - что за имя, Sum(Потом) - что за потом. help
0
3 / 3 / 0
Регистрация: 21.05.2016
Сообщений: 304
01.07.2016, 13:13  [ТС]
Пытливый, вот твой код так переделал но не работает
Миниатюры
Фильтровать данные, а потом суммировать  
0
 Аватар для Пытливый
3763 / 2267 / 705
Регистрация: 29.05.2013
Сообщений: 9,622
01.07.2016, 13:26
А так?
SQL
1
SELECT koba,SUM(gavaluteba_fsoni) FROM baza1 WHERE koba=:monawile GROUP BY koba
0
3 / 3 / 0
Регистрация: 21.05.2016
Сообщений: 304
01.07.2016, 13:33  [ТС]
не работает вот такую ошибку выдает
Миниатюры
Фильтровать данные, а потом суммировать  
0
 Аватар для Пытливый
3763 / 2267 / 705
Регистрация: 29.05.2013
Сообщений: 9,622
01.07.2016, 13:38
А gavaluteba_fsoni - это число?
0
3 / 3 / 0
Регистрация: 21.05.2016
Сообщений: 304
01.07.2016, 13:43  [ТС]
да канэшна этот столбик должен суммироватса по фильтру
0
4 / 4 / 0
Регистрация: 19.07.2015
Сообщений: 96
01.07.2016, 18:59
Так:
SQL
1
SELECT koba,SUM(gavaluteba_fsoni) AS SUMMA FROM baza1 WHERE koba=:monawile GROUP BY koba
0
3 / 3 / 0
Регистрация: 21.05.2016
Сообщений: 304
01.07.2016, 22:38  [ТС]
Delphi
1
2
3
4
5
6
7
procedure TForm1.Button15Click(Sender: TObject);
begin
AdoQuery1.SQL.Text := 'SELECT koba,SUM(gavaluteba_fsoni) AS SUMMA FROM baza1 WHERE koba=:monawile GROUP BY koba';
AdoQuery1.Parameters.ParamValues['monawile'] := 'koba';
AdoQuery1.Open;
edit44.Text := ADOQuery1.Fields[0].AsString;
end;
вот так я переделал код но все равно не работает, Подскажите пожалуйста, в чем проблема
0
4 / 4 / 0
Регистрация: 19.07.2015
Сообщений: 96
02.07.2016, 00:33
Цитата Сообщение от kobakoba7 Посмотреть сообщение
edit44.Text := ADOQuery1.Fields[0].AsString;
Delphi
1
edit44.Text := FloatToStr( ADOQuery1.FieldByName('SUMMA').AsFloat );
0
пофигист широкого профиля
4770 / 3205 / 862
Регистрация: 15.07.2013
Сообщений: 18,613
02.07.2016, 00:40
Цитата Сообщение от kobakoba7 Посмотреть сообщение
вот так я переделал код но все равно не работает,
Что значит не работает? Кирпичи не носит?
0
4 / 4 / 0
Регистрация: 19.07.2015
Сообщений: 96
02.07.2016, 00:54
Вот это должно работать.

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
procedure TForm15.Button1Click(Sender: TObject);
var
Prm : string;
begin
 
  Prm := 'koba'; // Если тут имя, то можно присваивать любое другое
  try
    AdoQuery1.Close;
    AdoQuery1.SQL.Clear;
    AdoQuery1.SQL.Add ( 'SELECT koba, SUM(gavaluteba_fsoni) AS SUMMA FROM baza1 WHERE koba="' + prm + '" GROUP BY koba' );
    AdoQuery1.Open;
    edit44.Text := FloatToStr( ADOQuery1.FieldByName('SUMMA').AsFloat );
  except on E: Exception do
    ShowMessage(E.message);
  end;
 
end;
Добавлено через 6 минут
Тут ошибся. Поправь
Delphi
1
procedure TForm15.Button1Click(Sender: TObject);
на
Delphi
1
procedure TForm1.Button15Click(Sender: TObject);
0
3 / 3 / 0
Регистрация: 21.05.2016
Сообщений: 304
02.07.2016, 14:45  [ТС]
andevel, щас такую ошибку выдает
do etogo expected 2
Миниатюры
Фильтровать данные, а потом суммировать  
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
02.07.2016, 14:45
Помогаю со студенческими работами здесь

Фильтровать те данные, которые выбрал пользователь
У меня есть форма, которая посылает данные, проблема в одном в переменной str, там с помощью & данные идут только по порядку, но...

Как фильтровать данные с помощью BindingSource?
В БД надо организовать поиск. Я пишу например так: название_таблицыBindingSource.Filter = " = " + "'" +...

Как привязать и фильтровать данные в comboBox?
Доброго времени суток! Помогите справиться с следующей задачей: Делаю базу на Access и создаю к ней клиент на C#. Требуется связать...

По выбранному значению TreeList фильтровать данные в GridView
По выбранному значению TreeList фильтровать данные в GridView Добавлено через 2 часа 26 минут Никак не могу получить значение...

Каким образом можно фильтровать данные, которые используются в PivotTable?
каким образом можно фильтровать данные, которые используются в PivotTable. для примера - AutoFilter наложенный на данные, из которых...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru