请问大神们如何推敲规律？

现有这样一些数据产生，而这些数据在一定时间里会自动变换，而变换后都有一定排列规律的，请问在Delphi语言如何能自动找出这些排列规律？？求大牛们慷概解囊送出代码，感激流涕！！假设第一次是产生如下情况：
==================================
香蕉
橙子
鸭梨
香蕉
芒果
荔枝
西柚
苹果
香瓜
提子
香蕉
李子
布林
香蕉
蜜瓜
提子
西柚
柠檬
龙眼
榴莲
香蕉
橙子
香蕉
石榴
蜜瓜
香蕉
橙子
香蕉
西柚
香蕉
香瓜
提子
香蕉
李子
布林
香蕉
蜜瓜
提子
西柚
柠檬
龙眼
榴莲
…
================================
希望能找出排列的共通点以文字表达为： 
第一个【香蕉】和第二隔【香蕉】相隔了2行，在第二隔【香蕉】之后第三行是【西柚】。假如再一次变换数据如下：
==================================
芒果
橙子
鸭梨
提子
西柚
柠檬
橙子
石榴
香瓜
石榴
蜜瓜
香蕉
苹果
石榴
蜜瓜
橙子
橙子
香蕉
柠檬
龙眼
橙子
香蕉
石榴
蜜瓜
香蕉
苹果
香瓜
提子
香蕉
李子
香蕉
橙子
鸭梨
香蕉
芒果
荔枝
橙子
苹果
香瓜
提子
香蕉
苹果
…
======================================
希望能找出排列的共通点以文字表达为： 
第一个【橙子】和第二隔【橙子】相隔了4行，在第二隔【橙子】之后第五行是【苹果】。如此按照每一次变化而找出共同特征出来。
请大牛们高台贵手帮帮忙，谢谢！！