Guest
2012-02-03, 01:44 AM
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.
Code:
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 01:50 AM..