--- ---

If at any point you wish to terminate a process instantly then you should take a look at the TerminateProcess function in Windows SDK (Software Developer Kit) help which comes with Delphi.

TerminateProcess function is defined as

    BOOL TerminateProcess(
      HANDLE hProcess, // handle to the process
      UINT uExitCode   // exit code for the process
    );

Parameters information according to Delphi Help

hProcess
  Identifies the process to terminate.
  Windows NT: The handle must have PROCESS_TERMINATE access. For more information, see Process Objects (in Windows SDK Help).
uExitCode
  Specifies the exit code for the process and for all threads terminated as a result of this call. Use the GetExitCodeProcess function to retrieve the process's exit value. Use the GetExitCodeThread function to retrieve a thread's exit value.

Create a new VCL application, add a button, double-click that button and add the following code:

    procedure TForm1.Button1Click(Sender: TObject);
    begin
      TerminateProcess(GetCurrentProcess, 0);
    end;

Your application should terminate instantly.