delphi - 如何搜索相似词

Question

我有一个记录文件，我需要制作一个程序，通过在搜索字段中键入一个词来帮助找到该记录中的任何词。记录文件包含一个单词列表，因此我需要搜索该列表以找到可能与我的单词相似的单词。

我正在使用 Delphi 2007

Answer 1

Delphi 2007 在StrUtils 中应该有一些字符串匹配例程，它们使用Soundex 算法来查找相似的“读音”单词。根据文件的格式，您可以将其加载到 TStringList 中，然后在输入字段的 OnChange 事件处理程序中调用一个例程，该例程遍历列表并与用户输入和列表中的每个条目执行 soundex 比较.

查看 ResemblesText、SoundexCompare、SoundexProc 和 SoundexSimilar。其中之一应该可以让您继续前进。