powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / EhLib
12 сообщений из 12, страница 1 из 1
EhLib
    #32108377
Камыш
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вечер добрый господа программеры.
Начал использовать компоненты EhLib v 2.6.Масса положительных эмоций,дай Бог Димону долгих и счастливых лет жизни.
Помогите,не получается в DBGridEh сделать счет по столбцу(сколько элементов в столбце,не строк).В свойстве Footers
есть только функции fvtCount,..Avg,FieldValue,Non,StaticText,Sum.
Что делать?
...
Рейтинг: 0 / 0
EhLib
    #32108564
Фотография tygra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А что такое сколько элементов в столбце,не строк ?
...
Рейтинг: 0 / 0
EhLib
    #32109045
Камыш
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ну допустим в таблице есть 70 строк,из них заполнены только 17,остальные Null.Вот число 17 мне и требуется получить.А как это сделать?
...
Рейтинг: 0 / 0
EhLib
    #32109151
pkarklin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я бы сделал так.

Пусть имеем в датасете поле Field1, в котором только 17 из 70 значений не NULL. Создаем вычисляемое поле Field2, и в обработчике OnCalcFields пишем:
with DataSet do
Код: plaintext
1.
2.
3.
if FieldByName('Field1').IsNull then
  FieldByName('Field2').AsInteger :=  0 
else
  FieldByName('Field2').AsInteger :=  1 ;

И с помощью Sum считаем сумму по полю Field2. Его и показываем в футоре DBGridа.
...
Рейтинг: 0 / 0
EhLib
    #32110138
balbes
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
HI
если правильно понял вопрос....
Код: plaintext
1.
2.
3.
4.
Query.SQL.Clear;
Query.SQL.Add('SELECT Count(Field) FROM Table WHERE Field is not null');
Query.Open;
Label.Caption := Query.Fields[ 0 ].AsString;
Query.Close;

не фантан конечно но работать должно....
А что ты так тему назвал??? (если речь идет о совсемь ином????)....
или ты хотел это реализовать ч/з св-ва DBGridEh ???, тогда извини с такими вещами не знаком...
...
Рейтинг: 0 / 0
EhLib
    #32110511
Камыш
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
To pkarklin:

Суть решения понятна,а вот как создать вычисляемое поле?
Вернее я его создал.Но почему-то значения дублируются с исходной колонки(Field1).Обработчик DataSet OnCalcField почему-то не реагирует.Что делать?
...
Рейтинг: 0 / 0
EhLib
    #32110513
Камыш
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
People.Please.Help me...
...
Рейтинг: 0 / 0
EhLib
    #32110526
Камыш
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Calculation поле сделать не получится,используется stored proc.
...
Рейтинг: 0 / 0
EhLib
    #32110552
LexusR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если контролируется один столбец и не получается сделать вычисляемое поле
можно ввести в возвращаемый recordset столбец счетик
типа
Код: plaintext
1.
2.
3.
4.
5.
6.
select Column1, 
         Column2, 
         ControlColumn3,
         Column4,
         case when ControlColumn3 is null then  0  else  1  end as NumNotNull
from .....

и потом в Footer ControlColumn3 выводить сумму по этой колонке (NumNotNull)
...
Рейтинг: 0 / 0
EhLib
    #32110568
pkarklin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что значит, вычисляемое поле не работает. А свойство AutoCalcFields у тебя True, я надеюсь.
...
Рейтинг: 0 / 0
EhLib
    #32111802
Камыш
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
AutoCalcFields в True.Не получается создать поле.Описываю пошагово:Кликаю на DataSet,для создания поля.Возникает ошибка ODBS,что требуется в процедуру загрузить параметр.Что делать?
...
Рейтинг: 0 / 0
EhLib
    #32111804
Камыш
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Извините.Разобрался.Всем спасибо.Персонально pkarklin.
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / EhLib
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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