title: How do I stop a thread before it's finished running?
body: <p>I have a thread called TMyThread and I overrode the Execute procedure like this:</p>
  
  <pre><code> procedure TMyThread.Execute;
   Begin
       repeat
       //Some Work 
       Sleep(5000);
       //Some Work 2;
       Sleep(5000); 
       until FActive=False
   End;
  </code></pre>
  
  <p>In the main form I have button called 'Destroy My Thread'. I want to destroy my thread but the problem is that my thread will be destroyed only if it finish its work. I want to destroy my thread even it has not finished its work. How do I do this?</p>