[fpc-devel] [patch] types.pp - InflateRect() & Size()

[Graeme Geldenhuys]

Hi,

Attached is a patch for the types.pp unit.  I also include some Unit
Tests for InflateRect() function in a separate file (uses fpcUnit) by
wasn't sure how or where to incorporate them.  The patch needs to be
applied in the root FPC source directory.

Changes:
 * Added a new InflateRect() function, which does the same as the
Windows API call, but is cross-platform.
 * Added two Size() functions with different parameters that return a
TSize record. It works the same as the Point() function that returns a
TPoint record.


Regards,
  Graeme.


-- 
There's no place like 127.0.0.1
-------------- next part --------------
A non-text attachment was scrubbed...
Name: types.pp.patch
Type: text/x-patch
Size: 1164 bytes
Desc: not available
URL: <http://lists.freepascal.org/pipermail/fpc-devel/attachments/20060725/f375e4fd/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: InfateRectTest.pas
Type: text/x-pascal
Size: 3611 bytes
Desc: not available
URL: <http://lists.freepascal.org/pipermail/fpc-devel/attachments/20060725/f375e4fd/attachment.pas>