OpenEuphoria

RichEdit Attributes Bold,..Underline: Alan Hollingsworth

• Posted by Antonio Alessi <a.admin at myway.it> Jul 03, 2006
• 557 views

Hi Alan,

about the routine that I posted on last April, 18 answering to your request,
I must fix a bug due to a quick conversion from my previous, that I have
debugged again just now. Hope this did not inconvenience you, since your
question was referred to the font attributes rather than to the text 
alignement, however the whole routine must be efficient.

Therefore the changes are:

if inRange( 4, 8, LOGchanged) then       -- i.e. 5,6,7; I use a single check
    < or >, not <= >=
font = {0, 6, 2}                     -- TA_LEFT = 0, TA_RIGHT = 2,
    TA_CENTER = 6,
    	setAlignment( id, font[LOGchanged -4])

If you still need some more help do not hesitate :)
antonio