Раз утилита консольная, предположу, должно быть что-то такое:
#pas
program Project1;
uses Windows, SysUtils, Sockets;
var // Не "type"!
TcpClient1: TTcpClient;
begin
TcpClient1 := TTcpClient.Create;
TCPClient1.RemoteHost := ip;
TCPClient1.Free;
end.