如果服务器的ip地址是:自动获取ip地址,那么SocketConnection的address选项该如何写呢????困惑中。
解决方案 »
- 如何将grid中的选中内容,拖放到程序中的一个TMemo中?
- 【求助】在Delphi中嵌汇编的问题?
- 怎样判断字体的样式
- 网吧管理系统-源代码
- 请教高手:ttreeview控件的问题。
- 软件公司用DELPHI主要是用于哪种开发?
- ?我做了一个三层结构的管理系统,但发布后出现数据库连接失败,请各位高手多多指教!!非常感谢,急急!!!!!!!!!!
- 我想用Table連接sql-server中的表﹐如何使得到的表是由大到小﹐倒序排列的數據呢?
- 关于数据库的简单问题!请教!
- 问题2:如何生成报表时只显示dbgrid中的纪录,而不是table的全部
- 关于将excel保存到本地的问题,立马给分
- 后台更新完成后,怎样在memo中提示某表已更新
var
i:integer;
begin
with lbIPs do
begin
clear;
items:=GStack.LocalAddresses;
items.Insert(0,'127.0.0.1');
end;
try
cboPorts.Items.Add(RSBindingAny);
cboPorts.Items.BeginUpdate;
for i := 0 to IdPorts.Count - 1 do
cboPorts.Items.Add(PortDescription(Integer(IdPorts[i])));
finally
cboPorts.Items.EndUpdate;
end;
end; //cboports是 combobox
不知道是不是你想要的
procedure TForm1.FormCreate(Sender: TObject);
begin
PopulateIPAddresses;
end;
A 192.168.111.1
B 192.168.222.1
子网掩码:255 255 255 0
默认网关:
==============
SocketConnection组件的address设为ip:192.168.111.1
试图将connected属性改为真失败。
提示:由于目标机器积极拒绝,无法链接
但如果是自动获取公网IP,前面两个都行不通,必须用域名
HOST....===================
刚才你改IP地址了,还连不上????想问一下,你的端口开了没有.就是服务端运行吗?二边的端口都打开了吗