Закраска ячеек разными цветами

@Dmitry922611 · Регистрация: 25.05.2019

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

Нужно сделать в StringGrid что бы ячейка по клику красилась одним цветом в нее занасилось какое то значение а от этого значения потом менялся цвет клетки
Например я делаю базу как у кинотеатра то бишь нажимаем на любую клетку пишет что это место якобы забронировано и горит красным а потом жмем эту же клетку и по ЛКМ вводится значение что оно куплено и закрашивается в красный

@volvo · 19.03.2020, 15:23

В самом низу страницы есть "Похожие темы", в которых уже до неприличия разжевывалось, как делается закраска ячеек грида. Что именно не получается?

@Dmitry922611 · 19.03.2020, 15:42 **[ТС]**

Я написал код
у меня по клику ЛКМ красится ячейка сейчас мне надо сделать что бы эта же ячейка красилась в другой цвет по ПКМ

@volvo · 19.03.2020, 16:07

Я не телепат, чтобы знать, как это реализовано сейчас. Нет кода - нет разговора.

@Dmitry922611 · 19.03.2020, 16:22 **[ТС]**

вот кусок

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
      int ARow, TRect &Rect, TGridDrawState State)
{
  TStringGrid *grid = static_cast<TStringGrid*>(Sender);
 
    if(grid->Cells[ACol][ARow].ToIntDef(0) == 0)
        grid->Canvas->Brush->Color = clGreen;
    else
        grid->Canvas->Brush->Color = clRed;
    grid->Canvas->FillRect(Rect);
    grid->Canvas->Font->Color = clBlack;
    grid->Canvas->TextOut(Rect.Left + 2,Rect.Top + 2, grid->Cells[ACol][ARow]);
}
 
 
 
 
//---------------------------------------------------------------------------
void __fastcall TForm1::StringGrid1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
int C,R;
StringGrid1->MouseToCell(X, Y, C, R);
StringGrid1->Cells[C][R]=(Button ==mbLeft ? "1" : "Куплено"); // 1 типо бронь
 
}

@volvo · 19.03.2020, 17:13

C++
1
2
3
4
5
6
    if(grid->Cells[ACol][ARow] == "Куплено")
        grid->Canvas->Brush->Color = clYellow;
    else if(grid->Cells[ACol][ARow].ToIntDef(0) == 1)
        grid->Canvas->Brush->Color = clRed;
    else // Не "Куплено" и не "1"
        grid->Canvas->Brush->Color = clGreen;

@Dmitry922611 · 19.03.2020, 17:20 **[ТС]**

Спасибо большое )))) помогло

Новые блоги и статьи Все статьи Все блоги /
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .

@Dmitry922611 0 / 0 / 0 Регистрация: 25.05.2019 Сообщений: 15

	Builder 6 Закраска ячеек разными цветами 19.03.2020, 15:02. Показов 1508. Ответов 6 Метки нет (Все метки) Нужно сделать в StringGrid что бы ячейка по клику красилась одним цветом в нее занасилось какое то значение а от этого значения потом менялся цвет клетки Например я делаю базу как у кинотеатра то бишь нажимаем на любую клетку пишет что это место якобы забронировано и горит красным а потом жмем эту же клетку и по ЛКМ вводится значение что оно куплено и закрашивается в красный 0

@volvo Супер-модератор 33376 / 21500 / 8236 Регистрация: 22.10.2011 Сообщений: 36,895 Записей в блоге: 11
	19.03.2020, 15:23
	В самом низу страницы есть "Похожие темы", в которых уже до неприличия разжевывалось, как делается закраска ячеек грида. Что именно не получается? 0

@Dmitry922611 0 / 0 / 0 Регистрация: 25.05.2019 Сообщений: 15
	19.03.2020, 15:42 [ТС]
	Я написал код у меня по клику ЛКМ красится ячейка сейчас мне надо сделать что бы эта же ячейка красилась в другой цвет по ПКМ 0

@volvo Супер-модератор 33376 / 21500 / 8236 Регистрация: 22.10.2011 Сообщений: 36,895 Записей в блоге: 11
	19.03.2020, 16:07
	Я не телепат, чтобы знать, как это реализовано `сейчас`. Нет кода - нет разговора. 0

@Dmitry922611 0 / 0 / 0 Регистрация: 25.05.2019 Сообщений: 15
	19.03.2020, 17:20 [ТС]
	Спасибо большое )))) помогло 0

Закраска ячеек разными цветами

Решение