I'm trying to understand how to "fix" gtwvt in 1.1 but the problem
seems "of design".
What I mean is that gtwvt 1.1 seems to use always the row, col and
then find the best font size.
In this way "hard" to define a given font of a given size and for example
seems impossible to use the font "Terminal".
If you try the test below using 1.0.1 and 1.1.0dev with values like:
15, 48, 140, "Courier New" or
8, 48, 140, "Terminal"
you'll see the difference.
Any comment?
best regards,
Lorenzo
#include "common.ch"
#include "hbgtinfo.ch"
procedure main( cFontSize, cRows, cCols, cFontName )
local nRows, nCols
default cFontSize to "15"
default cRows to "48"
default cCols to "140"
default cFontName to "Terminal"
clear screen
HB_GTInfo(HB_GTI_FONTNAME, alltrim(cFontName))
HB_GTInfo(HB_GTI_FONTSIZE, val(cFontSize))
if !setmode( val(cRows), val(cCols) )
setmode( 255, 255 )
endif
clear screen
nRows := maxrow()
nCols := maxcol()
alert( "maxrow()="+alltrim(str(nRows))+;
";maxcol()="+alltrim(str(maxcol(nCols)))+;
";font size="+alltrim(str(HB_GTInfo(HB_GTI_FONTSIZE)))+;
";Am I in centre?" )
return
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
