Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

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

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.10.2010, 10:51   #1
Sanprof
Форумчанин
 
Аватар для Sanprof
 
Регистрация: 28.01.2008
Сообщений: 267
По умолчанию И опять FreeReport

Здравствуйте, вот к примеру есть датасет с такими данными

|fnm1|fnm2|fnm3|fnm4|fnm5|fnm6|fnm7 |fnm8|fnm9|fnm10|fnm11|fnm12|
|1,01 |2,0 |3,3 |1,5 |4,6 |1,04|1,0 |3,0 |2,1 |1,09 |1,6 | 1,5 |


(строка с данными здесь только одна и по другому быть не может).
В отчете таблица к примеру выглядит так и данные в ней отображаются без проблем

---------------------------------------------------------
| [fnm1] | [fnm2] | [fnm3] | [fnm4] | [fnm5] | [fnm6] |
------------------------------------------------
| [fnm7] | [fnm8] | [fnm9] | [fnm10] | [fnm11] | [fnm12] |
---------------------------------------------------------


мне нужно всего лишь посчитать сумму значений в соответствующих столбцах и вывести в Memo поле, для этой таблицы к примеру
Sum(fnm1 и fnm7)
Sum(fnm2 и fnm8)
Sum(fnm3 и fnm9)
и т.д.
(подчеркиваю, сумму в столбцах fnm1, fnm2, fnm3 и прочих считать не нужно, там всего лишь одно значение).
Не забываем говорить спасибо за помощь - это ведь так приятно

Последний раз редактировалось Sanprof; 13.10.2010 в 11:04.
Sanprof вне форума Ответить с цитированием
Старый 13.10.2010, 13:21   #2
grafgrial
Просто хороший
Форумчанин
 
Аватар для grafgrial
 
Регистрация: 26.03.2010
Сообщений: 562
По умолчанию

у в принципе ты и написал
выбираешь memo и пишешь в него(если все в один)
[Sum([[adotable1."fnm1"]*[adotable1."fnm7"]])]
[Sum([[adotable1."fnm2"]*[adotable1."fnm8"]])]
[Sum([[adotable1."fnm3"]*[adotable1."fnm9"]])]
правда я не вкурсе ты через adotable подрублен? если не прет то может быть убрать лишнии квадр. скобки перед адотабле и сзади
Помог, нажми весы слева

Последний раз редактировалось grafgrial; 13.10.2010 в 13:54.
grafgrial вне форума Ответить с цитированием
Старый 13.10.2010, 15:40   #3
Sanprof
Форумчанин
 
Аватар для Sanprof
 
Регистрация: 28.01.2008
Сообщений: 267
По умолчанию

Работаю через АДО но так все равно не получается
Не забываем говорить спасибо за помощь - это ведь так приятно
Sanprof вне форума Ответить с цитированием
Старый 13.10.2010, 20:35   #4
grafgrial
Просто хороший
Форумчанин
 
Аватар для grafgrial
 
Регистрация: 26.03.2010
Сообщений: 562
По умолчанию

Честно говоря можно через SQL, но я с ним не работал.
Если в таблице у тебя не так много нужно суммировать то:
Код:
procedure TForm1.frReport1GetValue(const ParName: String;
  var ParValue: Variant);
begin
if ParName = 'fnm1andfnm7' then ParValue :=пишешь ячейку(fnm1)+пишешь ячейку(fnm7);
end;
а потом в мемо в отчете пишешь
Код:
[fnm1andfnm7]
если все правильно с ячейками напишешь то работать будет (вариант проверенный)
Помог, нажми весы слева
grafgrial вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
FREEreport и запрос grafgrial Общие вопросы Delphi 0 11.10.2010 14:55
freereport и dbgrid grafgrial Общие вопросы Delphi 0 09.10.2010 15:39
не могу разобраться с FreeReport Sanprof Общие вопросы Delphi 3 09.10.2010 00:34
вопрос по отчетам (FreeReport) Tanuska___:) БД в Delphi 6 26.09.2008 17:53