摘要:
Delphi源代码下载{说明 LD(s,t:WideString):Integer 返回两个字符串的编辑长D= 编辑长L = 字符串中最长串的长度,当L=0时,L取1两个字符串的相似度=1 -D / L , 区间在0~1之间,0表示不相似,1表示完全相同}unit LDA;{Levenshtein Distance Algorithm}interfacefunction LD(s,t:WideString):Integer;implementationfunction Minimum(a,b,c:Integer):Integer;begin Result:=a; if b<Result 阅读全文