Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.08;
Скачать: CL | DM;

Вниз

DBGridEh DBSumList как с ними работать?   Найти похожие ветки 

 
PTE ©   (2002-06-13 14:26) [0]

Нужно отображать DBEditEh сумму в столбце DBGridEh. Как мне это сделать?


 
VAleksey ©   (2002-06-13 15:11) [1]

сделай колонку и для нее укажи по какому полю считать сумму и формат футера.


 
PTE ©   (2002-06-13 16:20) [2]

А как это сделать? подскажите пожалуйста. Я новичок, пытался найти по этому поводу инфу в инете ничего не нашел, что помогло бы мне разобраться


 
koks ©   (2002-06-13 17:32) [3]

Устанавливаешь свойства:

1. DBGridEh.FooterRowCount = 1;
2. DBGridEh.SumList.Active := true;

Если не использушь колонки TColumnsEh, то по-моему, этого достаточно...

А если используешь колонки, то дополнительно для той колонки, для которой нужно считать сумму устанавливаешь:

DBGridEh.Columns[i].Footer.FieldName := "<имя поля по которому считается сумма>"
DBGridEh/Columns[i].Footer.ValueType := fvtSum

и все...


 
PTE ©   (2002-06-13 18:21) [4]

Колонки я не использую, но только этого
1. DBGridEh.FooterRowCount = 1;
2. DBGridEh.SumList.Active := true;
оказалось не достаточно. Правильно ли я написал?
procedure TForm1.TabSheet3Show(Sender: TObject);
begin
DBGridEh1.Columns[3].Footer.FieldName := "summa";
DBGridEh1.Columns[3].Footer.ValueType := fvtSum ;
end;
Почему сумма отображается только тогда, когда я забиваю новые значения, а по тем что уже были забиты в базу сумма не подсчитывается, что можно сделать?


 
VAleksey ©   (2002-06-14 09:01) [5]

а статично нельзя ?


 
koks ©   (2002-06-14 09:49) [6]

1. Сделай колонки
2. Все свойства, которые я тебе перечислил устанавливаются в РЕДАКТОРЕ СВОЙСТВ, а не в рантайме.


 
Sergey13 ©   (2002-06-14 11:27) [7]

2koks © (14.06.02 09:49)
DBGridEh.SumList.Active := true; Как раз лучше делать в рантайме. У меня была фишка, когда при установке этого в дизайне отваливались процедуры от событий. Да-да не смейся. Типа была процедура на AfterScroll а потом ее, привязки, нет. Хотя проца, ессно, не стиралась. Это было на 1.56 кажется. Я списывался с автором, и он подтвердил что лучше это делать в рантайме. Хотя сейчас это может быть уже побороли, но я по привычке делаю по старому.


 
AuduA6   (2002-06-14 12:53) [8]

Кидаеш на форму DBSumList .
Указываеш ему DataSet.
Добавляеш SumCollection->Add new(Назовем ее, например Summa);
Summa->FieldName=поле из DataSet;
Summa->GroupOperation->goSum;
DBSumList->Events->DBSumList1SumListChanged;
Выводиш результат в Edit(Edit1.Text := FloatToStr(DBSumList1.SumCollection.Items[0](или Summa).SumValue)



Страницы: 1 вся ветка

Текущий архив: 2002.07.08;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.014 c
7-23809
VICTOR_
2002-04-11 15:45
2002.07.08
Помогите найти раздел на системном диске!!!


14-23736
SPeller
2002-06-05 11:28
2002.07.08
Английский


3-23481
Sniffer
2002-06-16 12:16
2002.07.08
Как узнать, существует ли Таблица?


3-23506
AAAPLE
2002-06-15 13:05
2002.07.08
Непонятные символы при добавлении записей в запросе


3-23477
Wassily
2002-06-16 10:19
2002.07.08
Как запретить вносить новые записи в таблицу через DBGrid ?