Class TAscii2DB (unit DBcvt) |
TComponent
Constructors |
****************************************************************************}
Functions |
of GetRecord} {
Properties |
Events |
Variables |
Constructors |
records updated
****************************************************************************}
Functions |
of create} {
of destroy} {
of aborttranfer} {
of GetRecordCount} {
Protected declarations
of GetRecord} {
*****************************************************************************
Gets n fields from the specified file and returns then in a TList
the entire record is also returned in pRecord (global)
- File must be opened before calling.
- File pointer left pointing to next character.
- Escaped characters (if enabled) are processed inside and out of delimiters.
- All characters inside delimiter are literal except:
a) of execute} { of setEndOfRecord} { ****************************************************************************} of setAsciiFile} { of StopExecute} { ****************************************************************************} ****************************************************************************} of setErrorFile} { of setRecordLimit} { of setfieldlist} { Properties Published declarations Events Variables Public declarations record aborted by user record appended busy records with conversion errors empty strings last line read from file cause of failure last field read from file records with miscount of fields records with key violations lines in ascii file records with memo errors lined read from file, except empty lines count of records with errors Private declarations procedure AbortTransfer(Sender: TObject);
procedure SetAsciiFile(value: TFileName);
procedure SetEndOfRecord(value: char);
procedure SetErrorFile(value: TFileName);
procedure SetFieldList(value: TStrings);
procedure SetFixedWidth(value: boolean);
procedure SetMaxFieldSize(value: LongInt);
procedure SetMaxRecordErrors(value: longInt);
procedure SetNamesFirst(value: boolean);
procedure SetRecordLimit(value: LongInt);
property AbortCaption : string
property AllowComments : boolean
property AnnotateErrorFile : boolean
property AsciiFile : TFileName
property DateFormat : TDBcvtDateFormat
property DateSeparat : char
property DecimalSeparat : char
property Delimiter : char
property Destination : TTable
property EndOfRecord : char
property ErrorFile : TFileName
property Escapes : TDBcvtEscapes
property FieldList : TStrings
property FixedWidth : boolean
property MaxFieldSize : LongInt
property MaxRecordErrors : LongInt
property Mode : TDBcvtMode
property NamesFirst : boolean
property NotifyCount : LongInt
property RecordLimit : LongInt
property Separator : char
property ShowCaption : string
property ShowDlg : boolean
property TimeSeparat : char
property WriteEnable : boolean
event OnNotifyCount : TNotifyEvent
event OnParse : TParseEvent
event OnPrePost : TPrePostEvent
AbortedCount : LongInt;
AppendedCount : longInt;
Busy : boolean;
ConversionErrors : longInt;
EmptyCount : longInt;
ErrorCode : TDBcvtError;
ErrorField : longInt;
ErrorLine : longInt;
FieldCountErrors : longInt;
KeyViolationErrors : LongInt;
LineCount : longInt;
MemoErrors : longInt;
ParsedCount : longInt;
RecordErrorCount : longInt;
UpdatedCount : longInt;
FAbortCaption : string;
FAllowComments : boolean;
FAnnotateErrorFile : boolean;
FAsciiFile : TFileName;
FDateFormat : TDBcvtDateFormat;
FDateSeparat : char;
FDecimalSeparat : char;
FDelimiter : char;
FDestination : TTable;
FEndOfRecord : char;
FErrorFile : TFileName;
FEscapes : TDBcvtEscapes;
FFieldList : TStrings;
FFixedWidth : boolean;
FMaxFieldSize : LongInt;
FMaxRecordErrors : longInt;
FMode : TDBcvtMode;
FNamesFirst : boolean;
FNotifyCount : LongInt;
FOnNotifyCount : TNotifyEvent;
FOnParse : TParseEvent;
FOnPrePost : TPrePostEvent;
FRecordLimit : longInt;
FSeparator : char;
FShowCaption : string;
FShowDlg : boolean;
FTimeSeparat : char;
FWriteEnable : boolean;
OldActive : boolean;
sField : string;
sFieldCount : LongInt;
sQuoteEnd : LongInt;
sRecord : string;