delphi FillRect中的参数错误 请大家帮忙看看
delphi FillRect中的参数错误 请大家帮忙看看

VC中这样写
HDC mySurfDC(NULL);
CRect crRect(0,0,myWidth,myHeight);
FillRect(mySurfDC,&crRect,static_cast<HBRUSH>(GetStockObject(WHITE_BRUSH)));

delphi中该怎么写？
var
mySurfDC: HDC;
crRect: CRect;

mySurfDC := null;
crRect(0, 0, myWidth, myHeight);
FillRect(mySurfDC, @crRect, static_cast < HBRUSH > (GetStockObject(WHITE_BRUSH)));

我是这样写的 提示错误 undeclared identifier 'CRect'；
还有这句 FillRect(mySurfDC, @crRect, static_cast < HBRUSH > (GetStockObject(WHITE_BRUSH)));
也提示错误 请问该如何写？

[解决办法]
var crRect
delphi中不是CRect，是TRect
[解决办法]
static_cast < HBRUSH > (GetStockObject(WHITE_BRUSH))
这个写法语法也过不了
delphi是什么版本