Wie herausbekommen, ob Konsolen-Dateiumleitung aktiv ist ?

[shmia]

Gut. Dann hier noch für's Archiv und evtl. für die Code-Library:

Delphi-Quellcode:

function IsConsoleOutputRedirected:Boolean;
var
  Mode:DWORD;
begin
  Result := GetConsoleMode(GetStdHandle(STD_OUTPUT_HANDLE), Mode);
end;

function IsConsoleInputRedirected:Boolean;
var
  Mode:DWORD;
begin
  Result := GetConsoleMode(GetStdHandle(STD_INPUT_HANDLE), Mode);
end;