Entwickler-Ecke

Sonstiges (Delphi) - Debugsausgaben bei FireMonkey-App


sashs - So 01.04.12 14:40
Titel: Debugsausgaben bei FireMonkey-App
Hallo,

wie ist es möglich bei einer FireMonkey-App Debug-Ausgaben auf der Konsole zu machen?
Ich habe es mit WriteLn gemacht und da habe ich einen E/A-Fehler erhalten.

Gruß

Sascha


Martok - So 01.04.12 20:41

Frage: welche Konsole?

Wenn du die Debug-Console meinst, sollte OutputDebugString funktionieren.
Wenn du eine eigene brauchst, musst du die per AllocConsole eine erstellen und dann die passenden Handles verdrahten:

Delphi-Quelltext
1:
2:
3:
4:
5:
  if AllocConsole then begin
    TTextRec(Input).Handle:= GetStdHandle(STD_INPUT_HANDLE);
    TTextRec(Output).Handle:= GetStdHandle(STD_OUTPUT_HANDLE); // der ist für einfaches Writeln wichtig
    TTextRec(ErrOutput).Handle:= GetStdHandle(STD_ERROR_HANDLE);
  end;