Is there a better way to do this -
{$IFOPT R+}
{$R-}
numnames := ntohl(FromServ.NameCount);
{$R+}
{$ELSE}
numnames := ntohl(FromServ.NameCount);
{$ENDIF}
Why have I done this - Delphi Range checking is no good on 32 bit numbers - especially
when dealing with this network stuff, as the byte order has to be swapped.
I would have liked to do
{$ Stack current $R value
{$R-}
numnames := ntohl(FromServ.NameCount); // Must always compile with range checking off.
{$ Unstack old $R value}
Regards
Myles Penlington
Software Engineer
ADVANCED MANAGEMENT SYSTEMS
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz