Аватар для Honor
10 / 9 / 1
Регистрация: 26.08.2009
Сообщений: 68

Удаление повторов и суммирование

11.12.2015, 18:32. Показов 1290. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Есть вот такой StringGrid нужно просуммировать столбец Зарплата оставив остальные как они есть в первой строке (т.е фамилия и разряд)



Логично взять первую запись и используя цикл сравнить с остальными и найди просуммировать и удалить лишнее но загвоздка в том что либо удаляется через один либо никак, помогите пожалуйста!

Добавлено через 26 минут
Код который удаляет и суммирует через один почему то
Delphi
1
2
3
4
5
6
7
for i:=1 to StringGrid3.RowCount do begin
if StringGrid3.Cells[0,i]=StringGrid.Cells[0,i+1]
        then begin
                  ЫtringGrid3.Cells[2,i]:=IntToStr(strToint(StringGrid3.Cells[2,i])+strToint(StringGrid.Cells[2,i]));
                  DeleteRow(StringGrid3, i+1);
                  end;
                  end;
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
11.12.2015, 18:32
Ответы с готовыми решениями:

Удаление повторов в List-е
Делаю по примеру в http://www.delphibasics.ru/TList.php Получаю данные (данных много) Номер / Транспорт / Тип транспорта но я...

Суммирование значений строк, одинаковых по 3-м признакам. Удаление повторов
Добрый день, есть задача: Имеется таблица (более 3000 строк): номер(186 позиций); код; статус; кол-во 1.необходимо-просуммировать...

Сцепка текста в ячейках, если совпадают значения в столбце А, удаление повторов имен, удаление лишних строк
Добрый день, подскажите, как решить задачу: Есть список организаций с контактами. Одна организация может быть представлена разным...

4
 Аватар для krapotkin
6851 / 4677 / 1465
Регистрация: 14.04.2014
Сообщений: 20,674
Записей в блоге: 21
11.12.2015, 20:42
Лучший ответ Сообщение было отмечено Honor как решение

Решение

надо суммировать не в стринггрид, а в источнике данных
для этого придуманы SQL запросы
1
 Аватар для Honor
10 / 9 / 1
Регистрация: 26.08.2009
Сообщений: 68
11.12.2015, 21:38  [ТС]
Цитата Сообщение от krapotkin Посмотреть сообщение
надо суммировать не в стринггрид, а в источнике данных
для этого придуманы SQL запросы
Я в курсе, но там и так запрос очень замороченный не получается в нем, если поможете будут признателе
SQL
1
2
3
SELECT zapic.fiomastera,mastera.Razr9d,praic.Stoimost*((mastera.Razr9d*2)/10) AS Зарплата
FROM "zapic","praic","mastera" 
WHERE zapic.yclygi=praic.id_ycl AND zapic.fiomastera=mastera.Fio_Mastera
0
 Аватар для krapotkin
6851 / 4677 / 1465
Регистрация: 14.04.2014
Сообщений: 20,674
Записей в блоге: 21
11.12.2015, 22:10
почему ключ - имя мастера?
должен быть нормальный ID в каждой таблице
примерно так оно должно быть:
SQL
1
2
3
4
5
6
SELECT w.FIO, SUM(p.price * w.rate * 0.2)
FROM 
orders ord
LEFT JOIN workers w ON(ord.worker_id=w.id)
LEFT JOIN price_table p ON(p.ID=ord.price_id)
GROUP BY w.FIO, w.ID
1
 Аватар для Honor
10 / 9 / 1
Регистрация: 26.08.2009
Сообщений: 68
11.12.2015, 23:58  [ТС]
Цитата Сообщение от krapotkin Посмотреть сообщение
почему ключ - имя мастера?
должен быть нормальный ID в каждой таблице
примерно так оно должно быть:
id есть но они в таблицах разные
В процессе переписывания примера под мои таблицы , не совсем понял что pза orders таблица?
SQL
1
2
3
4
5
SELECT  zapic.fiomastera, SUM(praic.Stoimost * mastera.Razr9d * 0.2)
FROM orders ord
LEFT JOIN zapic z ON(ord.worker_id=z.id)
LEFT JOIN price p ON(p.id_mast=ord.price.id_kl)
GROUP BY z.fiomastera, z.id_kl
Добавлено через 1 час 32 минуты
Сделал
SQL
1
2
3
SELECT zapic.fiomastera,razr9d,SUM(praic.Stoimost * mastera.Razr9d * 0.2)
FROM zapic INNER JOIN praic ON (zapic.yclygi=praic.id_ycl) INNER JOIN mastera ON (zapic.fiomastera=mastera.Fio_Mastera)
GROUP BY zapic.fiomastera,razr9d
Цитата Сообщение от krapotkin Посмотреть сообщение
надо суммировать не в стринггрид, а в источнике данных
для этого придуманы SQL запросы
Огромное спасибо за наводку
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
11.12.2015, 23:58
Помогаю со студенческими работами здесь

Удаление повторов
Здравствуйте форумчане! На прошлой неделе обнаружил ошибку в своей системе сбора данных, проведенную 20.03.2013. Из-за неё вводимые...

Удаление повторов
Хочу написать сразу: Встроенные функции Python использовать нельзя! С def_main и main ! Не в одну-две строчки ! =_= Дан массив a...

Удаление повторов из числа
Введите число и убирите ближние повторы. Ввели 23444552 получили 23452

Удаление повторов в DataTable
Здравствуйте! Имею таблицу в 2 столбца. Хочу удалить строки, в которых имеются одинаковые значения в первом столбце (у меня он...

Удаление повторов во внутреннем массиве
В массиве String mydata = { {"wolf","dog","goat","dog" }, {"rabbit","fox","wolf","chickens", "fox"}, {"cock", "rat"}, ...


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

Новые блоги и статьи
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определенном условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru