Hi Przemek,

Thanks, I just verified it.

Well, the screen res is now set to max which can fit
using default font size (or something similar), which
is okay, but now a new weird effect came to play: When
I requested SetMode( 300, 80 ) at startup, the screen
got resized to about 48 x 130, and it seems that my
CUI "desktop" window remained at 300 x 80. On the other
hand MaxRow/Col(.T.) seems to return 48 x 130, as the
extra windows are centered right. [ I didn't put
traces in my app, so these are based on guessing by the
appearance of the app without code changes. It might
be wrong conclusion, even expected behavior given my app
code. Anyway I wanted to share. ]

Brgds,
Viktor

On 2009 Oct 7, at 11:24, [email protected] wrote:

Revision: 12666
         
http://harbour-project.svn.sourceforge.net/harbour-project/?rev=12666&view=rev
Author:   druzus
Date:     2009-10-07 09:24:14 +0000 (Wed, 07 Oct 2009)

Log Message:
-----------
2009-10-07 11:23 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
 * harbour/source/rtl/gtwvt/gtwvt.c
* check if startup (default or user (SetMode())) console window dimensions do not exceed screen size and if yes then reduce the initial number of
     console window rows and cols to the screen size also in
     HB_GTI_RESIZEMODE_FONT mode.

Modified Paths:
--------------
   trunk/harbour/ChangeLog
   trunk/harbour/source/rtl/gtwvt/gtwvt.c

Modified: trunk/harbour/ChangeLog
===================================================================
--- trunk/harbour/ChangeLog     2009-10-07 08:48:05 UTC (rev 12665)
+++ trunk/harbour/ChangeLog     2009-10-07 09:24:14 UTC (rev 12666)
@@ -17,6 +17,13 @@
   past entries belonging to author(s): Viktor Szakats.
*/

+2009-10-07 11:23 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/source/rtl/gtwvt/gtwvt.c
+ * check if startup (default or user (SetMode())) console window dimensions + do not exceed screen size and if yes then reduce the initial number of
+      console window rows and cols to the screen size also in
+      HB_GTI_RESIZEMODE_FONT mode.
+
2009-10-07 10:47 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
  * utils/hbmk2/hbmk2.prg
  * config/global.mk

Modified: trunk/harbour/source/rtl/gtwvt/gtwvt.c
===================================================================
--- trunk/harbour/source/rtl/gtwvt/gtwvt.c 2009-10-07 08:48:05 UTC (rev 12665) +++ trunk/harbour/source/rtl/gtwvt/gtwvt.c 2009-10-07 09:24:14 UTC (rev 12666)
@@ -731,6 +731,8 @@
height = ( ( int ) ( pWVT->PTEXTSIZE.y * pWVT->ROWS ) ) + borderHeight;

SetWindowPos( pWVT->hWnd, NULL, 0, 0, width, height, SWP_NOZORDER | SWP_NOMOVE );
+            if( width > maxWidth || height > maxHeight )
+               hb_gt_wvt_FitRows( pWVT );
         }

HB_GTSELF_EXPOSEAREA( pWVT->pGT, 0, 0, pWVT->ROWS, pWVT- >COLS );


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to