2
0
Эх сурвалжийг харах

* CrtCtrlBreakHandler may not be invoked for Ctrl-C on certain platforms (Win32/Win64) - made conditional (preparation for future use as platform independent include file)

git-svn-id: trunk@35053 -
Tomas Hajny 8 жил өмнө
parent
commit
7956cb5d48

+ 6 - 0
packages/rtl-console/src/inc/crt.inc

@@ -402,11 +402,17 @@ begin
   if CtrlBreak then
     CrtCtrlBreakHandler := not (CheckBreak)
   else (* Ctrl-C pressed *)
+{$IFDEF FPC_CRT_CTRLC_TREATED_AS_KEY}
+ (* If Ctrl-C is really treated as a key, the following branch should never *)
+ (* be executed, but let's stay on the safe side and ensure predictability. *)
+   CrtCtrlBreakHandler := false;
+{$ELSE FPC_CRT_CTRLC_TREATED_AS_KEY}
     begin
       if not (SpecialKey) and (ScanCode = 0) then
         ScanCode := 3;
       CrtCtrlBreakHandler := true;
     end;
+{$ENDIF FPC_CRT_CTRLC_TREATED_AS_KEY}
 end;