Посмотри как я раньше решал. Немного не то что тебе нужно но переделать я думаю не составит проблем.
| Код |
void __fastcall TF_CASH::GRID_MAINDrawColumnCell(TObject *Sender,
const TRect &Rect, int DataCol, TColumnEh *Column,
TGridDrawState State)
{
if(!F_CASH->T_CASH->FieldByName("CS_OSTAT")->IsNull)
{
if ((T_CASH->FieldByName("CS_OSTAT")->Value<0)&
(Column->FieldName=="CS_OSTAT") )
{
GRID_MAIN->Canvas->Brush->Color=clSkyBlue;
// GRID_MAIN->Canvas->Font->Color=clWhite;
GRID_MAIN->Canvas->FillRect(Rect);
GRID_MAIN->Canvas->TextOut(Rect.Left+2,Rect.Top+2,Column->Field->Text);
}
if((T_CASH->FieldByName("CS_OSTAT")->Value>0) & (Column->FieldName=="CS_OSTAT") )
{
GRID_MAIN->Canvas->Brush->Color=clMoneyGreen;
//GRID_MAIN->Canvas->Font->Color=clWhite;
GRID_MAIN->Canvas->FillRect(Rect);
GRID_MAIN->Canvas->TextOut(Rect.Left+2,Rect.Top+2,Column->Field->Text);
}
}
}
|
|