Unit Sercheng

============================================================== // Copyright (c) 1996 by Aaron Castro and VK Thakur. // Version 3.0 enhancements by Eric Engler. *) { Low-level string searching routines.

Classes

Functions

CompareStrings - Important! This is a recursive function.
GetMultiPat -
GetSinglePat -
IsPatternWild - True is returned if a wildcard appears anywhere in pattern, which is NULL terminated.
SetMultiPat - This is MUCH faster!
SetSinglePat -

Types

Constants

Variables


Functions


function CompareStrings(Target, Pattern: PChar; CaseSensitive: Boolean; UseWildCards: Boolean): boolean;

Important! This is a recursive function. Be wary of making off-the-cuff changes here.

function GetMultiPat: PChar;


function GetSinglePat: Char;


function IsPatternWild(pattern: PChar): Boolean;

True is returned if a wildcard appears anywhere in pattern, which is NULL terminated.

procedure SetMultiPat(MultiPat: PChar);

This is MUCH faster!

procedure SetSinglePat(SinglePat: Char);


Types


Constants


Variables