function CompareStrings(const S1: string; const S2: string): Integer; override;