Class TmSearcher (unit mwPasTokenList)

Inherits from

Tobject

Constructors


constructor Create(Value: TPasTokenList);

Remove


Functions

procedure Add(aPosition: Integer);

GetCount

destructor Destroy;

Create

procedure FillClassList;

Add

procedure FillInterfaceList;

FillClassList

procedure FillMethodList;

FillInterfaceList

function GetImplementationsIndex: LongInt;

Retrive

function GetMethodImplementation(aClassName, aMethodIdentifier: String): LongInt;

GetImplementationsIndex

function GetMethodImpLine(aClassName: String; aMethodIdentifier: String): LongInt;

GetMethodImplementation

procedure Init(NewPattern: String);

GetFinished

function Next: Integer;

Init

procedure Retrive(aToken: String);

FillMethodList

function GetCount: Integer;

GetItems

function GetFinished: Boolean;

Destroy

function GetItems(Index: integer): Integer;

Next

Properties

property Count : Integer


property Finished : Boolean


property Found : Boolean


property Items : Integer


property Position : Integer


Events

Variables

ClassList : TLongIntList;


ImplementationsList : TLongIntList;


InterfaceList : TLongIntList;


MethodList : TLongIntList;


PatLen : Integer;


CompTable : array[#0..#255] of byte;


fFinished : Boolean;


fFound : Boolean;


FFoundList : TLongIntList;


FPasTokenList : TPasTokenList;


fPos : Integer;


fPosition : Integer;


FSearchOrigin : PChar;


HalfLen : Integer;


Pat : String;


PatLenPlus : Integer;


SearchLen : Integer;


Shift : array[0..255] of Integer;



Constructors


constructor Create(Value: TPasTokenList);

Remove


Functions


procedure Add(aPosition: Integer);

GetCount


destructor Destroy;

Create


procedure FillClassList;

Add


procedure FillInterfaceList;

FillClassList


procedure FillMethodList;

FillInterfaceList


function GetImplementationsIndex: LongInt;

Retrive


function GetMethodImplementation(aClassName, aMethodIdentifier: String): LongInt;

GetImplementationsIndex


function GetMethodImpLine(aClassName: String; aMethodIdentifier: String): LongInt;

GetMethodImplementation


procedure Init(NewPattern: String);

GetFinished


function Next: Integer;

Init


procedure Retrive(aToken: String);

FillMethodList


function GetCount: Integer;

GetItems


function GetFinished: Boolean;

Destroy


function GetItems(Index: integer): Integer;

Next


Properties


property Count : Integer


property Finished : Boolean


property Found : Boolean


property Items : Integer


property Position : Integer


Events


Variables


ClassList : TLongIntList;


ImplementationsList : TLongIntList;


InterfaceList : TLongIntList;


MethodList : TLongIntList;


PatLen : Integer;


CompTable : array[#0..#255] of byte;


fFinished : Boolean;


fFound : Boolean;


FFoundList : TLongIntList;


FPasTokenList : TPasTokenList;


fPos : Integer;


fPosition : Integer;


FSearchOrigin : PChar;


HalfLen : Integer;


Pat : String;


PatLenPlus : Integer;


SearchLen : Integer;


Shift : array[0..255] of Integer;