tell application id "OGfl"
	set lstSeln to selection of front window
	set oShape to item 1 of lstSeln
	tell canvas of front window
		tell oShape to set {thickness, draws shadow} to {3, false}
		--set properties of oShape to {thickness:4, draws shadow:true}
		--set text of oShape to "Sample"
		--properties of oShape
	end tell
end tell