F
fanronghua
Unregistered / Unconfirmed
GUEST, unregistred user!
var
str: string;
strlen: integer;
buf1: byte;
begin
str := memo1.Text;
strlen := length(Str);
move(str, buf1, strlen);
ClientSocket1.Socket.SendBuf(buf1, strlen);
由于套接字没有连接并且(当使用一个SendTo调用发送数据报套接字时),
发送或接收数据的请求没有被接受?
str: string;
strlen: integer;
buf1: byte;
begin
str := memo1.Text;
strlen := length(Str);
move(str, buf1, strlen);
ClientSocket1.Socket.SendBuf(buf1, strlen);
由于套接字没有连接并且(当使用一个SendTo调用发送数据报套接字时),
发送或接收数据的请求没有被接受?