delphi FillRect中的参数异常 请大家帮忙看看

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是什么版本