delphi开发的客户端怎么无法连接9730端口?
服务器是一个网络设备，目前在内网，IP固定为192.168.1.123，开放9707~9738共31个连续端口(用XP自带的超级终端试过了，这些端口都可以正常连接、通讯)。
用TcpClient控件写的客户端软件，就9730这个端口无法建立连接、通讯，代码如下，程序运行到 “MyTcpClient.Open;”时就报错，MyTcpClient.OnError返回10061和10057两个错误代码。请问是怎么回事？
procedure TFormSMS.E1SendClick(Sender: TObject);
var
MyTcpClient:TTcpClient;
ID:DWORD;
Rec:string;
index:Integer;
begin
MyTcpClient :=TTcpClient.Create(nil);
MyTcpClient.BlockMode := bmBlocking;
MyTcpClient.Name := 'MyTempTcpClient';
MyTcpClient.OnError := TcpClient1Error;
MyTcpClient.RemoteHost := RzEditE1IP.Text;
MyTcpClient.RemotePort := RzEditE1Port.Text;
MyTcpClient.Open;
Sleep(100);
if MyTcpClient.Active then
begin
if MyTcpClient.Sendln(RzEditE1Command.Text) > 0 then
begin
...
end;
end;
MyTcpClient.Close;
MyTcpClient.Free;
end;
看看9730端口是不是被其他程序占用了。
没有被占用，占用了超级终端应该也连不上才对。
是否有防火墙？
在客户端，用tel 看一下是否可以？
没有防火墙，主要是用超级终端可以，而自己写的客户端就那个端口不行才奇怪。
有没有哪个大哥知
相关问答：
VC 控制台程序:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
xml := CreateOleObject('Microsoft.XMLHTTP');
xml.Open('GET','http://www.google.com', False);
xml.Send;
xml.responseText;
使用xml.responseText可以获取网页源码,但是再次 ......
我想写一个在打开网页后，其中网页中有下拉列表框里面有几个值，我在想在事先还没有打开网页前选一个值，在打开网页后，网页中这个下拉列表框就显示我事先选取的值。小弟不会，希望哪位大侠出手相助一下？？？？？
......
求购带游戏大厅及“赢三张”扑克游戏的DELPHI源代码，联系QQ：861973982
具体内容QQ详谈。
没见过
帮顶
赢三张”扑克游戏 ?
没听说过.没听说过.
赢三张 是不是俗称炸鸡的游戏啊
没玩过这个游戏 ......
MessageBox(0,PChar('L'),PChar('LL'),0);
结果：PChar('LL') 显示 ，但PChar('L') 不显示．
var
p1, p2: PChar;
begin
p1 := PChar('L');
p2 := PChar('LL');
MessageBo ......
