From 6d202694fc05d7f2e1396fceab49702ab28906c7 Mon Sep 17 00:00:00 2001 From: HemulGM Date: Wed, 29 Apr 2026 09:44:20 +0500 Subject: [PATCH] Fix inc --- src/System.Console.InternalTypes.pas | 2 ++ src/System.Console.Windows.pas | 1 - 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/src/System.Console.InternalTypes.pas b/src/System.Console.InternalTypes.pas index 1173aec..a5cddf6 100644 --- a/src/System.Console.InternalTypes.pas +++ b/src/System.Console.InternalTypes.pas @@ -2,6 +2,8 @@ interface +{$I 'System.Console.inc'} + uses System.Types, System.Classes, diff --git a/src/System.Console.Windows.pas b/src/System.Console.Windows.pas index 6ea1274..42bed90 100644 --- a/src/System.Console.Windows.pas +++ b/src/System.Console.Windows.pas @@ -629,7 +629,6 @@ function TWindowsConsole.GetTreatControlCAsInput: boolean; var mode: DWORD; begin - Result := false; if FStdIn = INVALID_HANDLE_value then raise EInvalidOperation.Create('No console available'); Mode := 0;