ry to declare TLISTptr as a pointer to array of TLIST items.
For example: (not tested)
Code:PROGRAM example; TYPE TLIST = RECORD Field: INTEGER; Other: INTEGER; END; TLISTARRAY = array[0..$FFFF] of TLIST; TLISTptr = ^TLISTARRAY; FUNCTION get_list: TLISTptr; CDECL; EXTERNAL 'lib.dll'; VAR TheList: TLISTptr; BEGIN { Somewhere } TheList := get_list; WriteLn (TheList[0]); END.
Bookmarks