standard error output in D4/5?

[himitsu]

Tachchen,

in D7 is ja folgende Variable in der SystemUnit definiert,
Var ErrOutput: Text; allerdings ist diese noch nicht unter D4 verfügbar
und ich konnte auch keinen Ersatzt finden. -.-''

Was soll ich denn jetzt machen?

Bräuchte es für diese Zeilen:

Code:

If @F = @[b]ErrOutput[/b] Then F.Handle := [b]GetStdHandle(STD_ERROR_HANDLE)[/b]
Else F.Handle := [b]GetStdHandle(STD_OUTPUT_HANDLE)[/b];

Im Notfall (wenn es nichts gibt) würde ich wohl STD_OUTPUT_HANDLE (ohne Abfrage) verwenden können ... hoff ich mal.


MbD Frank