Показать сообщение отдельно
  #3  
Старый 24.12.2013, 17:15
alanatolich alanatolich вне форума
Прохожий
 
Регистрация: 24.12.2013
Сообщения: 18
Версия Delphi: Delphi XE
Репутация: 10
По умолчанию

использую TList

Код:
var termial:TStringList;
  I: Integer;
    myList:TList;
begin
    // создаем список
    MYList := TList.Create;
    // создаем сокеты
    for I :=0 to NumberClientSocket do
    begin
        MYClientSocket:=TClientSocket.Create(nil);
        MYClientSocket.Name:='MS'+inttostr(I);
        MYList.Add(MYClientSocket);
    end;
    while True do
    begin
        MYClientSocket(myList[0]).Open;// ошибка подскажите что не так
    end;
end;
MAD: оформляйте код, или последует бан.

ошибка : E2066 Missing operator or semicolon
Ответить с цитированием