ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Footer - ламерский вопрос
5 сообщений из 5, страница 1 из 1
Footer - ламерский вопрос
    #32314340
Andrei_A
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Andrei_A
Участник
Есть футер с суммой по одному столбцу и по другому. Как в футере третьего столбца занести частное от деления одной суммы на другую
...
Рейтинг: 0 / 0
04.11.2003, 09:28
| Ответить | Цитировать | Написать  
Footer - ламерский вопрос
    #32314380
ova
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ova
Участник
Sum(поле1)/Sum(поле2). А в чем проблемы, может чего не допонял,
...
Рейтинг: 0 / 0
04.11.2003, 10:05
| Ответить | Цитировать | Написать  
Footer - ламерский вопрос
    #32314386
Andrei_A
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Andrei_A
Участник
Да в первой я с ним. Куда писать то то. Захожу в свойство столбца - футер. Для суммы просто пишу ValueType - fvtSum, оставляя незаполненным Value b FieldName (у футера). А это куда писать.
...
Рейтинг: 0 / 0
04.11.2003, 10:11
| Ответить | Цитировать | Написать  
Footer - ламерский вопрос
    #32315543
LexusR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LexusR
Участник
LexusR
в третей колонке делаешь Footer типа fvtStaticText

и на событие грида OnDrawFooterCell вычислять значение footer-a
третей колонки типа по значениям сум первых двух
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
procedure TForm1.DBGridEh1DrawFooterCell(Sender: TObject; DataCol,
  Row: Integer; Column: TColumnEh; Rect: TRect; State: TGridDrawState);
begin
  if not(ADODataSet1.State in [dsInsert,dsEdit]) then
    DBGridEh1.Columns[ 3 ].Footer.Value := FormatFloat('0.00',DBGridEh1.SumList.SumCollection.Items[ 0 ].SumValue/DBGridEh1.SumList.SumCollection.Items[ 1 ].SumValue);

end;
...
Рейтинг: 0 / 0
05.11.2003, 08:18
| Ответить | Цитировать | Написать  
Footer - ламерский вопрос
    #32316289
Andrei_A
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Andrei_A
Участник
При таком раскладе оно у меня все время мерцает - значит перерисовывает
...
Рейтинг: 0 / 0
05.11.2003, 15:40
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Footer - ламерский вопрос
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]