Missing IndexText function from Delphi
Original Reporter info from Mantis: rd0x
-
Reporter name:
Original Reporter info from Mantis: rd0x
- Reporter name:
Description:
There is a IndexStr function which is equivalent to Delphi's IndexStr.
But the case insenstive IndexText function from Delphi is missing in FPC.
Error: Identifier not found "IndexText"
Steps to reproduce:
Program IndexText_missing;
{$MODE DelphiUnicode}
uses StrUtils;
var
Input: string = 'test2';
ArrayOfString: array[0..2] of String = ('Test1', 'test2', 'test3');
begin
// this one is already there
if IndexStr(Input, ArrayOfString) > -1 then
writeln('Hello World!');
// this one is missing
if IndexText(Input, ArrayOfString) > -1 then
writeln('Hello World!');
end.
Mantis conversion info:
- Mantis ID: 33079
- Version: 3.0.2
- Fixed in version: 3.1.1
- Fixed in revision: 38062 (#a94ebf00)
- Target version: 3.2.0