Раскраска строк StringGrid в зависимости от данных

@Shilka · Регистрация: 21.12.2013

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

Всем добрый день! Очень прошу помочь новичку разобраться со следующей задачей:

Необходимо закрасить строку StringGrid в зависимости от того, какие данные находятся в ячейке. Например, если Cells[2,5]='1', закрасить всю строку 5 в зелёный цвет, если Cells[2,9]='0', закрасить всю строку 9 в синий цвет, и т. д... Смотрела уже существующие темы на данном форуме о раскраске StringGrid, не смогла разобраться и подогнать под свою задачу

Заранее спасибо за помощь!

@FIL · 05.02.2014, 11:15

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

@Shilka · 05.02.2014, 11:26 **[ТС]**

FIL, А как правильно прописать условие на поиск нужных данных в таблице? Допустим, если поиск будет производиться только по второму столбцу, как написать что-то типа следующего?

Delphi

1
2
3

for i:=1 to 10 do 
if StringGrid1.Cells[1,i]='Кошка' then
Brush.Color := clWindow;

@FIL · 05.02.2014, 11:54

OnDrawCell вызывается для КАЖДОЙ ячейки.
Закрасить строку можно так:

Delphi

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  with (Sender as TStringGrid), Canvas do
  begin
    if Cells[1, ARow] = 'Кошка' then
      Brush.Color := clBtnFace;
    FillRect(Rect);
    TextOut(Rect.Left, Rect.Top + 2, Cells[ACol, ARow]);
  end;
end;

Но для закраски всей строки, после изменения данных в таблице придется вызывать

Delphi

1	StringGrid1.Repaint;

При ручном вводе данных можно сделать так:

Delphi

procedure TForm1.StringGrid1SetEditText(Sender: TObject; ACol, ARow: Integer;
  const Value: string);
begin
  StringGrid1.Repaint;
end;

@Shilka · 05.02.2014, 12:01 **[ТС]**

FIL, Огромное спасибо за помощь! Кажется, разобралась

@Shilka 0 / 0 / 0 Регистрация: 21.12.2013 Сообщений: 25
		1
	Раскраска строк StringGrid в зависимости от данных 05.02.2014, 11:11. Показов 3182. Ответов 4 Метки нет (Все метки) Всем добрый день! Очень прошу помочь новичку разобраться со следующей задачей: Необходимо закрасить строку StringGrid в зависимости от того, какие данные находятся в ячейке. Например, если Cells[2,5]='1', закрасить всю строку 5 в зелёный цвет, если Cells[2,9]='0', закрасить всю строку 9 в синий цвет, и т. д... Смотрела уже существующие темы на данном форуме о раскраске StringGrid, не смогла разобраться и подогнать под свою задачу Заранее спасибо за помощь! 0

@FIL Модератор 3490 / 2613 / 741 Регистрация: 19.09.2012 Сообщений: 7,974
	05.02.2014, 11:15	2
	Используй для этого обработчик Грида OnDrawCell. Пример: Ход возможные ходы шахматного коня, таблица 0

@Shilka 0 / 0 / 0 Регистрация: 21.12.2013 Сообщений: 25
	05.02.2014, 12:01 [ТС]	5
	FIL, Огромное спасибо за помощь! Кажется, разобралась 0

Раскраска строк StringGrid в зависимости от данных

Решение