Dann nimm Resume statt Start, oder nimm CreateMyThread aus dem FormCreate heraus und ändere CreateMyThread so daß der Thread direkt losläuft.
Delphi-Quellcode:
procedure TForm1.CreateMyThread;
begin
if not Assigned(MyThread) then
begin
MyThread := TMyThread.Create(false);
MyThread.FreeOnTerminate := true;
end;
end;