Make TVision build on Windows XP and preserve default behavior of Windows Vista.

Author: guilt

source/CMakeLists.txt

@@ -59,13 +59,14 @@ if (TV_USE_STATIC_RTL) # Implies MSVC
 endif()
 
 if (WIN32)
+    # Windows XP is the minimum supported version. Default is Windows Vista.
+    set(TV_WIN_VER "0x600" CACHE STRING   "Turbo Vision: Windows version")
     target_compile_definitions(${PROJECT_NAME} PUBLIC
         _CRT_NONSTDC_NO_WARNINGS
         _CRT_SECURE_NO_WARNINGS
     )
     target_compile_definitions(${PROJECT_NAME} PRIVATE
-        # Windows Vista is the minimum supported version.
-        _WIN32_WINNT=0x0600
+        _WIN32_WINNT=${TV_WIN_VER}
     )
 endif()
 

source/platform/win32con.cpp

@@ -81,6 +81,7 @@ Win32ConsoleAdapter &Win32ConsoleAdapter::create() noexcept
             // "A monospace bitmap font has all of these low-order bits clear".
             return !(family & (TMPF_FIXED_PITCH | TMPF_VECTOR | TMPF_TRUETYPE | TMPF_DEVICE));
         };
+#if _WIN32_WINNT > 0x600
         if ( GetCurrentConsoleFontEx(con.out(), FALSE, &fontInfo)
              && isBitmap(fontInfo.FontFamily) )
         {
@@ -101,6 +102,7 @@ Win32ConsoleAdapter &Win32ConsoleAdapter::create() noexcept
                     break;
             }
         }
+#endif
     }
     WinWidth::reset();
     auto &display = *new Win32Display(con, supportsVT);

source/tvision/textview.cpp

@@ -248,3 +248,9 @@ otstream::otstream( TTerminal *tt ) :
     ostream(tt)
 {
 }
+
+#if defined(_WIN32_WINNT) && (_WIN32_WINNT < 0x600)
+#if !defined(__GNUC__) || (defined(__GNUC__) && (__GNUC__ <= 8))
+#include "ttprvlns.cpp"
+#endif
+#endif

source/tvision/ttimerqu.cpp

@@ -8,6 +8,8 @@ static TTimePoint systemTimeMs()
     return THardwareInfo::getTickCount()*55;
 #elif defined( __BORLANDC__ )
     return GetTickCount();
+#elif defined(_WIN32_WINNT) && (_WIN32_WINNT < 0x600)
+    return GetTickCount();
 #else
     return GetTickCount64();
 #endif