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:
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?