Subj : sets in tp
To   : All
From : Chris Hoppman
Date : Sun Sep 26 2004 02:33 pm

Okay.  What is up with Sets in tp/bp that one with 24 elements and another
with the same amount will return different sizeof's??
I thought I would throw a couple of duds in the set to make up for the extra
byte in the delphi problem and not have it effect much in the record *.dat
file I am working with, but darn!  Is it cause of the ?? was going to say
typed vs non typed (int vs var type of thing), but a set can't be a var?
Just preplex'd about this.


program testset;
uses crt;
type
 aset = 1..24;
 bset = (rlogon,   {1}
         rchat,    {2}
         rvalidate {3}
         ruserlist {4}
         ramsg,    {5}
         rpostan,  {6}
         rpost,    {7}
         remail,   {8}
         rvoting,  {9}
         rmsg,     {10}
         vt100,    {11}
         hotkey,   {12}
         avatar,   {13}
         pause,    {14}
         novice,   {15}
         ansi,     {16}
         color,    {17}
         alert,    {18}
         smw,      {19}
         nomail,   {20}
         fnodlratio,   {21}
         fnopostratio, {22}
         fnocredits,   {23}
         fnodeletion); {24}
begin
clrscr;
writeln('Set A SizeOf: ',Sizeof(aset));
Writeln('Set B SizeOf: ',Sizeof(bset));
writeln;
write('press a key');
repeat until keypressed;
end.
--- Renegade v09-19.4 DOS
* Origin: The Titantic BBS Telnet - ttb.slyip.com (1:129/305)