Class TDBExport (unit DBExp)

Inherits from

TComponent

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 : TAbout

Published-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;



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 : TAbout

Published-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;