TThread -> Execute(SockId: Integer);

[StanY]

Entweder versteh ich euch oder ihr mich net

Also, hier mal ausführlicher. Dabei wollte ich heute weiter arbeiten \:

Ich habe eine eigene Klasse. Abgeleitet von der TIdTCPClient-Komponente. Halt mit eingebautem Thread:

Delphi-Quellcode:

  TMyThread = class(TThread)
  protected
    procedure Execute; override;
  end;

  TConnection = class(TIdTCPClient)
    Thread: TMyThread;
  end;

TMyThread steht halt darüber.

Nun erstelle ich per DynArr von TConnection mehrere TIdTCPClienten und mehrere Threads.

Jeder Thread muss nun für _seinen_ TCPClienten ReadLn ausführen, was ich realisieren wollte, indem ich TMyThread.Execute eine Integer Variable übergebe, die dann sagt, welchen Verbindung er abhören soll:

Delphi-Quellcode:

TMyThread.Execute(SockId: Integer);
begin
  memDebug.Lines.Add(Connection[SockId].ReadLn);
end;

Wie kann ich das möglich machen?