[Harbour] gtwvt 1.1 vs 1.0

[Pritpal Bedi]

Lorenzo

Me too is wondering what did change this behavior.

I will try to resolve it by this weekend.

Regards
Pritpal Bedi


Lorenzo Fiorini-2 wrote:
> 
> 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
> 

-- 
View this message in context: http://www.nabble.com/gtwvt-1.1-vs-1.0-tp20961135p20978308.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.