Prüfen, ob ein Text zugewiesen ist

[Der schöne Günther]

Ja, dieser gruselige Variablentyp

Delphi-Quellcode:

Text

.

Ich möchte prüfen, ob meine Anwendung in

Delphi-Quellcode:

System.Output

bereits auf einen gültigen Standard-Ausgabeweg zeigt oder nicht.

Mir fiele nur ein, testweise einmal ein WriteLn(..) zu machen und

• keine Exception: Ja
• Exception: Nein

Ich kann

Delphi-Quellcode:

System.Output

nicht mit

Delphi-Quellcode:

Assigned(System.Output)

oder

Delphi-Quellcode:

System.Output = 0

prüfen. Mir fällt nicht ein, mit was ich das überhaupt vergleichen könnte.

[sx2008]

Versuche mal die indirekte Prüfung über

Delphi-Quellcode:

if Windows.GetStdHandle(STD_OUTPUT_HANDLE {=-11}) = 0 then
  ShowMessage('no output handle');

[Der schöne Günther]

Danke, das bringt mich viel weiter!

PS: Intern mappt der Typ "Textfile" auf "System.TTextRec". Der hat auch die Eigenschaft Handle.

Ich habe alles was ich wissen wollte. Danke nochmal.