[NumLock]

маленькое замечаньице:
правильней делать так:

Код:

constructor TMyThread.Create(AListBox: TListBox);
begin
  inherited Create(True);
  // init
  Resume;
end;

либо:

Код:

constructor TMyThread.Create(AListBox: TListBox);
begin
  // init
  inherited Create(False);
end;

теоритически Execute может начать раньше выполняться, чем "продолжение" конструктора. может и не в данном примере, конечно...