用带结构的指针。
type
TMyData = ^PRecord;
PRecord = record;
field1 : thetype;
field2 : thetype;
field3 : thetype;
...
然后把数据库里的纪录取出赋值给TMyData,所有的TMyData组成一个链表,对链表进行操作。
type
TMyData = ^PRecord;
PRecord = record;
field1 : thetype;
field2 : thetype;
field3 : thetype;
...
然后把数据库里的纪录取出赋值给TMyData,所有的TMyData组成一个链表,对链表进行操作。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货