From eb65ad9c48fc1d0315aa35bb1af0b079b755b87b Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Sat, 11 Dec 2010 10:18:16 +0000 Subject: [PATCH] 2010-12-11 11:15 UTC+0200 Viktor Szakats (harbour.01 syenar.hu) * src/rtl/gtwin/gtwin.c + Added HB_GTI_PALETTE support to GTWIN for all non-msvc compilers. (solution is hackish so it may need revision as future non-msvc, non-watcom compiler versions implement this feature in their own WinAPI headers. --- harbour/ChangeLog | 8 ++++++++ harbour/src/rtl/gtwin/gtwin.c | 18 ++++++++++++++++++ 2 files changed, 26 insertions(+) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index feda4d5934..d5aa61cb0a 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,14 @@ The license applies to all entries newer than 2009-04-28. */ +2010-12-11 11:15 UTC+0200 Viktor Szakats (harbour.01 syenar.hu) + * src/rtl/gtwin/gtwin.c + + Added HB_GTI_PALETTE support to GTWIN for all non-msvc + compilers. + (solution is hackish so it may need revision as future + non-msvc, non-watcom compiler versions implement this + feature in their own WinAPI headers. + 2010-12-11 01:14 UTC+0200 Viktor Szakats (harbour.01 syenar.hu) * INSTALL + Minor detail to HB_BUILD_WINUNI. Moved it's position towards diff --git a/harbour/src/rtl/gtwin/gtwin.c b/harbour/src/rtl/gtwin/gtwin.c index 5a93c930eb..4a32205262 100644 --- a/harbour/src/rtl/gtwin/gtwin.c +++ b/harbour/src/rtl/gtwin/gtwin.c @@ -111,6 +111,24 @@ # if !defined( HB_GTWIN_USE_PCONSOLEINFOEX ) # define HB_GTWIN_USE_PCONSOLEINFOEX # endif +#else +# if ! defined( __WATCOMC__ ) || ( __WATCOMC__ < 1280 ) + typedef struct _CONSOLE_SCREEN_BUFFER_INFOEX + { + ULONG cbSize; + COORD dwSize; + COORD dwCursorPosition; + WORD wAttributes; + SMALL_RECT srWindow; + COORD dwMaximumWindowSize; + WORD wPopupAttributes; + BOOL bFullscreenSupported; + COLORREF ColorTable[ 16 ]; + } CONSOLE_SCREEN_BUFFER_INFOEX, * PCONSOLE_SCREEN_BUFFER_INFOEX; +# endif +# if !defined( HB_GTWIN_USE_PCONSOLEINFOEX ) +# define HB_GTWIN_USE_PCONSOLEINFOEX +# endif #endif #ifndef MOUSE_WHEELED