H
hylas
Unregistered / Unconfirmed
GUEST, unregistred user!
有谁用过spcomm,发现给spcomm发送一串字符串，能使spcomm当掉
谁如果用spcomm开发过工具，发给我，我测试一下，是不是spcomm真的很脆弱
hylas@163.com QQ:284851828
type ss=array[1..500]of char ;
var
DataHex:^ss;
DataStr:string;
i,n:integer;
begin
DataHex:=Buffer;
for i:=1 to bufferlength do DataStr:=DataStr+IntToHex( ord(DataHex^) ,2);
Meo.Lines.add(inttostr(Meo.Lines.Count+1)+' - size:'+inttostr(BufferLength)+' '+DataStr);
end;
这是我的接收函数。
谁如果用spcomm开发过工具，发给我，我测试一下，是不是spcomm真的很脆弱
hylas@163.com QQ:284851828
type ss=array[1..500]of char ;
var
DataHex:^ss;
DataStr:string;
i,n:integer;
begin
DataHex:=Buffer;
for i:=1 to bufferlength do DataStr:=DataStr+IntToHex( ord(DataHex^) ,2);
Meo.Lines.add(inttostr(Meo.Lines.Count+1)+' - size:'+inttostr(BufferLength)+' '+DataStr);
end;
这是我的接收函数。