Wednesday April 08 1998 22:55, Christian Iversen wrote to Brian McCloud:
BM> RL>> Film_record = record
[...]
RL>>> end;
BM>> I hope you realize this record is 2560 bytes long...
CI> No, It's 20 bytes long.
Nada.
CI> If all strings are empty of course.
Means nothing.
CI> Pascal only saves needed info.
Try this simple program;
Program Worthless;
Type
Film_record = record
film_title,
Director_forename,
Director_surname,
Performer_forename1,
Performer_surname1,
Performer_forename2,
Performer_surname2,
Keyword1,
keyword2,
keyword3 :string;
end;
var
Blah: Film_Record;
begin
Blah.film_title := '';
Blah.Director_forename := '';
Blah.Director_surname := '';
Blah.Performer_forename1 := '';
Blah.Performer_surname1 := '';
Blah.Performer_forename2 := '';
Blah.Performer_surname2 := '';
Blah.Keyword1 := '';
Blah.keyword2 := '';
Blah.keyword3 := '';
WriteLn(SizeOf(Blah));
ReadLn;
end.
and you should see nothing more than;
2560
on the screen.
Stewart Honsberger,
blackdeath@tinys.oix.com
... Those without heads do not need hats.
-!- GOPGP v1.1
--- Squish/386 v1.11
---------------
* Origin: Blackdeath BBS - Private (1:229/604)
|