TThread -> Execute(SockId: Integer);

[StanY]

Ich habe ein Programm, was mehrere Threads erstellt, während der Laufzeit.

Nun habe ich das Problem, dass quasie bei der OnExecute-Prozedur eine Variable übergeben werden muss.

Ist mir aber nciht möglich, da dann der Compiler rummeckert, dass sich die neue Prozedur von der alten unterscheidet:

Delphi-Quellcode:

TMyThread = class(TThread)
  protected
    procedure Execute(SockId: Integer);
end;

Wie kann ich das realisieren?

(Ein neues Ereignis schreiben und dann quasie manuell aufhühren geht nicht, da es dann nicht als thread behandelt wird und die Hauptanwendung lahmt.