DBGrid色づけ (ID:37480)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ちょいと訂正。 「成功」が入っているセルだけの色を変えるなら begin if Column.Field.AsString= '成功' then begin DBGrid1.Canvas.Brush.Color:= clYellow; DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State) end end; 「成功」が特定のセルに入っている場合、行全部の色を変えるなら begin if Column.Field.DataSet.Fields[どこか].AsString ='成功' then begin DBGrid1.Canvas.Brush.Color:=clYellow; DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State); end end; ですね。この場合の「Fields[どこか]」は、値「成功」を納めているFieldを指定してください。