Class TACTextAss (unit AcTxtAssist)

Inherits from

TComponent

***************************************************************************** * TACTextAss *

Constructors


Constructor Create(AOwner: TComponent);

***************************************************************************** * Create *


Functions

Procedure Add(Titolo,Words,Termine:String;ID:Integer);

Crea il file vuoto per l'help

***************************************************************************** * Add * * * * Aggiunge nel file un record nuovo * * * * Nome Descrizione * * --------------- ---------------------------------------------------------- * * Desc Descrizione * * Words Parole per la ricerca * * ID ID per riferimento all help *


Procedure CreateFile;

Public declarations

***************************************************************************** * CreateFile * * * * Crea un file per la guida vuoto *


Procedure Edit(Num:Integer;Titolo,Words,Termine:String;ID:Integer);

***************************************************************************** * Add * * * * Edita o il record desiderato * * * * Nome Descrizione * * --------------- ---------------------------------------------------------- * * Num Numero del record, i record iniziano con il numero 0 * * Desc Descrizione * * Words Parole per la ricerca * * ID ID per riferimento all help *

Procedure FindWord(frase:String);

***************************************************************************** * FindWord * * * * Restituisce il numero di record * * *

Procedure Get(Num:Integer;Var Titolo,Words,Termine:String;Var ID:Integer);

***************************************************************************** * Get * * * * Restituisce le informazioni sul record interessato * * * * Nome Descrizione * * --------------- ---------------------------------------------------------- * * Num Numero del record, i record iniziano con il numero 0 * * Desc Descrizione * * Words Parole per la ricerca * * ID ID per riferimento all help *

Function RecordCount : Integer;

***************************************************************************** * RecordCount * * * * Restituisce il numero di record *

Procedure SetFName (Nome:String);

Protected declarations

***************************************************************************** * SetFname * * * * Imposta il nome del file *


Properties

property AfterReadEveryOne : TACTextProcedureFind


property FileName : String

Published declarations

Events

Variables

FName : String;

Private declarations

FProcFind : TACTextProcedureFind;

Nome del file


Constructors


Constructor Create(AOwner: TComponent);

***************************************************************************** * Create *


Functions


Procedure Add(Titolo,Words,Termine:String;ID:Integer);

Crea il file vuoto per l'help

***************************************************************************** * Add * * * * Aggiunge nel file un record nuovo * * * * Nome Descrizione * * --------------- ---------------------------------------------------------- * * Desc Descrizione * * Words Parole per la ricerca * * ID ID per riferimento all help *


Procedure CreateFile;

Public declarations

***************************************************************************** * CreateFile * * * * Crea un file per la guida vuoto *


Procedure Edit(Num:Integer;Titolo,Words,Termine:String;ID:Integer);

***************************************************************************** * Add * * * * Edita o il record desiderato * * * * Nome Descrizione * * --------------- ---------------------------------------------------------- * * Num Numero del record, i record iniziano con il numero 0 * * Desc Descrizione * * Words Parole per la ricerca * * ID ID per riferimento all help *


Procedure FindWord(frase:String);

***************************************************************************** * FindWord * * * * Restituisce il numero di record * * *


Procedure Get(Num:Integer;Var Titolo,Words,Termine:String;Var ID:Integer);

***************************************************************************** * Get * * * * Restituisce le informazioni sul record interessato * * * * Nome Descrizione * * --------------- ---------------------------------------------------------- * * Num Numero del record, i record iniziano con il numero 0 * * Desc Descrizione * * Words Parole per la ricerca * * ID ID per riferimento all help *


Function RecordCount : Integer;

***************************************************************************** * RecordCount * * * * Restituisce il numero di record *


Procedure SetFName (Nome:String);

Protected declarations

***************************************************************************** * SetFname * * * * Imposta il nome del file *


Properties


property AfterReadEveryOne : TACTextProcedureFind


property FileName : String

Published declarations


Events


Variables


FName : String;

Private declarations


FProcFind : TACTextProcedureFind;

Nome del file