Class TACDbf (unit AcDbf) |
Inherits from
TComponent
*****************************************************************************
* ACDbf *
constructor Create(AOwner: TComponent);
- *****************************************************************************
* constructor *
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 *
property Active : Boolean
Published declarations
property FieldName : TStringList
property FileName : String
property Version : Integer
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
constructor Create(AOwner: TComponent);
*****************************************************************************
* constructor *
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 *
property Active : Boolean
Published declarations
property FieldName : TStringList
property FileName : String
property Version : Integer
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