Class TDB2Ascii (unit DBcvt) |
Inherits from
TComponent
****************************************************************************}
constructor Create(Aowner: Tcomponent);
- records written to ascii file
of GetFixedRecord} {******************************************************************************} {
procedure Execute;
of create} {
procedure StopExecute;
of setAsciiFile} {
procedure AbortTransfer(Sender: TObject);
of StopExecute} {
procedure SetAsciiFile(value: TFileName);
of setEndOfRecord} {
procedure SetEndOfRecord(value: char);
****************************************************************************}
property AbortCaption : string
Published declarations
property AlwaysQuote : boolean
property AsciiFile : TFileName
property Delimiter : char
property EndOfRecord : char
property NotifyCount : LongInt
property Separator : char
property ShowCaption : string
property ShowDlg : boolean
property Source : TTable
event OnNotifyCount : TNotifyEvent
Busy : boolean;
Public declarations
ErrorCode : TDBcvtError;
busy
WrittenCount : LongInt;
cause of failure
FAbortCaption : string;
Private declarations
FAlwaysQuote : boolean;
FAsciiFile : TFileName;
FDelimiter : char;
FEndOfRecord : char;
FNotifyCount : LongInt;
FOnNotifyCount : TNotifyEvent;
FSeparator : char;
FShowCaption : string;
FShowDlg : boolean;
FSource : TTable;
constructor Create(Aowner: Tcomponent);
records written to ascii file
of GetFixedRecord} {******************************************************************************} {
procedure Execute;
of create} {
procedure StopExecute;
of setAsciiFile} {
procedure AbortTransfer(Sender: TObject);
of StopExecute} {
procedure SetAsciiFile(value: TFileName);
of setEndOfRecord} {
procedure SetEndOfRecord(value: char);
****************************************************************************}
property AbortCaption : string
Published declarations
property AlwaysQuote : boolean
property AsciiFile : TFileName
property Delimiter : char
property EndOfRecord : char
property NotifyCount : LongInt
property Separator : char
property ShowCaption : string
property ShowDlg : boolean
property Source : TTable
event OnNotifyCount : TNotifyEvent
Busy : boolean;
Public declarations
ErrorCode : TDBcvtError;
busy
WrittenCount : LongInt;
cause of failure
FAbortCaption : string;
Private declarations
FAlwaysQuote : boolean;
FAsciiFile : TFileName;
FDelimiter : char;
FEndOfRecord : char;
FNotifyCount : LongInt;
FOnNotifyCount : TNotifyEvent;
FSeparator : char;
FShowCaption : string;
FShowDlg : boolean;
FSource : TTable;