Функция StrLIComp()

Модуль Strings

Сравнивает две строки до определенной позиции, не принимая во внимание разницу в регистрах.

Объявление:

Function StrLIComp(Str1, Str2 : PChar; MaxLen : Word) : Integer;

Режим:

Windows,  Protected,  Real

Замечание:

Функция StrLIComp сравнивает строку Str1 со строкой Str2 до заданной позиции MaxLen, не принимая во внимания разницу в регистрах. Возвращаемое значение - такое же, как и у функции StrComp.

Пример:

{StrComp.PAS}
 
 { Пример программы для функций StrComp и StrlComp }
 
 Uses Strings, WinCrt;
 
 Var   C : Integer;
  Result : PChar;
  S1, S2 : Array [0..79] Of Char;
 
 Begin
  ReadLn(S1);
  ReadLn(S2);
  C:=StrComp(S1, S2);
  If C < 0 Then Result:=' меньше, чем ' Else
  If C > 0 Then Result:=' больше, чем ' Else
                Result:=' равно ';
  WriteLn(S1, Result, S2);
End.