Class: TBandItem

TComponent ----+
            |
        TBandItem

Description:

Unit:
UCWReport (UCWReport.pas)

Constructors:

constructor Create(AOwner: TComponent);override;
constructor Create(AOwner: TComponent);override;

Propertys:

property PosRect: TRect read GetPosRect;
property NextRect: TRect read GetNextRect;
property PrevGroupByFieldValue: String Read FPrevValue;
property TopLeft: TPoint read GetTopLeft write SetTopLeft;
property BandType: TBandType read FBandType write SetBandType;
property Dataset: TDataset read FDataset write SetDataset;
property Copies : Integer read FCopies write SetCopies default 1;
property Columns: Integer read FColumns write SetColumns;
property RowSpace: Integer read FRowSpace write SetRowSpace;
property ColumnSpace: Integer read FColumnSpace write SetColumnSpace;
property ParentBand: TCWBand read FParentBand write SetParentBand;
property GroupByExpr: string read FGroupByExpr write SetGroupByExpr;
property Jump: Boolean read FJump write SetJump;
property BeforePrint: TCWBandPrintEvent read FBeforePrint write FBeforePrint;
property AfterPrint: TCWBandPrintEvent read FAfterPrint write FAfterPrint;
property BeforePaint: TCWBandPaintEvent read FBeforePaint write FBeforePaint;
property AfterPaint: TCWBandPaintEvent read FAfterPaint write FAfterPaint;
property BeforeCalculate: TCWBandBeforeCalculateEvent read FBeforeCalculate write FBeforeCalculate;
property AfterCalculate: TCWBandAfterCalculateEvent read FAfterCalculate write FAfterCalculate;
property Evaluations: TEvalCollection read FEvalCollection write FEvalCollection;
property Align;
property Color;
property NewPageBefore: Boolean read FnewPageBefore write SetNewPageBefore;
property NewPageAfter: Boolean read FnewPageAfter write SetNewPageAfter;
property OnClick;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
property OnStartDrag;
property TopLeft: TPoint Read GetTopLeft write SetTopLeft;

Methods:

procedure AfterClose(Dataset: TDataset);
procedure SetParent(AParent: TWinControl); override;
procedure Notification(AComponent: TComponent; Operation: TOperation); override;
procedure CreateParams(var Params: TCreateParams); override;
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer); override;
procedure WriteState(Writer: TWriter); override;
function IsRelated(Band: TCWBand): Boolean;
function HasChildBand: Boolean;
function HasParentBand: Boolean;
function Root(Band: TCWBand): TCWBand;
function NewPosRect(MoveBack: Boolean): TRect;
function GroupByChanged(Band: TCWBand): Boolean;
procedure SetPrevValue;
function IsLastBand: Boolean;
procedure Parking(MoveBack: Boolean);
procedure ResetBounds;
procedure UpdateDataset;
destructor Destroy; override;
procedure Prepare;
procedure UnPrepare;
function GetOffsetRect: TRect;
function GetAlignRect(var AFound: Boolean): TRect;
procedure SyncDS;
procedure FreeBookmark;
function BandRect: TRect;
procedure SetValues;
procedure SetControlValues;
destructor Destroy;override;

constructor Create(AOwner: TComponent);override;


constructor Create(AOwner: TComponent);override;


property PosRect: TRect read GetPosRect;

   Gibt das "wirkliche" BoundsRect des Bands zurück d.h. das BoundsRect des Bands wenn Sie den TCWReport ausschalten.


property NextRect: TRect read GetNextRect;

  Wird für bei der internen Berechnung verwendet.


property PrevGroupByFieldValue: String Read FPrevValue;

  Wird für bei der internen Berechnung verwendet.


property TopLeft: TPoint read GetTopLeft write SetTopLeft;

  Der "wirkliche linke obere Punkt des Bands.


property BandType: TBandType read FBandType write SetBandType;

   btDefault - erscheint auf jeder Seite.

   btDetail - erscheint wenn das verbundene Dataset Recordcount > 0 besitzt.

   btReportHeader - erschient auf der nur auf der ersten Seite

   btReportFooter - erscheint nur auf der letzten Seite genau an der Stelle an der er eingefügt wurde

   btGroupHeader - erscheint wenn sich die GroupbyExpression ändert als "Kopf"

  bt GroupFooter - erscheint wenn sich die GroupbyExpression ändert als "Fuß"


property Dataset: TDataset read FDataset write SetDataset;

  Das zu verbindene Dataset - hat nur bei BandType = btDetail auswirkung.

 


property Copies : Integer read FCopies write SetCopies default 1;

  Die Anzahl der wie oft der Band wiederholt angezeigt wird - Auswirkung nur bei BandType = btDetail und verbundenen Dataset


property Columns: Integer read FColumns write SetColumns;

   Anzahl der Spalten die der Band einnehmen soll. Dies ist eine Seiteneigenschaft d.h. wenn die Anzahl der Spalten zu groß ist - der Band      ist zu breit für alle Spalten - so werden die fehlenden Spalten nicht auf den folgenden Seite weitergeführt.


property RowSpace: Integer read FRowSpace write SetRowSpace;

  Die Zeilenhöhen zwischen dem Band. Ist dieser Wert gleich -1 so ist wird der Abstand zum darüberliegenden Band    - oder wenn es           keinen gibt zur oberen Kante von TCWReport genommen.


property ColumnSpace: Integer read FColumnSpace write SetColumnSpace;

  Die Spaltenbreite zwischen des Bands.


property ParentBand: TCWBand read FParentBand write SetParentBand;

  Setzen dieser Eigenschaft bewirk das der Band dann angezeigt wird wenn der ParentBand angezeigt wird.


property GroupByExpr: string read FGroupByExpr write SetGroupByExpr;

  Der GroupBy Ausdruck .


property Jump: Boolean read FJump write SetJump;

  Setzen dieser Eigenschaft bewirk das anderen Bands um diese Band "herumhüpfen".


property BeforePrint: TCWBandPrintEvent read FBeforePrint write FBeforePrint;

  Wird vor dem Drucken  für jede angezeigte Position des Bands aufgerufen.

  Sie können hier zum Beispiel die Farbe oder andere Eigenschaften des im Bands befindenden Componenten ändern.

  Vergessen Sie nicht diese Eigenschaft nachdem Printen wider zurückzusetzen.


property AfterPrint: TCWBandPrintEvent read FAfterPrint write FAfterPrint;

  Wird nach dem Drucken für jede angezeigte Position des Bands aufgerufen.


property BeforePaint: TCWBandPaintEvent read FBeforePaint write FBeforePaint;

Wird vor dem Anzeigen auf dem Bildschirm für jede angezeigte Position des Bands aufgerufen.


property AfterPaint: TCWBandPaintEvent read FAfterPaint write FAfterPaint;

Wird nach dem Anzeigen auf dem Bildschirm für jede angezeigte Position des Bands aufgerufen.


property BeforeCalculate: TCWBandBeforeCalculateEvent read FBeforeCalculate write FBeforeCalculate;

Wird vor der Berechnung der Position des Bands aufgerufen.


property AfterCalculate: TCWBandAfterCalculateEvent read FAfterCalculate write FAfterCalculate;

Wird nach der Berechnung der Position des Bands aufgerufen.


property Evaluations: TEvalCollection read FEvalCollection write FEvalCollection;

  Mit diesen können Sie berechnende Felder jedem Control zuordnen welche auf die Message SetText reagiert.

  Beispiel: Fügen Sie ein TLabel in einen Band ein - Erzeigen Sie ein neues EvaluationItem setzen Sie die Expression auf Date und

  Control auf den vorher eingefügten TLabel. Dieser zeigt nun das aktuelle Datum ein. Handlet es sich um eine Aggregatfunktion wie zB     Count, Sum oder änliches müßen Sie Aggreg auf True setzen.


property Align;


property Color;


property NewPageBefore: Boolean read FnewPageBefore write SetNewPageBefore;

  Setzen dieser Eigenschaft bewirkt das vor dem Anzeigen des Bands zu einer neuen Seite gewechselt wird.


property NewPageAfter: Boolean read FnewPageAfter write SetNewPageAfter;

  Setzen dieser Eigenschaft bewirkt das nach dem Anzeigen des Bands zu einer neuen Seite gewechselt wird.


property OnClick;


property OnDblClick;


property OnDragDrop;


property OnDragOver;


property OnEndDrag;


property OnMouseDown;


property OnMouseMove;


property OnMouseUp;


property OnStartDrag;


property TopLeft: TPoint Read GetTopLeft write SetTopLeft;


procedure AfterClose(Dataset: TDataset);


procedure SetParent(AParent: TWinControl); override;


procedure Notification(AComponent: TComponent; Operation: TOperation); override;


procedure CreateParams(var Params: TCreateParams); override;


procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer); override;


procedure WriteState(Writer: TWriter); override;


function IsRelated(Band: TCWBand): Boolean;


function HasChildBand: Boolean;


function HasParentBand: Boolean;


function Root(Band: TCWBand): TCWBand;


function NewPosRect(MoveBack: Boolean): TRect;


function GroupByChanged(Band: TCWBand): Boolean;


procedure SetPrevValue;


function IsLastBand: Boolean;


procedure Parking(MoveBack: Boolean);


procedure ResetBounds;


procedure UpdateDataset;


destructor Destroy; override;


procedure Prepare;


procedure UnPrepare;


function GetOffsetRect: TRect;


function GetAlignRect(var AFound: Boolean): TRect;


procedure SyncDS;


procedure FreeBookmark;


function BandRect: TRect;


procedure SetValues;


procedure SetControlValues;


destructor Destroy;override;