指定したセルの色を変えるところまでは procedure TForm1.StringGrid1DrawCell(... begin if (ACol = 5) and (ARow =5) then begin StringGrid1.Canvas.Brush.Color := clBlue; StringGrid1.Canvas.FillRect(Rect); end; end; でよかったんだけどこれに if combobox1.itemindex=0 thenなど条件を加えると条件にすぐさま反応せず、 指定したセルをクリックしたら色が変わるという状態になってしまう。 このstringgridのイベントはプログラム起動時にしか自動で動いてくれないのかな どなたかご教授願います。