STRINGGRID问题很急的

Question

请问我想实现当我点STRINGGRID的单元格时，此单元格就成红色，字体变绿色，代码如下却有错误呀请指教呀
我在STRINGGRID的DRAWCELL事件写如下代码
IF STATE。CONTAINS（GDSELECTED） TEHN      有错误
 BEGIN
  STRINGGRID1。FONT。COLOR=CLRED；
  STRINGGRID1。BRUSH。COLOR=TCOLOR（RGB（200，123，100））；
  STRINGGRID1。CANVAS。FILLRECT（RECT）；
  DRAWTEXT（STRINGGRID1。HANDLE，PCHAR（STRINGGRID1。CELLS[ACOL，AROW]），LENGTH（STRIGGRID1。CELLS[ACOL，AROW]），RECT，DT—CENTER）；
 END；

Answer 1

if gdSelected in state then
 BEGIN
 END;

Answer 2

TO herofy(herofy.go.nease.net)当我点STRINGGRID中的单元格却没有变色呀

Answer 3

变色了不过我没有点STRINGGRID单元格字体全都变色了呀背景也不变色呀而且当我点STRINGGRID单元格时此单元格的数据看不见了呀急呀