域名解析求救(100分)

通过代理时，这个函数返回不了域名的IP地址
function DomainName2IP(Name: string): string;
var
WSAData: TWSAData;
HostEnt: PHostEnt;
begin
Result := '';
WSAStartup(2, WSAData);
HostEnt := gethostbyName(Pchar(Name));
if HostEnt = nil then Exit;
with HostEnt^ do
Result := PChar(Format('%d.%d.%d.%d', [Byte(h_addr^[0]), Byte(h_addr^[1]),
Byte(h_addr^[2]), Byte(h_addr^[3])]));
WSACleanup;
end;
我正在做一个FTP的上传工具，通过代理服务器（SOCKS5）时，用IP可以上传，但域名无法正常上传，
[red]socks5代理
socks5代理都不是明文，是数据。
202.204.8.10:21
CA CC 08 0A 00 15
如果使用的是域名，就是明文
..]ZY...]ZI@..E..>..@...p.............N.f7%p:.P...;........vod.sjtu.edu.cn.....[/red]
使用的是域名，就是明文，明文怎么传呢，请大侠们帮帮我

大侠们，请帮帮忙吧

看看是不是你的DNS有问题

to lawway:
我用FLASHFXP的工具，输入域名 可以通过代理服务器下载和上传东东呀，证明域名解析没有问题。

我自己已经解决

我是通过 telnet 来实现的，大家有没有好的方法
我用的是 CCProxy 代理服务器
c:> telnet 192.168.0.2
CCProxy Telnet>CCProxy Telnet Service Ready.
CCProxy Telnet>ping www.sina.com.cn
Pinging www.sina.com.cn [61.135.153.177] with 32 bytes of data:
Reply[1] from: 61.135.153.177: bytes=32 time=521ms TTL=57
Reply[2] from: 61.135.153.177: bytes=32 time=741ms TTL=57
Reply[3] from: 61.135.153.177: bytes=32 time=651ms TTL=57
Reply[4] from: 61.135.153.177: bytes=32 time=501ms TTL=57
Reply[5] from: 61.135.153.177: bytes=32 time=451ms TTL=57

CCProxy Telnet>
返回的SINA 的IP 地址，打家有没有什么好的方法通过代理 得到 外网的IP地址
谁告诉我，我就把分数给谁