diff --git a/Configuration/GlobalAssemblyInfo.cs b/Configuration/GlobalAssemblyInfo.cs
index 284942c49..4ab2e947a 100644
--- a/Configuration/GlobalAssemblyInfo.cs
+++ b/Configuration/GlobalAssemblyInfo.cs
@@ -15,7 +15,7 @@ internal static class RevisionClass
public const string Major = "3";
public const string Minor = "7";
public const string Build = "1";
- public const string Revision = "2696";
+ public const string Revision = "2699";
public const string MainVersion = Major + "." + Minor;
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;
diff --git a/Configuration/Version.defs b/Configuration/Version.defs
index 28db5853d..f99847607 100644
--- a/Configuration/Version.defs
+++ b/Configuration/Version.defs
@@ -1,4 +1,4 @@
-%COREVERSION%=1
-%REVISION%=2696
%MINOR%=7
+%REVISION%=2699
+%COREVERSION%=1
%MAJOR%=3
diff --git a/Release/pabcversion.txt b/Release/pabcversion.txt
index c1152c955..ea5f27e0e 100644
--- a/Release/pabcversion.txt
+++ b/Release/pabcversion.txt
@@ -1 +1 @@
-3.7.1.2696
+3.7.1.2699
diff --git a/ReleaseGenerators/PascalABCNET_version.nsh b/ReleaseGenerators/PascalABCNET_version.nsh
index 822ca03ea..c53761085 100644
--- a/ReleaseGenerators/PascalABCNET_version.nsh
+++ b/ReleaseGenerators/PascalABCNET_version.nsh
@@ -1 +1 @@
-!define VERSION '3.7.1.2696'
+!define VERSION '3.7.1.2699'
diff --git a/TestSuite/CompilationSamples/GraphABC.pas b/TestSuite/CompilationSamples/GraphABC.pas
index b9ce087c7..8c6916351 100644
--- a/TestSuite/CompilationSamples/GraphABC.pas
+++ b/TestSuite/CompilationSamples/GraphABC.pas
@@ -3967,6 +3967,7 @@ begin
readbuffer := ed.Text + Environment.NewLine;
IOPanel.Invoke(SetIOPanelInVisible);
MainThread.Resume;
+ e.SuppressKeyPress := true;
end;
end;
diff --git a/VisualPascalABCNET/VisualPascalABCNET_40.csproj b/VisualPascalABCNET/VisualPascalABCNET_40.csproj
index f036ad7a6..a516aeeaf 100644
--- a/VisualPascalABCNET/VisualPascalABCNET_40.csproj
+++ b/VisualPascalABCNET/VisualPascalABCNET_40.csproj
@@ -130,7 +130,7 @@
AboutBox.cs
-
+
Form