Viele Threads mit VCL - aber wie?

[Sascha L]

Delphi-Quellcode:

type 
  TMyThread = class(TThread) 
  private
    fValue : String; // z.B. ein String  -> oder unter Public
  protected 
    procedure Execute; override; 
  public
    constructor Create(Bla: String; Suspended: Boolean); override; // z.B. ein String
 end;

{...}

constructor TMyThread.Create(Bla: String; Suspended: Boolean);
begin
  fValue := Bla;
  inherited(Suspended);
end;