View Single Post
PS for existing formatting which does not correspond to predictable word or character boundaries, it may be useful to inspect/change properties of attribute runs.

tell application id "OGfl"
	tell front window
		tell its canvas
			set oShape to item 1 of shapes
			set refText to a reference to text of oShape
			set color of attribute run 2 of refText to {0, 0, 65535}
		end tell
		set zoom to zoom * 0.99
	end tell
end tell
PPS a peculiar quirk of the screen-updating bug: if you subseqently revert to the original zoom level, you will sometimes find that it still displays the previous state of formatting ...

(A save and reopen will fix it).


Last edited by RobTrew; 2012-02-03 at 02:50 AM..