StrRScan

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

Deklarace

function StrRScan(Str: PChar; Chr: Char): PChar;

Režim

Windows, Reálný, Chráněný

Návratová hodnota

Vrací ukazatel na poslední výskyt znaku Chr v řetězci Str.

nil, jestliže Chr není obsažen v Str

Poznámky

StrRScan vrací pointr na poslední výskyt Chr v Str. Jestliže Chr se v Str nevyskytuje, StrRScan vrátí nil. Nulový ukončovací znak se považuje za součást řetězce.

Viz také

StrScan

Vzorový příklad

{StrRScan.PAS}
{Vzorový příklad pro funkci StrRScan.}
{ Vrací ukazatel na prosté jméno souboru v úplne cestě }
{ Pro Windows: }
{ uses Strings, WinCrt; }
uses Strings;
function NamePart(FileName: PChar): PChar;
var
  P: PChar;
begin
  P := StrRScan(FileName, );
  if P = nil then
  begin
    P := StrRScan(FileName, ':');
    if P = nil then P := FileName;
  end;
  NamePart := P;
end;
begin
   Writeln (NamePart('C:Test.fil'));
end.