修改TDBGrid颜色？修改了（还没写入数据库的）的信息用红色标明。

[LuoGD]

我自己原来实现了，现在又忘了。特请教大家。

[Chxis]

ownerdraw?

[hjhwfw]

void __fastcall TForm1::DBGrid1DrawColumnCell(TObject *Sender,
const TRect &Rect, int DataCol, TColumn *Column,
TGridDrawState State)
{
if(Query1->FieldByName("科室")->AsString=="内科")//条件自定义
{
((TDBGrid*)Sender)->Canvas->Brush->Color=clRed;//(TColor)RGB(100,100,200);
((TDBGrid*)Sender)->Canvas->Font->Color=clWhite;
}
((TDBGrid*)Sender)->DefaultDrawColumnCell(Rect,DataCol,Column,State);
}

[wangxd]

根据不同条件变色
void __fastcall TForm1::DBGrid1DrawColumnCell(TObject *Sender,
const TRect &Rect, int DataCol, TColumn *Column,
TGridDrawState State)
{

if(State.Contains(gdSelected))
{
cx = Rect.Left;
cy = Rect.Top;

}

p = TPoint(cx,cy);
p =DBGrid1->ClientToScreen(p);
Label1->Caption=p.x;
Label2->Caption=p.y;
if (ADOTable1->FieldByName("name")->AsString=="dd" )
if( Column->FieldName=="title"||Column->FieldName=="name")
DBGrid1->Canvas->Font->Color = clRed;
else
DBGrid1->Canvas->Font->Color = clGreen;
else
DBGrid1->Canvas->Font->Color = clBlue;
DBGrid1->DefaultDrawColumnCell(Rect,DataCol, Column, State);

}

[chifengwatch]

mark

[LuoGD]

我的意思是：

col1

[LuoGD]

如果该cell的内容是修改了，或新加的（不管是什么值，还没UPDATE到表）都用红色表示，
已经UPDATE的数据用黑色表示。
这样用户能看出他做了那些修改。

[LuoGD]

再提提！