On 26.07.2011 01:23, Paul Nicholls wrote:
"Jorge Aldo G. de F. Junior"
<jagf...@gmail.com> wrote in message
news:CAAHHabS9aUe9gwyNjkve-XVXsRyf2UPsArh6=fsdpgokugj...@mail.gmail.com...
Some time ago someone asked for a library able to do network calculations.
Here is something that might evolve into such library :
<SNIP>
Function NetMaskToHostMask(NetMask : TNetworkIP): TNetworkIP;
Begin
Result.Mode := False;
NetMask.Mode := False;
Result.IP := NetMask.IP Xor %11111111111111111111111111111111;
End;
<SNIP>
I didn't know that freepascal handled binary formatted numbers?!?
%11111111111111111111111111111111
There are often new things one can learn about what FPC supports ;)
(though binary numbers are already old for me ^^)
The most recent finding (at least for me) was the abbility to initialize
local variables.
Regards,
Sven
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal