delphi xe7 中對數組操作做了很多擴充，比如加入了類似字元串處理的功能。
例如，數組相加
數組插入
數組删除
數組連接配接
為什麼在xe7 中要對數組做這麼大的變化呢，當然首先肯定是友善數組程式設計，其實更深層的原因是因為ansistring 在移動平台上的缺失，
很多過去的代碼，由于都是把byte 當作ansichar 處理的，到了移動平台上，這些代碼都跑不起來了。而且很難改造。
那麼隻有使用Tbytes 裡替換傳統的ansistring. 是以對數組操作增加了這麼多方法來解決這個傳統問題。
那現在問題來了，傳統的pos 功能卻沒加入，導緻大量的是使用pos 的操作無法改造。
不知道會在xe? 裡面加入？現在臨時的辦法就是自己做一個find(pos)函數來解決這個問題。
為了不與以後的pos 沖突，函數名就叫find, 功能是在一個數組裡面查找另一個數組，并傳回位置。
這樣就可以用這個替換原來的ansistring 的pos 操作了。