Konsole beenden

[SleepyMaster]

Naja, aber was wenn er es nicht aus der Hauptprocedure machen will??

Delphi-Quellcode:

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;

procedure KA;
begin
  exit; 
//halt;
end;

begin
  KA;
  Readln;
end.

Oder aus nem anderen Thread aus? Da kann man dann doch nur das Halt verwenden oder aber TerminateProcess.