Delphi in a Nutshell

Name

IsConsole Variable

Syntax

var IsConsole: Boolean;

Description

Delphi sets IsConsole to True in a console application or False in a GUI application. You can test IsConsole before trying to read from Input or write to Output.

Example

// Report an error.
procedure ErrorHandler(Code: Integer; Addr: Pointer);
var
  ErrorMessage: string;
begin
  ErrorMessage := Format('Error %d at $%p', [Code, Addr]);
  if IsConsole then
    WriteLn(ErrorMessage)
  else
    ShowMessage(ErrorMessage);
  Halt(Code);
end;

See Also

Input Variable, Output Variable, $AppType Compiler Directive