• Registered: 2014-11-13
  • Posts: 325

Topic: Итоговая сумма по гриду

Доброго дня всем форумчанам!

Подскажите плз, как в нашей замечательной программе вывести средствами скрипта итоговую сумму по числовому столбцу из грида и поместить в поле под гридом или в лейбл?
Мыслю категорями Excel'a, вот примерно сделать подсчет итогов как там? Можно даже из 2-х разных гридов, и т.п.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Итоговая сумма по гриду

Сделал для вас пример, как с помощью скрипта подсчитать итоговую сумму в гриде и поместить результат в подвал.

Post's attachments

Attachment icon Calculate footer2.zip 6 kb, 606 downloads since 2014-12-20 

Dmitry.
  • Registered: 2014-11-13
  • Posts: 325

Re: Итоговая сумма по гриду

Спасибо!!!

  • From: Сибирский Федеральный округ
  • Registered: 2014-06-07
  • Posts: 62

Re: Итоговая сумма по гриду

Распишите что к чему в этом скрипте очень нужно мне... подробнее по процедурам...?? плиз!..


Сначала нужно задать Событие OnChange для грида
Form1_Название грида_OnChange

потом написать скрипт в окне скрипта

procedure Form1_Button7_OnClick (Sender: string; var Cancel: boolean);
begin

end;

procedure Form1_Название грида_OnChange (Sender: string);
var
   i,c, q: integer;
begin
     q := 0;
     c := Form1.Название грида.RowCount - 1;
     for i := 0 to c do
         if ValidInt(Form1.Название грида.Cells[3, i]) then q := q + StrToInt(Form1.Название грида.Cells[3, i]);



     Form1.Название грида.Columns[3].Footer.Caption := IntToStr(q); // result
end;


begin
Form1.Название грида.Options := Form1.Название грида.Options + goFooter;
end.

с уважением,
Андрей Александрович.
  • Registered: 2014-02-14
  • Posts: 10,294

Re: Итоговая сумма по гриду

Пожалуйста, конкретизируйте ваш вопрос, что именно вам необходимо реализовать?


здесь можете прочитать, как правильно создавать события:
http://myvisualdatabase.com/help_ru/scr … rview.html

Dmitry.
  • Registered: 2021-03-02
  • Posts: 2

Re: Итоговая сумма по гриду

Подскажите пожалуйста, а можно ли сделать подсчет суммы у трех столбцов?

  • k245
  • k245
  • Member
  • Offline
  • From: Deep
  • Registered: 2017-10-12
  • Posts: 1,554

Re: Итоговая сумма по гриду

Ребята, если очень постараться, то можно всё, но зачем изобретать велосипед?


В настройках колонки таблицы есть опция, позволяющая отображать итоговые суммы по любой колонке.В 99% случаев это полностью удовлетворяет пользователя. А уж если хотите нестандартный интерфейс или расчеты особенные, то не поленитесь и хотя бы документацию почитайте....


Прежде чем писать мудрёный скрипт, подумайте, может задача решается написанием одного SQL-запроса.

Визуальное программирование: блог и телеграм-канал.

k245's Website