变态问题，求高人解答

有一个PAINTBOX，想用下面的代码填充成红色

void __fastcall TForm1::PaintBox1Paint(TObject *Sender)
{
TRect TrendRect1;
PaintBox1->Canvas->Brush->Color=clRed;
PaintBox1->Canvas->FillRect(TrendRect1);
}

但是结果``没反应。

改成下面的代码之后成功

void __fastcall TForm1::PaintBox1Paint(TObject *Sender)
{
TRect TrendRect1;
PaintBox1->Canvas->Brush->Color=clRed;
PaintBox1->Canvas->FillRect(TrendRect1);
for(int i=1;i<20;i++)
{}

}

多次试验，只要是加了一个for循环就可以，即使是像for(int i=1;i<0;i++)这样的循环都可以，无奈了，请问这是为什么？