T tswhq Unregistered / Unconfirmed GUEST, unregistred user! 2005-07-19 #3 好象有点难度. 其实TList中存放的是指向对象的指针,若对象相同的就有办法 p char Mystream:TStream; MyList :TList; ...... MyStream.Clear; for i:=0 to MyList.Count do begin p:=MyList.Items; MyStream.WriteBuffer(p^,SizeOf(SomeObject)); end; 试试看,管杀不管埋
好象有点难度. 其实TList中存放的是指向对象的指针,若对象相同的就有办法 p char Mystream:TStream; MyList :TList; ...... MyStream.Clear; for i:=0 to MyList.Count do begin p:=MyList.Items; MyStream.WriteBuffer(p^,SizeOf(SomeObject)); end; 试试看,管杀不管埋