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

Помогите с перебором объектов.
Задача такая есть основной поток приложения, который в свою очередь запускает еще один поток, в котором динамически создается N-e количество объектов. Как после создания этих объектов, к ним обратиться?

Код:
procedure TMyThread.Execute;
var i: Integer;
begin
    // создаем сокеты
    for I :=0 to NumberClientSocket do
    begin
        MYClientSocket:=TClientSocket.Create(nil);
        MYClientSocket.Name:='MS'+inttostr(I);
        //настраиваем сокеты
        ...
    end;
    while True do
    begin
          // нужно обращаться к свойствам определенного сокета
          ...
    end;
        // освобождаем все сокеты
        ...
end;
Ответить с цитированием