StrLComp: Porovnání verzí

Z Delphi & Pascal (česká wiki)
Skočit na navigaci Skočit na vyhledávání
(Vytvorená stránka „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...“)
(Žádný rozdíl)

Verze z 8. 10. 2012, 16:53

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.