Ausgabe auf "Pseudoconsole" umleiten

[MaBuSE]

Zitat von Bernhard Geyer:

Jedoch möchte ich für Fehlersuche nicht jedesmal meine Anwendung als Consolenapplikation kompilieren.

Brauchst Du doch gar nicht.

Wenn Du eine Console brauchst, dann erzeug dir eine.
Wenn Du sie nicht mehr brauchst, entferne sie wieder.

Dieses Consolenfenster sollte auch Deine Java Dingens erkennen

z.B.:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  AllocConsole;
  SetConsoleTitle('Debug Ausgaben');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  FreeConsole;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
  if GetConsoleCP <> 0 then
  begin
    WriteLn('Das ist ein Log');
  end;
end;