Главная страница
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.013 c
1-23624
Администартор
2002-06-25 17:37
2002.07.08
Окна - поиск


14-23757
MJH
2002-06-02 13:26
2002.07.08
Кто здесь с Владивостока, кроме меня и SPeller а ??


7-23802
MetalFan666
2002-04-12 08:55
2002.07.08
Работа с Word ом из Delphi


4-23842
chernoruk
2002-05-01 08:08
2002.07.08
Почему GetHostByName( localost )=127.0.0.1 ВСЕГДА?


7-23803
ATLANTIDO
2002-04-15 20:40
2002.07.08
Что такое