StrIComp

Z Delphi & Pascal (česká wiki)
Verze z 8. 10. 2012, 17:02, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (1 revízia: unit string)
(rozdíl) ← Starší verze | zobrazit aktuální verzi (rozdíl) | Novější verze → (rozdíl)
Skočit na navigaci Skočit na vyhledávání

Porovná dva řetězce bez ohledu na velikost písmen.

Deklarace
function StrIComp(Str1, Str2:PChar): Integer;
Režim
Windows, Reálný, Chráněný
Poznámky
StrIComp porovná Str1 se Str2 bez uvažování velikosti písmen. Vrácená hodnota je stejná jako StrComp.
Viz také
StrComp
StrLComp
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.