| Class TACDbf (unit AcDbf) |
TComponent
***************************************************************************** * ACDbf *
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
Procedure Add_Control(pr:TACDBF_Procedure);
destructor Destroy;
Function Get_Field_Str(Nome:String):String;
Procedure Libera_Componenti;
Procedure MoveFirst;
Procedure MoveLast;
Procedure MoveNext;
Procedure MovePrevious;
Procedure Remove_Control(pr:TACDBF_Procedure);
procedure Aggiorna_Componenti;
procedure Get_Estremi_Field(Nome:String;var v1,v2:Integer);
Procedure Read_Rec;
Procedure SetActive(fl : Boolean);***************************************************************************** * SetActive *
Procedure SetFileName(Txt:String);
Procedure Set_FieldName(T:TStringList);
Procedure Close_File;***************************************************************************** * Close_File *
Procedure Load_Fields;| Properties |
property Active : Boolean
property FieldName : TStringList
property FileName : String
property Version : Integer| Events |
| Variables |
My_Rec : PChar;
Dbf_Field : PAC_DBF_FIELD_STRUTT_IN;
dbf_Str : AC_DBF_HEADER_STRUTT;
F_Active : Boolean;
F_FieldName : TStringList;
F_FileName : String;
F_Versione : Integer;
H_File : Integer;
List_Comp : PAC_DB_Componenti;| Constructors |
constructor Create(AOwner: TComponent);***************************************************************************** * constructor *
| Functions |
Procedure Add_Control(pr:TACDBF_Procedure);***************************************************************************** * Add_Control *
destructor Destroy;***************************************************************************** * destructor *
Function Get_Field_Str(Nome:String):String;***************************************************************************** * Get_Field_Str *
Procedure Libera_Componenti;***************************************************************************** * Libera_Componenti *
Procedure MoveFirst;***************************************************************************** * MoveFirst *
Procedure MoveLast;***************************************************************************** * MoveLast *
Procedure MoveNext;***************************************************************************** * MoveNext *
Procedure MovePrevious;***************************************************************************** * MovePrevious *
Procedure Remove_Control(pr:TACDBF_Procedure);***************************************************************************** * Remove_Win *
procedure Aggiorna_Componenti;***************************************************************************** * Aggiorna_componenti *
procedure Get_Estremi_Field(Nome:String;var v1,v2:Integer);***************************************************************************** * Get_Estermi_Field *
Procedure Read_Rec;***************************************************************************** * Read_Rec *
Procedure SetActive(fl : Boolean);Protected declarations
***************************************************************************** * SetActive *
Procedure SetFileName(Txt:String);***************************************************************************** * destructor *
Procedure Set_FieldName(T:TStringList);***************************************************************************** * Set_FieldName *
Procedure Close_File;Elenco componenti collegati
***************************************************************************** * Close_File *
Procedure Load_Fields;***************************************************************************** * Load_Fields *
| Properties |
property Active : BooleanPublished declarations
property FieldName : TStringList
property FileName : String
property Version : Integer| Events |
| Variables |
My_Rec : PChar;Public declarations
Dbf_Field : PAC_DBF_FIELD_STRUTT_IN;
dbf_Str : AC_DBF_HEADER_STRUTT;
F_Active : Boolean;
F_FieldName : TStringList;
F_FileName : String;Private declarations
F_Versione : Integer;Handle del DBF
H_File : Integer;
List_Comp : PAC_DB_Componenti;Elenco dei campi