bestimmte Wörter im Memo suchen

[delphiUser88]

Hallo marabu

PosEx und AnsiContainsText geht bei meinen Delphi nicht (D5 Standard) könnte aber auch (Firma) D5 Enterprise benutzen Ich habe die PosEx Funktion hier aus dem Forum schon eingebunden fehlt nur noch die AnsiContainsText

Delphi-Quellcode:

function PosEx(const SubStr, S: string; Offset: integer): integer;
begin
  Result := Pos(SubStr, Copy(S, OffSet, Succ(Length(S) - OffSet)));
  if Result > 0 then Result := Result + Pred(Offset);
end

MFG: DelphiUser