IndexOf case sensitive / Performance verbessern

[himitsu]

in D7 sind Find und IndexOf auch als Virtual ... falls es das bei dir ebenfalls ist, dann am Besten wohl Finde überschreiben

Delphi-Quellcode:

public
  function Find(const S: string; var Index: Integer): Boolean; override;