Ausgabe an Konsole, von der GUI gestartet wurde

**iphi**

Hallo,

ich möchte mein GUI Programm auch als Konsolenanwendung laufen lassen können, falls es aus einer Konsole gestartet wird. Letzteres kann ich mit GetStdHandle abfragen. Wie aber kann ich dann an diese Konsole Text ausgeben?

So gehts jedenfalls nicht:

markieren

Delphi-Quellcode:

			...

  if GetStdHandle(Std_Output_Handle)<>0 then

    begin

      Windows.MessageBox(0, 'Is Console', nil, MB_OK);

      writeln('Hello World');

    end else

      Windows.MessageBox(0, 'NO Console', nil, MB_OK);

...

Der writeln produziert einen Error 105. Weiß jemand Rat?

Ausgabe an Konsole, von der GUI gestartet wurde

Ausgabe an Konsole, von der GUI gestartet wurde

Forumregeln