| Class TDBVReader (unit DBVRead) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);Destroy
| Functions |
destructor Destroy;
procedure SaveToFile(AFilename: TFileName);
function ConvertPointer(const pointer : string) : longint;
procedure DataChange(Sender: TObject);
function GetDataField: string;
function GetDataSource: TDataSource;
function GetFileName: TFileName;
procedure SetDataField(const newFieldName: string);
procedure SetDataSource(newSource: TDataSource);
procedure SetFileName(newValue: TFileName);
procedure VLF2Stream(stream : tstream; const fptr : string);| Properties |
property DataField : string
property DataSource : TDataSource
property FileName : TFileName| Events |
| Variables |
FDBVFile : TFileStream;
FFieldDataLink : TFieldDataLink;
FFileName : TFileName;| Constructors |
constructor Create(AOwner: TComponent);Public declarations
Destroy
| Functions |
destructor Destroy;
procedure SaveToFile(AFilename: TFileName);SetFileName
function ConvertPointer(const pointer : string) : longint;SetDataSource
procedure DataChange(Sender: TObject);
function GetDataField: string;Triggered when data changes in DataSource.
CDK: Update your control to reflect data change. For example, if this control were a descendant of TCalendar, you could use the following line: CalendarDate := FFieldDataLink.Field.AsDate; Other ways to look at data: AsBoolean AsDateTime AsFloat AsInteger AsString AsDate AsTime AsSmallInt AsWord AsCurrency AsBCD
function GetDataSource: TDataSource;Returns data field name.
GetDataField
function GetFileName: TFileName;
procedure SetDataField(const newFieldName: string);Returns linked data source.
GetDataSource
procedure SetDataSource(newSource: TDataSource);Assigns new field.
SetDataField
procedure SetFileName(newValue: TFileName);GetFileName
procedure VLF2Stream(stream : tstream; const fptr : string);SaveToFile
| Properties |
property DataField : stringPublished properties and events
property DataSource : TDataSource
property FileName : TFileName| Events |
| Variables |
FDBVFile : TFileStream;
FFieldDataLink : TFieldDataLink;
FFileName : TFileName;Private declarations