TClientSocket.Active = False => TClientSocket.Socket.SocketHandle =Invide_Socket
property LocateHost: string read GetLocateHost;function GetLocateHost: string
begin
if SocketHandle = Invide_Socket then Exit;
...
end;
所以...
property LocateHost: string read GetLocateHost;function GetLocateHost: string
begin
if SocketHandle = Invide_Socket then Exit;
...
end;
所以...
解决方案 »
- vcl组件中如何保存大量数据
- 程序中如何取得当前ie中已经安装的证书?
- sqlserver客户端的访问问题?
- 如何处理TScrollBox的鼠标滚轮事件?
- 数据库中图片转出后不能打开,谁遇到过?附源码
- 如何还原delphi重的汉字?delphi编译后的汉字用什么编码方式存放的?
- 救命啊,如何打开一个DOS窗口并执行指定的带参数的批处理文件?
- Delphi?
- DBGrid控件如何屏蔽下箭头?
- 怎让能在拨号后,执行一个程序
- 高手都到那里去了........................
- 我将一组菜单的RadioItem设为True,其中一个的Checked设为True,可显示出来后是Check框的对勾!
我的小程序中用了TClientSocket,所以我只想用其中的属性,
似乎是LocalHost属性,但我试了后却发现好象又不是,
除非TClientSocket不能提供本机机器名,否则我不想用getcomputername
函数。
在本机机器名呢?还是与本机相连的“远程”主机机器名?
没错。
用Socket.RemoteHost可以得到远程主机名,
但客户机中的客户程序中只有TClientSocket,
所以想请教如何利用它获得本机名。
RemoteHost得到就是本机名了.
Socket.LocalHost