DBGrid закрасить несколько ячеек

@t7102 · Регистрация: 15.08.2011

Студворк — интернет-сервис помощи студентам

Всех приветствую, столкнулся с такой вот задачей:
имеется на форме DBGrid, таблица ADOTable 1 с полями: Наименование, Стоимость, Количество дней, Дата начала, Статус( всего 3 статуса: Занято, Выполняется, Свободно, для каждого свой цвет), данные в DBGrid выводятся из перекрестного запроса ADOQuery1.
Задача, закрасить ячейки в таблице DBGrid, в которых есть определенный текст(статус)
Это я сделал, получилось закрасить 1 определенную ячейку, все ячейки где есть нужный мне текст, и всю строку, в которой встречается этот текст, НО
закрасить мне нужно не 1 ячейку, а несколько в одной строке (определенный диапазон ячеек), а именно
Заполнена только 1 ячейка в строке 1, например "Занято", эту ячейку нужно закрасить красным (этого добился, получилось закрасить все ячейки в таблице с выбранным параметром), далее известно что количество дней = , например, 3 , а значит нужно закрасить ещё 2 ячейки справа (в этих ячейках никаких данных не заполнено).
Проще говоря, суть проблемы в том, чтобы закрасить диапазон (несколько диапазонов) ячеек в строке таблицы DBGrid.
(Прикрепляю пример, как должно быть)

@Bit_Man · 30.03.2016, 03:54

В DBGridDrawColumnCell крути свои условия по столбцам и значениям, и крась через DBGrid->Canvas->Brush->Color

@t7102 · 30.03.2016, 04:47 **[ТС]**

Это я и делаю, но получается закрасить либо ячейки, соответствующие условию (а нужно еще несколько ячеек дополнительно), либо строку целиком.
Вот мой код

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
void __fastcall TForm1::DBGrid3DrawColumnCell(TObject *Sender, const TRect &Rect,
          int DataCol, TColumn *Column, TGridDrawState State)
{
 int i;
for(i=0; i<DBGrid3->DataSource->DataSet->FieldCount;++i)
    {     if(Column->Field->Text == "Занят") //Закрасятся все ячейки где записано Занят
 
    // if (DBGrid3->Columns->Items[i]->Field->AsString=="Занят") //Закрасится вся строка, где встречается Занят
        {
            ((TDBGrid*)Sender)->Canvas->Brush->Color = clRed;
        
                 break;
              }
    }
   ((TDBGrid*)Sender)->Canvas->FillRect(Rect);
    ((TDBGrid*)Sender)->DefaultDrawColumnCell(Rect, DataCol, Column, State);
}

Может кто пример подскажет?

@Почтальон · 30.03.2016, 07:59

Вы получайте индекс ячейки, в которой выполняется условие, далее "вручную" проходите по соседним справа и закрашивайте, причем нужно условие, чтобы не выйти за диапазон таблицы и не словить ошибку.

@t7102 · 30.03.2016, 08:26 **[ТС]**

Сообщение от Почтальон

Вы получайте индекс ячейки, в которой выполняется условие, далее "вручную" проходите по соседним справа и закрашивайте, причем нужно условие, чтобы не выйти за диапазон таблицы и не словить ошибку.

А как это реализовать?
Есть таблица ADOTable1, в которой есть поле "Количество дней" - это количество закрашиваемых ячеек,
и "Наименование" и "Дата".
В ADOQuery строится перекрестный запрос по таблице ADOTable1 с полями, которые видно на рисунке.

Как получить индекс ячейки? и как вручную закрасить остальные ячейки (количество проходов равно "Количество дней -1" )

Добавлено через 1 минуту
Может возможно сделать такую "шахматку" не в DBGrid?

@Почтальон · 30.03.2016, 09:53

Я еще не силен в области БД, но у вас же в параметрах процедуры передается Column. Вот тут по всей видимости и нужно обращаться к колонке. Sender, как я понял, имеет целую строку(набор колонок, т.е. полей)

@Bit_Man · 30.03.2016, 11:41

Сообщение от t7102

перекрестный запрос по таблице ADOTable1

Покажи запрос, может лучше его перекроить?

@t7102 · 30.03.2016, 13:34 **[ТС]**

Сообщение от Bit_Man

Покажи запрос, может лучше его перекроить?

Прикрепляю скрины данных основной таблицы ADOTable, и результат ADOQuery, а так же SQL код запроса,
в результирующей таблице ячейка с текстом "Занят" закрашена красным, другие ячейки тоже должны будут закрашены своими цветами, но с этим разберусь.
КОД ЗАПРОСА:

SQL
1
2
3
4
5
TRANSFORM MIN(Номер.Статус) AS [Min-Статус]
SELECT Номер.Номер, Номер.Мест, Номер.[Цена-день]
FROM Номер
GROUP BY Номер.Номер, Номер.Мест, Номер.[Цена-день]
PIVOT Номер.[Дата от];

@Bit_Man · 31.03.2016, 04:41

с PIVOT не работал, но запрос не верный. У тебя не выводятся период брони последнего номера.
И самого отбора по датам нет. Поэтому, если у тебя будет много таких записей то и столбцов будет много.
Предлагаю тебе переделать запрос и чтобы в каждом столбце был статус. Облегчишь себе жизнь.

@t7102 · 01.04.2016, 05:56 **[ТС]**

Сообщение от Bit_Man

с PIVOT не работал, но запрос не верный. У тебя не выводятся период брони последнего номера.
И самого отбора по датам нет. Поэтому, если у тебя будет много таких записей то и столбцов будет много.
Предлагаю тебе переделать запрос и чтобы в каждом столбце был статус. Облегчишь себе жизнь.

Период брони выводить нельзя, так как будет больше строк, а строк должно быть столько - сколько всего номеров, отбор по датам сделаю, не в нём суть. А столбцов и должно быть много, если, например, занятое время выберу 100 дней, то и столбцов в таблице запроса должно сформироваться 100, в итоге я принял такое решение, при создании записи, автоматически будут создаваться записи на следующие даты с таким же статусом, чтобы он потом был прописан в каждой клетке таблицы запроса, тогда получиться все что нужно закрашивать.
Как реализую, поделюсь результатом )

Добавлено через 11 минут
И ещё нужно будет предусмотреть, если меняю статус, например с "бронь", на "свободно", то статус во всех автоматически созданных записях статус тоже должен будет измениться, ну и ,соответственно, цвет ячейки в таблице запроса тоже измениться, в зависимости от статуса.

Добавлено через 3 минуты
Минусом такого метода с запросом будет то, что если на дату в определенном промежутке не заполнено никакого статуса, то эти столбцы не будут формироваться в таблице, а значит визуально, пользователь не увидит, что в тот день не один номер не имеет статуса (не занят или не забронирован, например), в связи с чем, могут быь ошибки с заполнением, не знаю как это решить.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@t7102 0 / 0 / 0 Регистрация: 15.08.2011 Сообщений: 14

	DBGrid закрасить несколько ячеек 29.03.2016, 19:31. Показов 2513. Ответов 9 Метки нет (Все метки) Всех приветствую, столкнулся с такой вот задачей: имеется на форме DBGrid, таблица ADOTable 1 с полями: Наименование, Стоимость, Количество дней, Дата начала, Статус( всего 3 статуса: Занято, Выполняется, Свободно, для каждого свой цвет), данные в DBGrid выводятся из перекрестного запроса ADOQuery1. Задача, закрасить ячейки в таблице DBGrid, в которых есть определенный текст(статус) Это я сделал, получилось закрасить 1 определенную ячейку, все ячейки где есть нужный мне текст, и всю строку, в которой встречается этот текст, НО закрасить мне нужно не 1 ячейку, а несколько в одной строке (определенный диапазон ячеек), а именно Заполнена только 1 ячейка в строке 1, например "Занято", эту ячейку нужно закрасить красным (этого добился, получилось закрасить все ячейки в таблице с выбранным параметром), далее известно что количество дней = , например, 3 , а значит нужно закрасить ещё 2 ячейки справа (в этих ячейках никаких данных не заполнено). Проще говоря, суть проблемы в том, чтобы закрасить диапазон (несколько диапазонов) ячеек в строке таблицы DBGrid. (Прикрепляю пример, как должно быть) Миниатюры 0

@Bit_Man 480 / 393 / 113 Регистрация: 24.04.2012 Сообщений: 1,632 Записей в блоге: 3
	30.03.2016, 03:54
	В DBGridDrawColumnCell крути свои условия по столбцам и значениям, и крась через DBGrid->Canvas->Brush->Color 0

@Почтальон управление сложностью 1693 / 1306 / 259 Регистрация: 22.03.2015 Сообщений: 7,545 Записей в блоге: 5
	30.03.2016, 07:59
	Вы получайте индекс ячейки, в которой выполняется условие, далее "вручную" проходите по соседним справа и закрашивайте, причем нужно условие, чтобы не выйти за диапазон таблицы и не словить ошибку. 0

@Почтальон управление сложностью 1693 / 1306 / 259 Регистрация: 22.03.2015 Сообщений: 7,545 Записей в блоге: 5
	30.03.2016, 09:53
	Я еще не силен в области БД, но у вас же в параметрах процедуры передается Column. Вот тут по всей видимости и нужно обращаться к колонке. Sender, как я понял, имеет целую строку(набор колонок, т.е. полей) 0

@Bit_Man 480 / 393 / 113 Регистрация: 24.04.2012 Сообщений: 1,632 Записей в блоге: 3
	31.03.2016, 04:41
	с PIVOT не работал, но запрос не верный. У тебя не выводятся период брони последнего номера. И самого отбора по датам нет. Поэтому, если у тебя будет много таких записей то и столбцов будет много. Предлагаю тебе переделать запрос и чтобы в каждом столбце был статус. Облегчишь себе жизнь. 0

Опции темы