Завершается ли поток автоматически, если его основной процесс принудительно завершен?

Мне нужно знать, при работе с потоком (TThread) в Delphi 7, если я принудительно убью процесс, будет ли поток завершен или он будет продолжать работать?

Моя процедура execute выглядит так, как показано ниже, и если поток будет завершен, то он остановится. Но что если поток никогда официально не завершается?

procedure TJDApplicationThread.Execute;
var
  ST: Integer;
begin
  ST:= 5;
  fStop:= False;
  while (not Terminated) and (not fStop) do begin
    //----- BEGIN -----

    Synchronize(DoSync);

    //-----  END  -----
    //Sleep(1000 * ST);
  end;
end;