Otevřít hlavní menu

StrLComp

Porovná dva řetězce, a to až do maximální délky.

Deklarace
function StrLComp(Str1, Str2: PChar; MaxLen: Word): Integer;
Režim
Windows, Reálný, Chráněný
Poznámky
StrLComp porovná Str1 se Str2 ,a to až do maximální délky MaxLen znaků. Vrácená hodnota je stejná jako StrComp.
Viz také
StrComp
StrIComp
StrLIComp


Vzorový příklad

{StrLComp.PAS}
{Vzorový příklad pro funkci StrLComp.}
{ Pro Windows: }
{ uses Strings, WinCrt; }
uses Strings;
var
  Result: PChar;
  S1, S2: array[0..79] of Char;
begin
  Readln(S1);
  Readln(S2);
  if StrLComp(S1, S2, 5) = 0 then
    Result := 'shodných'
  else
    Result := 'rozdílných';
  Writeln('Prvních pět znaků je ', Result);
end.