Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.04.2010, 00:38   #1
Juliya_U
Пользователь
 
Регистрация: 07.04.2009
Сообщений: 20
По умолчанию Подсчет ячеек определенного цвета в StringGrid

В ходе работы программы некоторые ячейки stringgrid закрашиваю определенным цветом (допустим желтым) кликами мыши, с помощью события OnDrawCell. После этого (по нажатии кнопки) пытаюсь сделать обработку по ячейкам на цвет, чтоб подсчитать количество желтых ячеек для каждой строки. Делаю так:

for i:=1 to StringGrid1.ColCount-1 do
begin
for j := 1 to StringGrid1.RowCount-1 do
begin
if StringGrid1.Canvas.Brush.Color = clYellow then
begin
...
Но это не срабатывает( Прошу помощи.
Juliya_U вне форума Ответить с цитированием
Старый 22.04.2010, 08:45   #2
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

Код:
...if stringgrid1.Canvas.Pixels[stringgrid1.CellRect(i,j).Left+1,stringgrid1.CellRect(i,j).Top+1]=clYellow
then...
SERG1980 вне форума Ответить с цитированием
Старый 22.04.2010, 08:56   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Вообще-то плохая стратегия орентироваться на визуальность...
Помещай в закрашиваемые клетки какую-то информацию, и ищи ее, а не цвет.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.04.2010, 21:09   #4
Juliya_U
Пользователь
 
Регистрация: 07.04.2009
Сообщений: 20
По умолчанию

SERG1980, спасибо) так получилось))
Stilet, может и плохая, но пусть пока будет
Juliya_U вне форума Ответить с цитированием
Старый 22.04.2010, 22:39   #5
Juliya_U
Пользователь
 
Регистрация: 07.04.2009
Сообщений: 20
По умолчанию

Спасибо, получилось)
Juliya_U вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подсчет ячеек одновременно по цвету и значению bud-dy Microsoft Office Excel 7 17.03.2011 14:43
Складывание ячеек при достижение определенного значения Vladimir17M Microsoft Office Excel 6 08.02.2010 05:39
подсчет заполненных ячеек extremobile Microsoft Office Excel 2 28.05.2009 17:26
подсчет ячеек в зависимости от даты Алексей777 Microsoft Office Excel 4 20.02.2009 13:48