Odd word wrap problem for past year fixed

4 views
Skip to first unread message

John Bridges

unread,
Jul 1, 2012, 8:28:51 PM7/1/12
to after...@googlegroups.com
New build of AfterGRASP is up for download:

http://www.aftergrasp.com/download/

agsetup_20120701.exe

----------------------------------------------------------------------------
Sun, 01 July 2012

Fixed an unusual bug with HTML text not wrapping correctly all the time.
Sometimes the first letter of a word would be left on the previous line.
Bug was introduced in August 7th 2011 build as part of the complex tags
wrapping fix (more complex unget code).

----------------------------------------------------------------------------
Wed, 27 June 2012

Bug in WINEXTTEXTOUT which was using a all zeros width table if no
width table is given. Fixed.

Here is a runable example:

drawclear white
text " "              ; force correct text drawing mode in windows
   
local fontobj WinCreateFontIndirect(-30 0 2700 2700 400 0 0 0 1 0 0 0 0 "CorpoS")
WinSelectObject @fontobj
winSetTextColor 0
beginloop 10
        winexttextout @loop*50 200 0 "TEST"$@loop
endloop
windowupdate
forever

----------------------------------------------------------------------------
Mon, 25 June 2012

FILEEND command now supports, returns TRUE (non zero) if end of file
has been reached.

Finally added because I needed it to update an old 16bit utility written
in GLPRO to run on x64 Win7. It takes in two lists of filenames, and
renames all those with new names.

    drawCLEAR white
    color black

    set fs1 fileopen(@1)
    set fs2 fileopen(@2)
    if (@fs1<1 || @fs2<1)
        exit
    endif
    while !fileend(@fs1)&&!fileend(@fs2)
        set fn1 filereadln(@fs1)
        set fn2 filereadln(@fs2)
        if @fn1!=@fn2
            textln @quote$@fn2$@quote
            filerename @fn1 @fn2
        endif
    endwhile
    fileclose @fs1
    fileclose @fs2


----------------------------------------------------------------------------

Reply all
Reply to author
Forward
0 new messages