использую 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