StartsStr関数,EndsStr関数

プログラムの作成中にHelpを眺めていてたまたま目についた関数

StartsStrは、ある文字列が指定したサブ文字列で始まるかをチェックする関数
EndsStrは、ある文字列が指定したサブ文字列で終わるるかをチェックする関数
ともに大文字小文字は別物として扱います。

上記のようなチェックを大文字小文字区別しないで行う関数もあり、
それぞれ、StartsText,EndsTexstです。

以下、サンプル

view plainprint?

1. WriteLn('大文字小文字区別して比較');  
2.       if StartsStr('so','So What ?') then  
3.       begin  
4.        WriteLn('はじまるよ')  
5.       end  
6.       else  
7.       begin  
8.        WriteLn('はじまらない')  
9.       end;  
10.   
11.       WriteLn('大文字小文字区別なしに比較');  
12.       if StartsText('so','So what ?') then  
13.       begin  
14.        WriteLn('はじまるよ')  
15.       end  
16.       else  
17.       begin  
18.        WriteLn('はじまらない')  
19.       end;  

WriteLn('大文字小文字区別して比較');
      if StartsStr('so','So What ?') then
      begin
       WriteLn('はじまるよ')
      end
      else
      begin
       WriteLn('はじまらない')
      end;

      WriteLn('大文字小文字区別なしに比較');
      if StartsText('so','So what ?') then
      begin
       WriteLn('はじまるよ')
      end
      else
      begin
       WriteLn('はじまらない')
      end;

でも、これらの関数っていつからあったのだろうか？
手元の環境で調べたところ少なくともDelphi2007には
あったようだけど