StrScan

Z Delphi & Pascal (česká wiki)
Verze z 8. 10. 2012, 16:56, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (Vytvorená stránka „Vrací ukazatel na první výskyt znaku v řetězci. ;Deklarace function StrScan(Str: PChar; Chr: Char): PChar; ;Režim :Windows, Reálný, Chráněný ;Návratová ...“)
(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í

Vrací ukazatel na první výskyt znaku v řetězci.

Deklarace
function StrScan(Str: PChar; Chr: Char): PChar;
Režim
Windows, Reálný, Chráněný
Návratová hodnota
0, jestliže Chr není obsažen v Str
Poznámky
StrScan vrací pointr na první výskyt Chr v Str. Jestliže Chr se v Str nevyskytuje, StrScan vrátí nil. Nulový ukončovací znak se považuje za součást řetězce.
Viz také
StrRScan


Vzorový příklad

{StrScan.PAS}
{Vzorový příklad pro funkci StrScan.}
{ Vrací TRUE, pokud jméno souboru obsahuje expanzní znaky }
{ Pro Windows: }
{ uses WinCrt, Strings; }
uses Strings;
function HasWildcards(FileName: PChar): Boolean;
begin
  HasWildcards := (StrScan(FileName, '*') <> nil) or
    (StrScan(FileName, '?') <> nil);
end;
begin
   Writeln ('Má expanzní znaky: ', HasWildCards('C:Test.*'));
end.