delphi 问题求助 - Delphi / 网络通信/分布式开发
问题是这样子的
我在form1中定义了一个sk1:tsocket
然后在form2中
用sk1 发送东西 发完后 socket 自动关闭了~
但是在form1中发东西 如果我不运行 closesocket 的话 是不会断掉的
问下 这是怎么回事
另我在 form2 里加了个
uses Unit1;
直接调用 sk1~
这样子应该没问题吧~
单步调试了下~
type
test_array=array[0..211] of Byte;
var
re:integer;
message_headpack:array[0..3] of Byte;
test_byte:array[0..207] of Byte;
send_pack:test_array;
psend_pack:^test_array;
~~~~~~~~~~~~~~~~~~~~
前边是些赋值语句就不复制了
for i:=0 to sizeof(message_headpack)-1 do
send_pack[i]:=message_headpack[i];
for i:=SizeOf(message_headpack)to SizeOf(send_pack)-1 do
send_pack[i]:=test_byte[i-sizeof(message_headpack)];
re:=send(sk1,psend_pack^,Length(psend_pack^),0);
//单步运行到这一步 就发现信息包发出去后 然后socket也自动关闭了~sk1是套接字~我在unit1中定义的
if(Re=SOCKET_ERROR)then
begin
ShowMessage('发送错误');
exit;
end;
form2.Release;
close;
高手帮我看下
顶起来~
这个到底是怎么回事啊~
服务器是用C写的
我在unit1 下发送 是不会断开的~
但在unit2 下发送 socket就断开了~
加个输出错误信息看下
uses
Winsock2;
try
re:=send(sk1,psend_pack^,Length(psend
相关问答：
程序使用的是Orcal数据库，想定期（每季度）对数据库进行备份，没啥头绪，请问应该怎么弄？
有什么特殊要求吗，比如要前端界面？
一般用数据库自带的“计划任务”配置一下就够了
没有什么特殊要求。例如，只要� ......
具体要求与报酬QQ729851670
771234717
“拼音编程”是什么意思
引用
“拼音编程”是什么意思
1.给一个字可以显示拼音，多音字的话能显示对应的多个拼音
2.对包含多音字的词语智能识别给出拼音。
3.对一段 ......
在安装完成Delphi的时候，打开Delphi进入窗口，点运行的时候为什么自动停止运行了。
什么意思，是新建的应用运行停止，还是程序停止了呢。
没明白LZ意思~~
引用
在安装完成Delphi的时候，打开De ......
定义变量s,sql为string类型，s为函数参数，sql：='select field1 from table1 where'+s;运行时s赋值为id>7或者id<7、id=7,但是运行时总是出错，请各位帮我改错，多谢！
showMessage(sql)下看看
sql：='sel ......
adoconnection1.ConnectionString := 'driver={MySQL ODBC 3.51 Driver};server=localhost;uid=root;pwd=111111;database=xiamen';
adoconnection1.Open;
adodataset1.Connection := adoconne ......
