Question

Delphi如何获取一个字符串在另一个字符串中最后一次出现的位置？

Answer 1

Delphi(Pascal) code
uses StrUtils;function ReversePos(SubStr, S: String): Integer;var
i : Integer;begin
i := Pos(ReverseString(SubStr), ReverseString(S));if i>0then i := Length(S)- i- Length(SubStr)+2;
Result := i;end;

调用的例子:
Delphi(Pascal) code
ShowMessage (IntToStr(ReversePos('abc','abc123abc456')));

Delphi（专家调查法）一般指德尔菲法。

德尔菲法，也称专家调查法，1946 年由美国兰德公司创始实行。该方法是由企业组成一个专门的预测机构，其中包括若干专家和企业预测组织者，按照规定的程序，背靠背地征询专家对未来市场的意见或者判断，然后进行预测的方法。

德尔菲法本质上是一种反馈匿名函询法。其大致流程是：在对所要预测的问题征得专家的意见之后，进行整理、归纳、统计，再匿名反馈给各专家，再次征求意见，再集中，再反馈，直至得到一致的意见。其过程可简单表示如下：

匿名征求专家意见-归纳、统计-匿名反馈-归纳、统计……若干轮后停止。

由此可见，德尔菲法是一种利用函询形式进行的集体匿名思想交流过程。它有三个明显区别于其他专家预测方法的特点，即匿名性、多次反馈、小组的统计回答。