怎样判断Memo中的最后一个字符是不是'。'?

怎样判断Memo中的最后一个字符是不是'。'?????? 在线等
如题??

------解决方案--------------------
if Memo1.Text[Length(Memo1.Text)-1]+Memo1.Text[Length(Memo1.Text)]= '。 '
then showmessage( '是 ') else showmessage( '不是 ');