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
----------------------------------------------------------------------------