| Class TDBExport (unit DBExp) |
TComponent
| Constructors |
constructor create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure execute;
procedure LoadBlock(var Liste:TStringList;Bereich:string;InGross:boolean);
procedure MakeChanges(var zeile:string);
procedure ReadDefinition;--------------------------------------------------------------------------- ReadDefinition --------------------------------------------------------------------------- Wertet seinen Block aus analyses definition-block
procedure ReadDetail;
procedure ReadFooter;
procedure ReadHeader;
function GetRecordCount:longint;| Properties |
property About : TAbout
property ANSItoOEM : boolean
property Exportfile : TFileName
property RecNo : longint
property RecordCount : longint
property Records : longint
property Satzumbruch : TUmbruch
property Scriptfile : TFilename
property Tabelle : tDataSet
property Upper : boolean| Events |
event OnDefinition : HilfsEvent2
event OnDetail : HilfsEvent2
event OnFinal : TNotifyEvent
event OnFooter : HilfsEvent2
event OnHeader : HilfsEvent2
event OnNext : TNotifyEvent
event OnStart : TNotifyEvent| Variables |
Datei : TStringlist;
DatenBereich : TBereiche;
DatenCounter : longint;
Definition : TStringlist;
Detail : TStringlist;
FAbout : TAbout;
FDataLink : TFieldDataLink;
Filename : TFilename;
FOnDefinition : HilfsEvent2;
FOnDetail : HilfsEvent2;
FOnFinal : TNotifyEvent;
FOnFooter : HilfsEvent2;
FOnHeader : HilfsEvent2;
FOnNext : TNotifyEvent;
FOnStart : TNotifyEvent;
Footer : TStringlist;
Header : TStringlist;
OutDatei : textfile;
OutFile : TFilename;
Table1 : TDataSet;
TANSItoOEM : boolean;
TInGross : boolean;
TSatzumbruch : TUmbruch;| Constructors |
constructor create(AOwner: TComponent);Public-Deklarationen
| Functions |
destructor Destroy;Voreinstellungen
procedure execute;Block beginnt
procedure LoadBlock(var Liste:TStringList;Bereich:string;InGross:boolean);
procedure MakeChanges(var zeile:string);--------------------------------------------------------------------------- MakeChanges --------------------------------------------------------------------------- Diese Methode ersetzt die VARIABLEN durch reele Werte This method replaces the variables with real values
procedure ReadDefinition;Protected-Deklarationen
--------------------------------------------------------------------------- ReadDefinition --------------------------------------------------------------------------- Wertet seinen Block aus analyses definition-block
procedure ReadDetail;--------------------------------------------------------------------------- ReadDetail --------------------------------------------------------------------------- Wertet seinen Block aus
procedure ReadFooter;--------------------------------------------------------------------------- ReadFooter --------------------------------------------------------------------------- Wertet seinen Block aus
procedure ReadHeader;--------------------------------------------------------------------------- ReadHeader --------------------------------------------------------------------------- Wertet seinen Block aus
function GetRecordCount:longint;| Properties |
property About : TAboutPublished-Deklarationen
property ANSItoOEM : boolean
property Exportfile : TFileName
property RecNo : longint
property RecordCount : longint
property Records : longint
property Satzumbruch : TUmbruch
property Scriptfile : TFilename
property Tabelle : tDataSet
property Upper : boolean| Events |
event OnDefinition : HilfsEvent2
event OnDetail : HilfsEvent2
event OnFinal : TNotifyEvent
event OnFooter : HilfsEvent2
event OnHeader : HilfsEvent2
event OnNext : TNotifyEvent
event OnStart : TNotifyEvent| Variables |
Datei : TStringlist;
DatenBereich : TBereiche;Private-Deklarationen
DatenCounter : longint;
Definition : TStringlist;
Detail : TStringlist;
FAbout : TAbout;
FDataLink : TFieldDataLink;
Filename : TFilename;
FOnDefinition : HilfsEvent2;Eigenschaften
FOnDetail : HilfsEvent2;
FOnFinal : TNotifyEvent;
FOnFooter : HilfsEvent2;
FOnHeader : HilfsEvent2;
FOnNext : TNotifyEvent;
FOnStart : TNotifyEvent;
Footer : TStringlist;
Header : TStringlist;
OutDatei : textfile;
OutFile : TFilename;
Table1 : TDataSet;
TANSItoOEM : boolean;
TInGross : boolean;
TSatzumbruch : TUmbruch;