Закраска свободной от ячеек области в StringGrid

[Miller-1981]

возник вопрос - как закрасить свободную от ячеек зону в компоненте StringGrid

у меня вариант был такой в OnPaint формы

DataGrid->Canvas->Brush->Color = clAppWorkSpace;
TRect Rect;
int x=0;
int y=0;
for(int i=0;i<DataGrid->ColCount;i++)
	{
	x+=DataGrid->ColWidths[i];
	}
for(int i=0;i<DataGrid->RowCount;i++)
	{
	y+=DataGrid->RowHeights[i];
	}
if(x<DataGrid->Width)
	{
	Rect.Left = x;
	Rect.Top=0;
	Rect.Right = DataGrid->Width;
	Rect.Bottom = DataGrid->Height;
	DataGrid->Canvas->FillRect(Rect);
	}
if(y<DataGrid->Height)
	{
	Rect.Left=0;
	Rect.Top = y;
	Rect.Right = DataGrid->Width;
	Rect.Bottom = DataGrid->Height;
	DataGrid->Canvas->FillRect(Rect);
	}

но первоначально никак не срабатывает, только после какого изменения формы. Есть у кого то другие варианты?

[Stilet]

А почему бы не задать изначально для грида цвет а в событии отрисовки ячеек закрашивать каждую ячейку нужным цветом? Зачем в паинте формы это делать?

[Miller-1981]

Сообщение от Stilet

А почему бы не задать изначально для грида цвет а в событии отрисовки ячеек закрашивать каждую ячейку нужным цветом? Зачем в паинте формы это делать?

повнимательнее вопрос почитайте пожалуйста - ячейки все я крашу в DrawCell это не вопрос- мне нужно закрасить область свободную от ячеек, когда область ячеек будет меньше размера самого компонента, она всегда белая., хотелось бы покрасить в другой цвет

P.S. Выяснилось что в 6-ом билдере свойство Color у StringGrid это цвет фона как раз, в 2010 оно не работает - вопрос тогда как сделать чтоб оно заработало

[Stilet]

Это тебе нужно повнимательнее читать. Если бы ты не кидался поперед батька в пекло, а попробовал то что я сказал:

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol, int ARow, TRect &Rect,
          TGridDrawState State)
{
  if( ACol>=StringGrid1->FixedCols && ARow>=StringGrid1->FixedRows){
   StringGrid1->Canvas->Brush->Color=clWhite;
   StringGrid1->Canvas->FillRect(Rect);
  }

}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
 // Если Билтер 2010
 StringGrid1->DrawingStyle=gdsClassic;
 StringGrid1->Color=clAqua;
}
//---------------------------------------------------------------------------

То получил бы такую картинку:

P.S. Я забыл что у меня и Билдер есть так что пример поправил под билдер

[Stilet]

вопрос тогда как сделать чтоб оно заработало

См. мой пример. там есть поправка насчет этого вопроса