XE4 There is no overloaded version GetTextExtentPoint32A

[dcc32 Error] dxGrDate.pas(1402): E2250 There is no overloaded version of 'GetTextExtentPoint32' that can be called with these arguments

GetTextExtentPoint32A(Handle, PWideChar(ACaption), Length(ACaption), Size);

change to 

  var
    mysize:TSize;

GetTextExtentPoint32(Handle,PWideChar(ACaption),Length(ACaption),mySize);

用的size和系统size重名了，导致编译错误