U
ukn_ma4
Unregistered / Unconfirmed
GUEST, unregistred user!
小第刚学的delphi6深入网络编程 它有一个聊天程序的例子就是下面的这段是服务端的
var tempinf
onlineinf templen:integer inbuf:array of byte len:integer const contrallen// 定义协议报头长
begin
len:=socket.receivelength;//得到传来的数据长度
if inbuf[len-1]<>0 then exit;//书上说这是判断包格式是否合法 这里的 inbuf[len-1]是什么意思呢？[len-1]代表什么？
tempinf:=new(ponlineinf);
templen;+len-contrllen-1//这句是什么意思？？
tempinf.username[0]:=char(lo(templen));// 这句是什么意思？
以上//后的问题求大虾帮忙教教 谢谢！ 还有就是想请问下那里有中文注解很全的代码分析网站哪个知道请教教啊 小的谢谢您了 谢谢
var tempinf
onlineinf templen:integer inbuf:array of byte len:integer const contrallen// 定义协议报头长begin
len:=socket.receivelength;//得到传来的数据长度
if inbuf[len-1]<>0 then exit;//书上说这是判断包格式是否合法 这里的 inbuf[len-1]是什么意思呢？[len-1]代表什么？
tempinf:=new(ponlineinf);
templen;+len-contrllen-1//这句是什么意思？？
tempinf.username[0]:=char(lo(templen));// 这句是什么意思？
以上//后的问题求大虾帮忙教教 谢谢！ 还有就是想请问下那里有中文注解很全的代码分析网站哪个知道请教教啊 小的谢谢您了 谢谢
