해보지 않아서 잘 모르겠습니다만... 대부분 이런문제는 순서의 문제입니다.
Sleep(1000)처럼 지연루틴을 적절하게 집어넣어서 그려지는 순서를 한 번 파악해 보시거나 VCL소스를 잠시 추적해 보시면 오히려 빨리 해결될겁니다.

chang 님이 쓰신 글 :
: DBGrid의 DrawColumnCell 이벤트를 이용해서 row별로 각기 다른 색을 입히려 하는데...
: DBGrid와는 사용법이 다른거 같아 고전 중입니다...
:
: DBGrid에서 사용할 때는...
: void __fastcall TCounsel::Grid5DrawColumnCell(TObject *Sender,
:       const TRect &Rect, int DataCol, TColumn *Column,
:       TGridDrawState State)
: {
:    if ( !Grid5->DataSource->DataSet->FieldByName("date3")->IsNull )
:      Grid5->Canvas->Brush->Color = cl3DLight;
: }
:
: 위와 같이 사용하면 date2 필드가 널값이 아닌 경우 다를 색으로 칠할 수 있었는데...
: void __fastcall TScheduleEdit::ScheduleGridPaintPanel(
:       TDBCtrlGrid *DBCtrlGrid, int Index)
: {
:   if ( !ScheduleGrid->DataSource->DataSet->FieldByName("date1")->IsNull )
:     ScheduleGrid->Canvas->Brush->Color = clInactiveCaption;
:   else
:     ScheduleGrid->Canvas->Brush->Color = clWhite;
: }
:
: DBCtrlGrid의 OnPaintPanel 이벤트에서 위와 같이 코딩하면 안먹히더군요...
: 어떻게 해야하는지 고수님들의 조언을 부탁드립니다..^^
:
: ( 새해 福 많이 많이 받으시길...)