Hi Dragan,
What happens if you run this code in VFP7 SP1?
Tracy
>>I am trying to convert reports from FP DOS and cannot find a font that will still allow me to have 132 columns, be readable, and be able to be distributed to 300 clients. Any thoughts?
>
>In VFP 5.0 I have tweaked the converter to detect the line width in the report, and use Arial Narrow (which was somehow available by default in the W98 distribution at the time - I don't see it that often anymore). Anyway, the fix is in the procedure AllEnviron, at about 15th line - I've included few lines before and after it, so here it is:
>
>
IF objtype = c_otheader OR (m.g_filetype = c_label AND objtype = c_ot20label)
> m.g_windheight = HEIGHT
> m.g_windwidth = WIDTH
> do case
> case m.g_windwidth>97
> m.g_dfltFFace="Arial Narrow"
> m.g_dfltFSize=9
> case m.g_windwidth>81
> m.g_dfltFFace="Arial"
> m.g_dfltFSize=9
> endcase
> m.g_rptlinesize = (FONTMETRIC(1, m.g_rptfface, m.g_rptfsize, m.g_rpttxtfontstyle) / m.g_pixelsize) * 10000
> m.g_rptcharsize = (FONTMETRIC(6, m.g_rptfface, m.g_rptfsize, m.g_rpttxtfontstyle) / m.g_pixelsize) * 10000
>
>This goes into transprt.prg; I think it's still called the same and it should be somewhere in the Convert subdirectory below home().
.·*´¨)
.·`TCH
(..·*
010000110101001101101000011000010111001001110000010011110111001001000010011101010111001101110100
"When the debate is lost, slander becomes the tool of the loser." - Socrates
Vita contingit, Vive cum eo. (Life Happens, Live With it.)
"Life is not measured by the number of breaths we take, but by the moments that take our breath away." -- author unknown
"De omnibus dubitandum"