Class TMetaphone (unit Metaphone)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions

procedure Execute;

looks like a kinda nice value

procedure metaphone(a : String; lg : integer; var res : String);


procedure setinstr(x : string);


procedure SetLength(Len: Integer);


procedure setoutstr(x : string);


Properties

property instring : string


property OutLength : Integer

Published declarations

property outstring : string


Events

Variables

instr : string;


LengthVar : Integer;

Private declarations

outstr : string;



Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions


procedure Execute;

looks like a kinda nice value


procedure metaphone(a : String; lg : integer; var res : String);


procedure setinstr(x : string);


procedure SetLength(Len: Integer);


procedure setoutstr(x : string);


Properties


property instring : string


property OutLength : Integer

Published declarations


property outstring : string


Events


Variables


instr : string;


LengthVar : Integer;

Private declarations


outstr : string;