TIP: Click on subject to list as thread! ANSI
echo: z3_pascal
to: Robert Wiltshire
from: Tom Clarkson
date: 1996-06-02 20:34:22
subject: Re: pointers

RW> can anyone help me - i am after either a detailed explanation on how a 
RW> record of arrays can be lengthened using pointers or a program that 
RW> explains and demonstrates this principal. CAN ANYONE HELP ME - one of my 
RW> friends got help on this subject and won't share the findings.
RW> can you leave a message in here or sent it to 
RW> email  robert.wiltshire{at}hotline.bbs.au.com
RW> thanx

type bigarr:array[0..63999] of byte

var
i:word;
j:byte;
bigvar: record
        big1,
        big2:^bigarr;
        end;

begin
getmem(bigvar.big1,64000);
getmem(bigvar.big2,64000);

for i:= 0 to 1000 do
j:=bigvar.big1^[i] 

freemem(bigvar.big1,64000);
freemem(bigvar.big2,64000);
end.
end;

-=ðManiacð=-

--- GEcho 1.00
* Origin: 42 - The Coding BBS +644 568-6697 (3:771/42)
SEEN-BY: 633/267 270
@PATH: 771/42 1560 160 772/20 712/624 517 515 711/808 50/99 635/544 727
@PATH: 633/267

SOURCE: echomail via fidonet.ozzmosis.com

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.