VPF::научите пользоватся footer и sumlist (DBGridEh)

Коця

Дата 18.2.2005, 22:12 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 13.2.2005

Репутация: нет
Всего: нет

В DBGridEh отображаются данные таблицы Table1. Мне нада чтоб в footer под полем "Имя" отображались количество строк, под полем "сума" - общая сума по полю, под полем "долг" - количество строк, значение которых <> 0

Помогите начинающему дельфисту smile

MacTep

Дата 18.2.2005, 23:26 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1292
Регистрация: 4.8.2003
Где: г. Самара

Репутация: нет
Всего: 4

Так!
1) строки поститать можешь так: Table1.RecordCount;
2) сумму придется считать вручную

Код


sum:=0;
Table1.First;
while not Table1.Eof do
  begin
    sum:=sum+Table1.FieldByName('abc').AsInteger;
    Table1.Next;
  end;

Код


count:=0;
Table1.First;
while not Table1.Eof do
  begin
    if Table1.FieldByName('dolg').AsInteger<>0 then inc(count);
    Table1.Next;
  end;

Потом просот вставишь где надо это самое значение Count.

Так пойдет? smile

--------------------

(A)bort, (R)etry, (I)gnore = Haфиг, Heфиг, Пoфиг ... :)

MacTep

Дата 18.2.2005, 23:46 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1292
Регистрация: 4.8.2003
Где: г. Самара

Репутация: нет
Всего: 4

Так делается помещение информации в footer:

Код


DBGridEh1.Columns.Items[2].Footer.ValueType:=fvtStaticText;
DBGridEh1.Columns.Items[2].Footer.Value:='MacTep';

Теперь нормально?

--------------------

(A)bort, (R)etry, (I)gnore = Haфиг, Heфиг, Пoфиг ... :)

Коця

Дата 18.2.2005, 23:46 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 13.2.2005

Репутация: нет
Всего: нет

Цитата(MacTep @ 18.2.2005, 23:26)

Так пойдет? smile

Немного не подойдет. Потому, что в таблице происходит фильтрование, и мне нада подсчет с учетем фильтрования.
В свойствах DBGridEh есть параметр SumList, тут нада использовать именно его, ...только как?

Это сообщение отредактировал(а) Коця - 19.2.2005, 00:14

Vit

Дата 20.2.2005, 08:02 (ссылка)

(нет голосов)

Загрузка ...

Vitaly Nevzorov

Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 14
Всего: 207

Что-то мне кажется, что хотите от грида слишком многого... ИМХО двигать в сторону репортинговых систем надо... Если я правильно понял условие задачи

--------------------

With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru

Коця

Дата 20.2.2005, 13:56 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 13.2.2005

Репутация: нет
Всего: нет

Слишком много я не хочу, в примере Demo1 к библиотеке EhLib, на закладочке Master/Detale, очень красиво показано что я хочу. Там грид со строкой, в которой отображается автосумма, счетчик записей и т.п., вот тока как оно сделано понять не удалось, посмотрите кто-нить, и всем разкажите...

Коця

Дата 20.2.2005, 22:46 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 13.2.2005

Репутация: нет
Всего: нет

Что-то вроде получилось, количество строк в гриде показует, но сумму никак...

Это сообщение отредактировал(а) Коця - 20.2.2005, 22:55

Коця

Дата 20.2.2005, 23:17 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 13.2.2005

Репутация: нет
Всего: нет

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

Bolleycox

Дата 3.9.2022, 05:25 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 10
Регистрация: 2.9.2022

Репутация: нет
Всего: нет