another problem that I solved wasting a lot of cycles, do you have a better one?
I need to use the bigger font available to fit all the text inside the field.
Code: Select all
put true into ttt
put 1 into t2
repeat while ttt
add 1 to t2
set the textsize of field "presentazione" to t2
if the formattedheight of field "presentazione" > the height of field "presentazione" then
put false into ttt
set textsize of field "presentazione" to (t2 - 1)
end if
end repeat