set ReplaceName to ".0" as Unicode text
set ImgHeight to my ReplaceText((GetImgHeight as Unicode text), ReplaceName, "") as Unicode text
set ImgWidth to my ReplaceText((GetImgWidth as Unicode text), ReplaceName, "") as Unicode text



to ReplaceText(theText, orgStr, newStr)
	set oldDelim to AppleScript's text item delimiters
	set AppleScript's text item delimiters to orgStr
	set tmpList to every text item of theText
	set AppleScript's text item delimiters to newStr
	set tmpStr to tmpList as text
	set AppleScript's text item delimiters to oldDelim
	return tmpStr
end ReplaceText