如何在使用idFTP获得本机正在连接的IP? 我有一个程序需要用到idfTP,客户机由于要连通多个网络,所以配置了多个网卡,而每个网卡都配置了相应的IP地址,当客户机(使用idftp)连上FTP服务器时,我想知道这个客户端的idftp究竟是通过机器上那一个IP进行上传的?如何去处理? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 uses IdStack; procedure getcomputerip(outdata:Tstrings); var AIdStack:TIdStack; begin AIdStack:=TIdStack.CreateStack; try outdata.Text:=AIdStack.LocalAddresses.Text;//获取本地IP地址列表 finally AIdStack.free; end; end; procedure TForm1.Button1Click(Sender: TObject);begingetcomputerip(memo1.Lines);end;先试试这段代码能不能获取本地IP地址列表?我没有多网卡测试不了,但代码我测试了可以 执行netstat -na命令,"Foreign Address"栏下面带 ":21"的,对应的左边那栏的字符串就是你连接的IP和端口 发现很多提问题的都比较拽 請教TADOQuery方面的問題 delphi调什么数据库可以不用bde,odbc等等,而可以直接用delphi读写, 数据库问题..都来看看... 急啊!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 求delphi发mail的实例 闲来无事,帮斑竹一个忙 :) 关于注册表操作的几个问题。。。。。。。。。〉〉〉〉〉〉〉〉〉〉〉〉 DELPHI几个基本的问题????? 紧急求救:文件分块socket多线程问题 fontdialog如何使用??? 请求帮助,delphi IdHTTP POS ESC解码问题
uses IdStack;
procedure getcomputerip(outdata:Tstrings);
var
AIdStack:TIdStack;
begin
AIdStack:=TIdStack.CreateStack;
try
outdata.Text:=AIdStack.LocalAddresses.Text;//获取本地IP地址列表
finally
AIdStack.free;
end;
end; procedure TForm1.Button1Click(Sender: TObject);
begin
getcomputerip(memo1.Lines);
end;
先试试这段代码能不能获取本地IP地址列表?
我没有多网卡测试不了,但代码我测试了可以