s1:=memo1.texts2:memo2.textif comparestr(s1,s2) = 0 thenshowmessage('重复')elseshowmessage('不重复')
如果判断完全一致,可以直接比较。 用 "=" 就成。COMP的命令用过吧?找到文件的不同之外,如果是这样的需求,可以参照这个原理。其对二进制字符进行比较,您的应用,可以对字符/字串进行操作。