Цвет ячейки в зависимости от слова

@Fantomto · Регистрация: 19.01.2017

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

Добрый день всем! Подскажите пж как в DBgrid сделать что бы ячейки красились в зависимости от слова?то есть есть три слова Выполнено,ЧС, брак. Каким условием присвоить им цвета?

@rusqwe · 25.01.2017, 15:19

Delphi

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
if dbGrid1.DataSource.DataSet.FieldByName('поле со словами').Value='Выполнено' then
     begin
      dbGrid1.Canvas.Brush.Color := clActiveBorder;
      dbGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
    end
//и тд......
end;

@Fantomto 1 / 1 / 0 Регистрация: 19.01.2017 Сообщений: 33
		1
	Цвет ячейки в зависимости от слова 25.01.2017, 14:27. Показов 1390. Ответов 1 Метки нет (Все метки) Добрый день всем! Подскажите пж как в DBgrid сделать что бы ячейки красились в зависимости от слова?то есть есть три слова Выполнено,ЧС, брак. Каким условием присвоить им цвета? 0

	25.01.2017, 15:19

Цвет ячейки в зависимости от слова

Решение