S
samen
Unregistered / Unconfirmed
GUEST, unregistred user!
TREC=RECORD
SS:INTEGER;
AA:STRING[10]
...
End
SH:array[1..15000] of TREC;
sz:array[1..15000] of Trec;
st:=Tmemorystream;
pch:=pchar;
如何用流发送和接收?
st:=Tmemorystream.creat;
st.write(sh,sizeof(sh));
serversocket1.socket.connections[0].sendstream(st)
pch:=@sz
clientsocket1.socket.recebuff(pch,sizeof(sh));
请帮我改一下上面的程序。
SS:INTEGER;
AA:STRING[10]
...
End
SH:array[1..15000] of TREC;
sz:array[1..15000] of Trec;
st:=Tmemorystream;
pch:=pchar;
如何用流发送和接收?
st:=Tmemorystream.creat;
st.write(sh,sizeof(sh));
serversocket1.socket.connections[0].sendstream(st)
pch:=@sz
clientsocket1.socket.recebuff(pch,sizeof(sh));
请帮我改一下上面的程序。