![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Прошу помощи.
Такая проблема ,есть таблица в ней данные. В DBGridEh сделал цветную раскраску строк по определённым значениям (эти значения находятся строго в одной колонке , одной таблице). Вопрос собственно , в подсчёте разных цветов строк. К примеру красных 5 зелёных 9 Не знаю как реализовать . Спасибо |
#2
|
||||
|
||||
![]() Так будет неправильно. Грид раскрашивает только отображаемую часть данных поэтому считать придется по тем же правилам, что и при раскраске.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
Этот пользователь сказал Спасибо Страдалецъ за это полезное сообщение: | ||
starcon (28.11.2015)
|
#3
|
|||
|
|||
![]() Код:
procedure TForm1.DBGrideh1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumneh; State: TGridDrawState); begin if Column.Field.Dataset.FieldByName('Sort').AsString = 'Киприч' then if (gdFocused in State) then DBGrideh1.Canvas.Brush.Color := clSkyBlue else DBGrideh1.Canvas.Brush.Color := clGreen; if Column.Field.Dataset.FieldByName('Sort').AsString = 'Шпалы' then if (gdFocused in State) then DBGrideh1.Canvas.Brush.Color := clSkyBlue else DBGrideh1.Canvas.Brush.Color := clAqua; if Column.Field.Dataset.FieldByName('Sort').AsString = '' then if (gdFocused in State) then DBGrideh1.Canvas.Brush.Color := clSkyBlue else DBGrideh1.Canvas.Brush.Color := clRed; DBGrideh1.DefaultDrawColumnCell(Rect, DataCol, Column, State) end; Что нужно добавить? Последний раз редактировалось starcon, 28.11.2015 в 13:01. |
#4
|
||||
|
||||
![]() Цитата:
Код:
... with AdoQuery1 do begin Close; SQL.Text:= 'SELECT COUNT(*) FROM имя_таблицы WHERE Sort=''Киприч'''; Open; Label1.Caption:= 'Всего Кипричей: ' + Fields[0].AsString; end; ... Я не понял Вашего вопроса, но всё же Вам на него отвечу! |
Этот пользователь сказал Спасибо Alegun за это полезное сообщение: | ||
starcon (21.03.2016)
|
#5
|
|||
|
|||
![]() От балда.
Как я не догадался . Благодарность! |