Please always check that you are able to do the operation without
arriving to overflow (for example).
A question is, why Value is longint and not a Cardinal, is there a
reason for negative size ?!
You ask me? Class TBits is RTL class. It resides in file classesh.inc.
I'm not freepascal developer so i don't know why they do this.
Similiar class in Delphi works fine if i do this:
var
Bits : TBits;
....
Bits.Size := 0;
....
But in Lazarus it fails!
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
