The Omni Group Forums - View Single Post - Working with the Text of a Shape in OmniGraffle

RobTrew

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

--