Вверх ↑
Ответов: 4630
Рейтинг: 749
#1: 2013-05-11 21:43:09 ЛС | профиль | цитата
Cosinus, так ты бы подробнее говорил, что тебе нужно. Поскольку в первом примере было слово type, Tad (и компилятор) логично предположил, что ты хочешь переопределить тип TTcpClient, подменив его на TcpClient1 и дал ответ. Теперь оказывается, TcpClient1 - это переменная, с которой ты хочешь работать. Ты бы показал весь код. Как минимум, в секции type нельзя делать TCPClient1.RemoteHost := ip.
Раз утилита консольная, предположу, должно быть что-то такое:

#pas
program Project1;

uses Windows, SysUtils, Sockets;

var // Не "type"!

TcpClient1: TTcpClient;

begin
TcpClient1 := TTcpClient.Create;
TCPClient1.RemoteHost := ip;
TCPClient1.Free;
end.
карма: 26

0