Class TBiancoSearchList (unit T_SearchList)

Inherits from

TListBox

\\\\\///// / _ _ \ (| (.) (.) |) _______________________________.OOOo__( )__oOOO.______________________________ | | | This is my Tcomponent | | Ciao Marco | | Email bianco@arcanet.it | | | | DATA: INIZIO: FINE: LAVORO: | | | | 30-08-97, 15:56:52, 17:42:51 FATTO TUTTO. | | | | | |_______________________________.oooO__________________________________________| ( ) Oooo. \ ( ( ) \_) ) / (_/

Constructors


constructor Create(AOwner:TComponent);

Public declarations


Functions

FUNCTION COMPARA(CONST S1,S2:STRING):INTEGER;

THE MAIN RECURSIVE FUNCTION, IT RETURN THE ITEM INDEX

function RIC_SEARCH(const x,y:longint):longint;

<0: S10: S1>S2

PROCEDURE SET_CERCA(VALUE:STRING);

NON TROVATO

Properties

property CaseSensitivity : BOOLEAN


property IntegralLength : BOOLEAN


property StringToFind : STRING

Publish specialised properties

Events

Variables

CAS : BOOLEAN;


CERCA : STRING;

Private declarations

INTLEN : BOOLEAN;

CASE SENSITIVE


Constructors


constructor Create(AOwner:TComponent);

Public declarations


Functions


FUNCTION COMPARA(CONST S1,S2:STRING):INTEGER;

THE MAIN RECURSIVE FUNCTION, IT RETURN THE ITEM INDEX


function RIC_SEARCH(const x,y:longint):longint;

<0: S10: S1>S2


PROCEDURE SET_CERCA(VALUE:STRING);

NON TROVATO


Properties


property CaseSensitivity : BOOLEAN


property IntegralLength : BOOLEAN


property StringToFind : STRING

Publish specialised properties


Events


Variables


CAS : BOOLEAN;


CERCA : STRING;

Private declarations


INTLEN : BOOLEAN;

CASE SENSITIVE