Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 25.11.2015, 19:04   #1
AB96
Пользователь
 
Регистрация: 20.10.2015
Сообщений: 22
Репутация: 10
По умолчанию Сложить все элементы первого столбца в StringGrid

Здравствуйте! Подскажите, пожалуйста, как сложить все элементы ПЕРВОГО столбца в StringGrid? Заранее спасибо!
AB96 вне форума   Ответить с цитированием
Старый 25.11.2015, 19:19   #2
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 26,123
Репутация: 5675
По умолчанию

Код:
sum := 0;
for i:=0 to StringGrid1.RowCount-1 do
  sum := sum + StrToIntDef(StringGrid1.Cells[0,i],0);
Serge_Bliznykov на форуме   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
есть таблица (StringGrid) и надо сложить между собой три столбца (Delphi) supreme Помощь студентам 2 12.01.2014 22:40
Данные одного столбца сложить с данными другого столбца Aleksandr Microsoft Office Excel 3 17.12.2013 12:03
удалить все четные элементы, кроме первого такого. александр6642 Помощь студентам 1 30.10.2012 11:10
Вывести номер столбца в котором все элементы отрицательные. Jully19 Помощь студентам 7 22.06.2011 19:34
В прямоугольной матрице переставить столбцы так, чтобы сумма элементов столбца росла от первого столбца Aleo13 Помощь студентам 5 15.10.2008 18:34


17:32.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.