Dokumentation Print-Klassen

In diesem Dokument werden die Print-Klassen mit ihren Zugriffsfunktionen und ihren Abhängigkeiten beschrieben.

 

Dokumentation Print-Klassen.. 1

Klassenübersicht 6

cntPrintPreview.. 7

Properties. 7

Active. 7

CurrentPage. 8

Report_RefreshNeeded. 8

showDebugInfo. 8

Events. 8

OnChoiceLoad. 8

OnReportBuild. 8

OnReportFinish. 9

OnReportModify. 9

Methoden. 9

Choice_Append. 9

Choice_AppendSeparator 10

Choice_ClearReports. 10

Choice_Count 10

Choice_DeleteReport 10

Choice_Load. 11

Choice_PosOfName. 11

Choice_Sel 11

GoTo_FirstPage. 11

GoTo_LastPage. 12

GoTo_NextPage. 12

GoTo_Page. 12

GoTo_PreviousPage. 12

Print_AllPages. 12

Print_CurrentPage. 13

Print_Page. 13

Report 13

Report_Cancel 13

Report_Modify. 13

Report_Name. 14

Report_Refresh. 14

Report_Title. 14

Zoom_Preview.. 14

CRSRPageSwitch. 16

Properties. 16

ShowPageSelectButton. 16

ShowPopUp_LeftButtonClick. 16

Events. 16

ItemChanged. 16

Methoden. 17

Count 17

Count 17

Index. 17

Index. 17

CRSRDoubleClickCanvas. 18

Events. 18

DoubleClick. 18

CRSRThread. 19

Properties. 19

eoReport 19

Events. 19

Run. 19

Methoden. 19

Constructor 19

Terminate. 19

CRSRReport 20

Properties. 20

Page_Count 20

Page_Last 20

Methoden. 20

Build. 20

Cancelled. 21

Constructor 21

Destructor 22

Element_Find. 22

EndCreate. 22

Get_PageOriantation. 23

Page_AddNew.. 23

Page_Get 23

Print_AllPages. 23

Print_Check. 23

Print_Page. 24

Set_BorderWidth_MM... 24

Set_BorderWidth_Pixel 24

Set_PageOrientation. 24

CRSRPage. 25

Methoden. 25

Constructor 25

Element_Add. 25

Element_Find. 25

GetDrawPageObject 26

CRSRGroup. 27

Properties. 27

Scale. 27

Methoden. 27

Constructor 27

Destructor 27

Element_Add. 27

Element_Find. 28

GetDrawGroupObjekt 28

Height_MM... 28

CRSRPrintElement 29

Properties. 29

Left_Pixel 29

Name. 29

Top_Pixel 29

VisibleByPreview.. 29

VisibleByPrinting. 29

Events. 29

drawSelf. 29

Methoden. 29

Left_MM... 29

Left_MM... 30

Refresh. 30

Top_MM... 30

Top_MM... 30

CRSRImage. 31

Properties. 31

Picture. 31

ScaleFactor 31

Events. 31

drawSelf. 31

CRSRLine. 32

Properties. 32

LeftEnd_Pixel 32

Length_Pixel 32

LineColor 32

Straight 32

Thickness_Pixel 32

TopEnd_Pixel 32

Events. 32

drawSelf. 32

Methoden. 33

Constructor 33

Constructor 33

LeftEnd_MM... 33

LeftEnd_MM... 34

Length_MM... 34

Length_MM... 34

Thickness_MM... 34

Thickness_MM... 34

TopEnd_MM... 34

TopEnd_MM... 35

CRSROval 36

Properties. 36

BorderColor 36

BorderThickness_Pixel 36

FillColor 36

Height_Pixel 36

Width_Pixel 36

Events. 36

drawSelf. 36

Methoden. 36

Constructor 36

Constructor 37

Height_MM... 37

Height_MM... 37

Width_MM... 37

Width_MM... 38

CRSRText 39

Properties. 39

Align. 39

CuttingTextWithPoints. 39

Font 39

LineSpace. 40

RotateAngle. 40

Text 40

VerticalAlign. 40

Width_Pixel 40

WrapLines. 41

Events. 41

drawSelf. 41

Methoden. 41

Constructor 41

Constructor 41

Destructor 42

Font_AutoSize. 42

Height_MM... 42

Height_Pixel 42

TextHeight_MM... 43

Text_Missing. 43

Width_MM... 43

Width_MM... 43

CRSRRectangle. 44

Properties. 44

BorderColor 44

BorderThickness_Pixel 44

FillColor 44

FillRectangle. 44

Font 44

Height_Pixel 44

RoundCornerRadius_Pixel 44

Text 44

TextAlign. 45

TextMarginTop_Pixel 45

TextMargin_Pixel 45

Width_Pixel 45

Events. 45

drawSelf. 45

Methoden. 45

BorderThickness_MM... 45

BorderThickness_MM... 46

Constructor 46

Height_MM... 46

Height_MM... 46

RoundCornerRadius_MM... 46

RoundCornerRadius_MM... 47

TextMarginTop_MM... 47

TextMarginTop_MM... 47

TextMargin_MM... 47

TextMargin_MM... 47

Width_MM... 47

Width_MM... 48

CRSRCheckbox. 49

Properties. 49

CheckColor 49

CheckLineThickness_Pixel 49

Value. 49

Events. 49

drawSelf. 49

Methoden. 49

CheckLineThickness_MM... 49

CheckLineThickness_MM... 49

CRSRFont 50

Properties. 50

Bold. 50

FontColor 50

FontName. 50

FontSize. 50

Italic. 50

Underline. 50

Methoden. 50

Constructor 50

Korrekturen / Ergänzungen: 51

- 2007.06.28, alvi: CRSRText -> Properties 'CuttingTextWithPoints' 51

- 2007.06.28, alvi: CRSRText -> Methode 'Font_AutoSize' 51

 

 

 

CRSRCheckbox

 

CRSRImage

 

CRSRLine

 

CRSROval

 

CRSRText

 

CRSRRectangle

 

CRSRGroup

 

CRSRGroup

 

CRSRThread

 

CRSRDoubleClickCanvas

 

CRSRPageSwitch

 

CRSRReport

 

cntPrintPreview

 

CRSRPrintElement

 

 

CRSRPage

 

Window

 
Klassenübersicht

cntPrintPreview

cntPrintPreview ist ein Container, welcher die eigentliche Druckvorschau, einen Seitenumschalter sowie je eine Auswahlbox für den Report und für die Größe der Ansicht enthält.

Weiterhin beinhaltet der Container Buttons zum Drucken und Anpassen des Reports.

Um den Container cntPrintPreview einem Fenster hinzuzufügen, ziehen Sie diesen, wie andere Controls, einfach auf das Fenster.

 

 

Properties

Active

Boolean – Schaltet die globale Erfassung der Tastatureingaben für die Preview ein bzw. aus.

Weisen Sie dieser Eigenschaft den Wert „True“ zu, wenn der Container im Fenster sichtbar wird. Dadurch werden die nachfolgenden Tastaturbefehle generell vom cntPrintPreview verarbeitet:

 

Key

Aktion

Pos 1

wechselt zur ersten Seite des Reports

Ende

wechselt zur letzten Seite des Reports

Pfeil hoch

wechselt zur nächsten Seite

Pfeil runter

wechselt zur vorherigen Seite

Pfeil links

wechselt zur ersten Seite des Reports

Pfeil rechts

wechselt zur letzten Seite des Reports

Bild hoch

wechselt zur nächsten Seite

Bild runter

wechselt zur vorherigen Seite

Enter

ruft den Event onReportModify auf

Esc

unterbricht die Erstellung des Report

 

CurrentPage

Integer – liefert die Seitennummer der aktuell dargestellten Seite

Report_RefreshNeeded

Boolean – Setzen Sie diese Eigenschaft auf „True“, sobald sich die Daten für den aktuellen Report geändert haben. Wird jetzt die Methode Report_Refresh aufgerufen, löst sie den Event
onReportBuild aus.

Nachdem der Report neu eingelesen wurde, wird der Wert der Eigenschaft wieder auf „False“ gesetzt.

showDebugInfo

Boolean – Nutzen Sie diese Eigenschaft, um das Anzeigen der Debug-Informationen ein- bzw. auszuschalten. Defaultwert ist „True“.

Hat showDebugInfo den Wert „True“, werden bei folgenden Label Informationen als Helptag angezeigt:

 

LabelText

Information

Was:

benötigte Zeit zum Erstellen des Report

Ansicht:

benötigte Zeit zum Anzeigen der aktuellen Seite

 

Events

OnChoiceLoad

Parameter:

-

Rückgabewert:

-

 

Der Event wird durch den Aufruf der Methode Choice_Load ausgelöst. Füllen Sie im Event die Auswahlbox mit den Reports, die zur Verfügung stehen.

 

Beispiel:

 

  me.Choice_Append(constPrint_lstFirstItem_PleaseSelect,"-")

  me.Choice_AppendSeparator

  me.Choice_Append("Tabellen","GridReport")

  me.Choice_Append("erster Report","FirstReport")

  me.Choice_Append("zweiter Report","SecondReport")

  me.Choice_Append("dritter Report","ThirdReport")

 

OnReportBuild

Parameter:

psReportName As string

Rückgabewert:

CRSRReport

 

OnReportBuild wird ausgelöst, wenn der Benutzer einen Report aus der Auswahlbox „Was:“ wählt, bzw. durch den Aufruf der Methode Report_Refresh.

Er liefert als Parameter den Namen des Reports, der in der Auswahlbox „Was:“ ausgewählt ist.

Als Rückgabewert erwartet der Event ein Objekt vom Typ CRSRReport.

Nachdem Sie einen Report zurückgeliefert haben, wird die Methode Build des Reports aufgerufen und der Report erstellt. Hier besteht die Möglichkeit, die Erstellung des Reports abzubrechen: Entweder programmgesteuert durch Sie oder über den Button „Abbrechen“,  durch den Benutzer. Ist die Erstellung beendet oder wurde abgebrochen, wird der Event OnReportFinish ausgelöst.

 

Beispiel:

Über eine Select Case Anweisung wird der ausgewählte Report zurückgeliefert.

 

  select Case psReportName

  case "FirstReport"

    return createFirstReport(me)

  case "SecondReport"

    return createSecondReport(me)

  case "ThirdReport"

    return CreateThirdReport(me)

  case "GridReport"

    return CreateGridReport(me)

  end select

 

Die Methoden „create…“ sind in diesem Fall Hilfsmethoden, die den Report liefern.

OnReportFinish

Parameter:

-

Rückgabewert:

-

 

Der Event wird ausgelöst, nachdem eine Reporterstellung beendet wurde. Hier haben Sie die Möglichkeit, Controls, die eventuell im Event OnReportBuild ausgeschaltet/deaktiviert wurden, wieder einzuschalten/zu aktivieren.

OnReportModify

Parameter:

-

Rückgabewert:

-

 

OnReportModify wird durch den Benutzer ausgelöst, indem er auf den Button „Anpassen…“ klickt. Des Weiteren wird der Event durch einen Doppelklick auf die Seitenvorschau oder die Auswahl des Menüpunktes „Anpassen…“ im Kontextmenü der Seitenvorschau ausgelöst.

 

Methoden

Choice_Append

Parameter:

psReportTitle As String

psReportName As String

Rückgabewert:

-

 

Fügt an das Ende der Auswahlbox „Was:” einen Reporteintrag hinzu. Der Parameter psReportTitel ist der Titel, der in der Auswahlbox angezeigt wird. psReportName ist der Name des Reports, welcher bei Auswahl eines Eintrages in der Auswahlbox an den Event OnReportBuild übergeben wird.

Choice_AppendSeparator

Parameter:

-

Rückgabewert:

-

 

Fügt an das Ende der Auswahlbox „Was:“ einen Separator hinzu.

 

Choice_ClearReports

Parameter:

-

Rückgabewert:

-

 

Methode zum Leeren der Auswahlbox „Was:“. Nach dem Aufruf dieser Methode werden alle eingetragenen Reporte aus der Auswahlbox gelöscht.

Choice_Count

Parameter:

-

Rückgabewert:

Integer

 

Funktion, welche die aktuelle Anzahl von Einträgen in der Auswahlbox „Was:“ liefert.

Choice_DeleteReport

Parameter:

psReportName As String

Rückgabewert:

-

 

Methode, welche den über den Parameter psReportName angegebenen Report aus der Auswahlbox „Was:“ löscht.

 

Beispiel:

Durch den nachfolgenden Aufruf wird der Eintrag „Tabellen“ aus der Auswahlbox „Was:“ gelöscht.

 

cntPrintPreview.Choice_DeleteReport "GridReport"

 

 

 

 

 

 

 

 

Choice_Load

Parameter:

-

Rückgabewert:

-

 

Nach dem Aufruf der Methode Choice_Load wird der Event OnChoiceLoad ausgelöst. Sie können die Auswahlbox „Was:“ füllen und einzelne oder alle Einträge löschen.

Choice_PosOfName

Parameter:

psReportName As String

Rückgabewert:

Integer

 

Diese Funktion liefert als Ergebnis den Index des über den Parameter psReportName angegebenen Reports. Wird der Report nicht gefunden, liefert die Funktion den Wert -1 zurück.

Choice_Sel

Parameter:

psReportName As String

pbBuildReport As Boolean = true

Rückgabewert:

-

 

Über diese Methode können Sie einen Report in der Auswahlbox „Was:“ auswählen. Der Parameter psReportName gibt an, welcher Report ausgewählt werden soll. Über den Parameter pbBuildReport beeinflussen Sie die Erstellung des Reports.

 

Beispiel:

Durch den nachfolgenden Aufruf wird der Eintrag „Tabellen“ in der Auswahlbox „Was:“ ausgewählt und der Report erstellt:

 

cntPrintPreview.Choice_Sel "GridReport"

 

Wollen Sie nur den Eintrag auswählen ohne dass der Report erstellt wird, muss der Aufruf wie folgt aussehen:

 

cntPrintPreview.Choice_Sel "GridReport",False

 

GoTo_FirstPage

Parameter:

-

Rückgabewert:

-

 

Nach dem Aufruf  dieser Methode wechselt die Seitenansicht zur ersten Seite im Report.

 

 

GoTo_LastPage

Parameter:

-

Rückgabewert:

-

 

Möchten Sie zur letzten Seite des Reports wechseln, rufen Sie diese Methode auf.

GoTo_NextPage

Parameter:

-

Rückgabewert:

-

 

Methode, welche die Seitenansicht zur nächsten Seite im Report wechselt.

GoTo_Page

Parameter:

piNewPage As Integer

Rückgabewert:

-

 

Benutzen Sie diese Methode, um zu einer bestimmten Seite im Report zu wechseln. Über den Parameter piNewPage geben Sie die Seite an, zu der Sie wechseln möchten. Sollte der angegebene Wert kleiner sein als die erste Seite im Report wird zur ersten Seite gewechselt. Ist der Wert größer als die max. Seitenzahl, wird zur letzten Seite gewechselt.

GoTo_PreviousPage

Parameter:

-

Rückgabewert:

-

 

Methode, welche die Seitenansicht zur vorherigen Seite im Report wechselt.

 

Print_AllPages

Parameter:

pbShowPrinterdialog As Boolean = true

Rückgabewert:

-

 

Nach dem Aufruf dieser Methode werden alle Seiten des gerade angezeigten Reports gedruckt. Über den Parameter pbShowPrinterdialog können Sie steuern, ob der Dialog „Drucken“ zur Auswahl eines Druckers angezeigt werden soll. Standardmäßig wird der Dialog angezeigt.

 

 

 

 

Print_CurrentPage

Parameter:

pbShowPrinterdialog As Boolean = true

Rückgabewert:

-

 

Zum Drucken der aktuellen Seite des gerade angezeigten Reports, wählen Sie diese Methode. Über den Parameter pbShowPrinterdialog können Sie steuern, ob der Dialog „Drucken“ zur Auswahl eines Druckers angezeigt werden soll. Standardmäßig wird der Dialog angezeigt.

 

 

Print_Page

Parameter:

piPage As Integer

pbShowPrinterdialog As Boolean = True

Rückgabewert:

-

 

Methode, die eine bestimmte Seite des Reports ausdruckt. Die zu druckende Seite wird über den Parameter piPage angegeben. Ist der übergebene Wert außerhalb der Seitenzahl des Reports, wird der Druckvorgang nicht ausgeführt.

Über den Parameter pbShowPrinterdialog können Sie steuern, ob der Dialog „Drucken“ zur Auswahl eines Druckers angezeigt werden soll. Standardmäßig wird der Dialog angezeigt. 

Report

Parameter:

-

Rückgabewert:

CRSRReport

 

Möchten Sie direkt auf den aktuellen Report zugreifen, benutzen Sie diese Funktion. Sie liefert den aktuell angezeigten Report zurück.

Report_Cancel

Parameter:

-

Rückgabewert:

-

 

Zum Unterbrechen der Erstellung eines Reports rufen Sie diese Methode auf. Daraufhin wird die Erstellung des Reports abgebrochen und die bis dahin erstellten Seiten werden angezeigt.

Report_Modify

Parameter:

-

Rückgabewert:

-

 

Rufen Sie diese Methode auf, wenn Sie den Event OnReportModify auslösen  wollen.

Report_Name

Parameter:

-

Rückgabewert:

String

 

Diese Funktion liefert den Namen des aktuell ausgewählten Reports. Ist zum Beispiel in der Auswahlbox „Was:“ der Eintrag „Tabellen“ ausgewählt, wird der Wert „GridReport“ als Ergebnis zurück geliefert.

 

Report_Refresh

Parameter:

pbForce As Boolean = False

Rückgabewert:

-

 

Benutzen Sie diese Methode, um den aktuell angezeigten Report neu zu laden. Dabei wird beachtet, ob sich die Daten des Reports geändert haben, was durch die Eigenschaft Report_RefreshNeeded referenziert wird. Hat diese Eigenschaft den Wert „True“, wird der Event onReportBuild ausgelöst und der Report neu geladen.

Über den Parameter pbForce können Sie festlegen, ob die Eigenschaft Report_RefreshNeeded beachtet werden soll. Hat der Parameter pbForce den Wert „False“, wird die Eigenschaft Report_RefreshNeeded beachtet. Ist der Wert „True“, wird der Event onReportBuild unabhängig von Report_RefreshNeeded ausgelöst.

Report_Title

Parameter:

-

Rückgabewert:

String

 

Diese Funktion liefert den Titel des aktuell ausgewählten Reports. Ist zum Beispiel in der Auswahlbox „Was:“ der Eintrag „Tabellen“ ausgewählt wird der Wert „Tabellen“ als Ergebnis zurück geliefert.

Zoom_Preview

Parameter:

psZoomMenuName As String

pbSet_lstZoomIndex As Boolean = true

Rückgabewert:

-

 

Benutzen Sie diese Methode, um die Ansicht der Preview zu vergrößern/verkleinern. Über den Parameter psZoomMenuName geben sie den Zoomwert an. Folgende Werte sind möglich:

 

 

 

 

 

 

 

Wert

Größe des Zooms

constRSReportString_Menu_Zoom_75

75% der Originalgröße

constRSReportString_Menu_Zoom_100

100% der Originalgröße

constRSReportString_Menu_Zoom_FullPage

passt die Ansicht so an, dass die ganze Seite angezeigt wird

constRSReportString_Menu_Zoom_PageWidth

passt die Ansicht so an, dass die Seite in ganzer Breite angezeigt wird

 

Über den Parameter pbSet_lstZoomIndex können Sie steuern, ob in der Auswahlbox „Ansicht“ der von Ihnen gewählte Zoomwert ausgewählt werden soll.

CRSRPageSwitch

 

 

Die Klasse CRSRPageSwitch ist von einem Canvas abgeleitet. In ihr werden drei Bereiche gezeichnet. Zwei Buttons zum Hoch- und Runterschalten und eine Seitenanzeige mit der aktuellen Seite und der Anzahl der Seiten.

Klickt man im Bereich der Seitenanzeige mit der rechten Maustaste wird ein Kontextmenü mit allen Seiten angezeigt.

 

 

Zusätzlich besteht die Möglichkeit, einen dritten Button im Bereich der Seitenanzeige darzustellen. Wird dieser angezeigt, öffnet sich mit einem Klick das Kontextmenü; nur dann, wenn darauf geklickt wird.

Properties

ShowPageSelectButton

Boolean – Gibt an, ob in der Seitenanzeige ein weiterer Button angezeigt wird.

Hat diese Eigenschaft den Wert „True“, wird im Bereich der Seitenanzeige ein weiterer Button angezeigt. Das Kontextmenü zur Seitenauswahl wird nur durch einen Klick auf diesen Button angezeigt. Ist der Wert „False“(Default), wird kein Button angezeigt und das Kontextmenü wird beim Klick in dem Bereich der Seitenanzeige eingeblendet.

ShowPopUp_LeftButtonClick

Boolean – gibt an, ob das Kontextmenü mit allen Seiten auch bei einem Klick mit der linken Maustaste angezeigt wird.

Weisen Sie der Eigenschaft den Wert „True“ zu, um das Kontextmenü mit allen Seiten auch bei einem Klick auf die linke Maustaste anzuzeigen.

Hat die Eigenschaft den Wert „False“(Default), wird das Kontextmenü nur bei einem Klick mit der rechten Maustaste angezeigt.

Events

ItemChanged

Parameter:

piIndex As Integer

Rückgabewert:

-

 

Dieser Event wird nach einem Klick des Benutzers auf die Buttons oder durch die Auswahl eines Eintrages im Kontextmenü ausgelöst. Er erhält als Parameter den Index der Seite.

Methoden

Count

Parameter:

-

Rückgabewert:

Integer

 

Liefert als Ergebnis die Anzahl der Seiten

Count

Parameter:

piCount As Integer

Rückgabewert:

-

 

Setzt die Anzahl der Seiten. Der Parameter piCount enthält die neue Anzahl an Seiten.

Index

Parameter:

-

Rückgabewert:

Integer

 

Liefert als Ergebnis den Index der aktuellen Seite.

Index

Parameter:

piIndex As Integer

Rückgabewert:

-

 

Setzt den Index der aktuellen Seite. piIndex ist der neue Wert des Index.

Nach dem Aufruf dieser Methode wird die Anzeige der Seitenzahl aktualisiert.

 

CRSRDoubleClickCanvas

Die Klasse CRSRDoubleClickCanvas ist von einem Canvas abgeleitet.

Sie enthält zusätzlich zu den Events eines Canvas den Event DoubleClick.

Events

DoubleClick

Parameter:

-

Rückgabewert:

-

 

Dieser Event wird ausgelöst wenn der Benutzer auf den Canvas mit der linken Maustaste doppelt geklickt hat – innerhalb der im System hinterlegten Zeit für einen Doppelklick.

CRSRThread

Die Klasse CRSRThread ist von der Klasse Thread abgeleitet. Sie wird von der Klasse cntPrintPreview für die Erstellung eines Reports verwendet.

Properties

eoReport

CRSRReport – Enthält ein abgeleitetes Objekt vom Typ CRSRReport, dessen Methode Build im Event Run aufgerufen wird.

Events

Run

Parameter:

-

Rückgabewert:

-

 

Dieser Event wird zum Starten des Thread aufgerufen. Er ruft wiederum die Methode Build der Eigenschaft eoReport und liefert  nach Abschluss des Buildvorgangs (ohne Abbruch der Erstellung) über den MessageReceiver den Report an die Klasse cntPrintPreview zurück.

Methoden

Constructor

Parameter:

poReceiver As CRSRMessageReceiver

Rückgabewert:

-

 

Der Constructor erzeugt ein neues Objekt und erwartet als Parameter ein Objekt, welches als Interface den Typ CRSRMessageReceiver zur Rückgabe von Objekten und Nachrichten enthält. Hier wird es immer der Container cntPrintPreview sein.

Terminate

Parameter:

-

Rückgabewert:

-

 

Rufen Sie diese Methode auf, um den Buildvorgang zu unterbrechen. Diese Methode beendet den Thread und  liefert über den MessageReceiver den Report zurück.

 

CRSRReport

Die Klasse CRSRReport ist die Hauptklasse für einen Report. Sie kann unabhängig vom Container cntPrintpreview erzeugt werden. Ihr können Seiten hinzugefügt werden, die Seitenausrichtung und die Seitenränder können geändert werden. Weiterhin enthält sie Methoden zum Drucken von einzelnen Seiten oder des gesamten Reports.

Properties

Page_Count

Integer – Gibt die Anzahl der Seiten an

Page_Last

CRSRPage – enthält die zuletzt bearbeitetet Seite. Über diese Eigenschaft können Sie der Seite weitere Elemente hinzufügen.

 

Methoden

Build

Parameter:

-

Rückgabewert:

-

 

Leerer Funktionskopf. Diese Methode wird verwendet, um einen Report zu erstellen.

 

Beispiel:

Erstellen Sie in Ihrem Projekt eine neue Klasse, z.B. CRSRReport_First. Stellen Sie bei der Eigenschaft „Super“ den Wert CRSRReport ein. Fügen Sie der neu erstellten Klasse eine Methode Build hinzu. Schreiben Sie in diese Methode jetzt den Code für die Erstellung des Reports und rufen am Ende die Methode Build der Super-Klasse auf.

Nachfolgend ein Beispiel zur Erstellung einer Seite mit einem Chart:

 

  Dim oChart As CRSRChart_Bars

  Dim iPos As Integer

 

  // Einrichten des Reports

  me.Set_PageOrientation constPrint_PageOrientation_Landscape

  me.Set_BorderWidth_MM(25,0,10,10)

 

  // Überprüfen ob der Benutzer abgebrochen hat

  If True = me.Cancelled Then Exit

 

  // neue Seite hinzufügen

  me.Page_AddNew

 

  // Chart erzeugen

  oChart = New CRSRChart_Bars()

 

  oChart.Height_MM = 60

  oChart.Width_MM = 150

 

  

  oChart.AxisY_Points_Append(1, "1.0")

  oChart.AxisY_Points_Append(2, "2.0")

  oChart.AxisY_Points_Append(3, "3.0")

  oChart.AxisY_Points_Append(4, "4.0")

  oChart.AxisY_Points_Append(5, "5.0")

  oChart.AxisY_Points_Append(6, "6.0")

  oChart.AxisY_Title = "Noten"

 

  for iPos = 1 to 7

  oChart.AxisX_Points_Append(iPos, Str(iPos))

  oChart.AddBar(iPos, 3, &cFF0000)  'rote Farbe

  next

 

  oChart.AxisX_Title_Font.FontSize = 8

  oChart.AxisX_Title = "Prüfungen"

 

  // Chart der Seite hinzufügen

  me.Page_Last.Element_Add(oChart)

 

  // dem report mitteilen, das die Erstellung beendet ist

  me.EndCreate

 

  // Methode Build der Übergeordneten Klasse aufrufen

  Super.Build

 

Beachten Sie bitte dabei, dass bei längeren Operationen bzw. vor jedem Hinzufügen einer neuen Seite überprüft wird, ob der Benutzer das Erstellen abgebrochen hat. Benutzen Sie dazu die Methode Cancelled. Liefert diese als Ergebnis „True“, dann unterbrechen Sie die Erstellung des Reports mit einem einfachen „Exit“.

Cancelled

Parameter:

-

Rückgabewert:

Boolean

 

Diese Funktion zeigt als Ergebnis, ob der Benutzer die Erstellung des Reports abgebrochen hat. In diesem Fall ist der Rückgabewert „True“.

Benutzen Sie diese Funktion während des Buildvorganges, um auf Benutzereingaben zu reagieren.

Constructor

Parameter:

poPrintpreview As cntPrintPreview =  nil

Rückgabewert:

-

 

Erzeugt ein neues Objekt vom Typ CRSRPage. Übergeben Sie als Parameter den Previewcontainer, in welchem der Report angezeigt wird. Daraufhin wird bei jedem Hinzufügen einer neuen Seite zu dem Report die Anzeige im Pageswitch des Previewcontainers aktualisiert. Wenn der Report nicht in einem Previewcontainer angezeigt wird, übergeben Sie den Wert „NIL“.

Beim Erzeugen eines neuen Objektes über den Constructor „New“, wird automatisch die Seitenorientierung auf „Portrait“ und alle Seitenränder auf 15mm gesetzt.

 

Destructor

Parameter:

-

Rückgabewert:

-

 

Gibt belegten Speicher wieder frei. Rufen Sie den Destructor nicht direkt auf, sondern setzen das Objekt auf „NIL“.

Element_Find

Parameter:

psName As String

Rückgabewert:

CRSRPrintElement

 

Funktion zum Senden in alle Seiten des Reports nach dem Printelement, welches über den Parameter psName angegeben wird und dieses als Ergebnis zurück liefert. Wird das Printelement nicht gefunden oder wird ein leerer String übergeben, liefert die Funktion als Rückgabewert „NIL“ zurück.

Benutzen Sie diese Methode, um nachträglich z.B. den Text für ein Element zu ändern.

 

Beispiel:

Im nachfolgenden Codeausschnitt wird ein Textelement erstellt und im späteren Verlauf die Textfarbe geändert.

 

.

.

.

dim oElement As CRSRPrintElement

Dim oElement_Text As CRSRText

oElement_Text= new CRSRText

oElement_Text.Name="Spalte 25"

oElement_Text.Left_Pixel=5

oElement_Text.Text="Seite 25"

me.Page_Last.Element_Add oElement_Text

.

.

.

oElement=me.Element_Find("Last Element")

if oElement<>nil then

  if oElement isa CRSRText then

    CRSRText(oElement).Font. FontColor=&cFF0000

  end if

end if

.

.

.

EndCreate

Parameter:

-

Rückgabewert:

-

 

Methode, die dem Report mitteilt, dass die Erstellung des Reports beendet ist. Nach Aufruf dieser Methode wird der Zeiger auf Page_Last freigegeben.

Get_PageOriantation

Parameter:

-

Rückgabewert:

Integer

 

Liefert als Ergebnis die aktuell eingestellte Seitenorientierung. Mögliche Rückgabewerte sind:

constPrint_PageOrientation_Landscape       =          Querformat

constPrint_PageOrientation_Portrait            =          Hochformat

Page_AddNew

Parameter:

-

Rückgabewert:

-

 

Fügt dem Report eine neue Seite hinzu und aktualisiert die Anzeige der Seitenzahlen im Pagswitch des Previewcontainers, wenn beim Erzeugen des Reports ein Previewcontainer übergeben wurde.

Page_Get

Parameter:

piPageNumber As Integer

Rückgabewert:

CRSRPage

 

Funktion, welche die über den Parameter piPageNumber angegebene Seite liefert. Hat die angegebene Seitennummer einen ungültigen Wert, ist der Rückgabewert „NIL“.

Print_AllPages

Parameter:

pbShowPrinterdialog As Boolean=true

Rückgabewert:

-

 

Methode, welche alle Seiten im Report druckt. Über den Parameter pbShowPrinterDialog steuern Sie, ob der Dialog „Drucken“ angezeigt werden soll. Standardmäßig wird der Dialog angezeigt.

Print_Check

Parameter:

-

Rückgabewert:

Boolean

 

Überprüft, ob das Programm eine Demoversion ist und liefert daraufhin zurück, ob ein Ausdruck erfolgen darf. Momentan liefert diese Funktion immer „True“ zurück.

 

 

 

 

Print_Page

Parameter:

piPage As Integer

pbShowPrinterdialog As Boolean = true

Rückgabewert:

-

 

Methode, welche die über den Parameter piPage angegebene Seite ausdruckt. Über den Parameter pbShowPrinterdialog können Sie steuern, ob der Dialog „Drucken“ angezeigt werden soll. Standardmäßig wird der Dialog angezeigt.

Set_BorderWidth_MM

Parameter:

pdLeft_MM As Double

pdRight_MM As Double

pdTop_MM As Double

pdBottom_MM As Double

Rückgabewert:

-

 

Methode zum Setzen der Seitenränder in Millimetern. Die Parameter sind die Millimeterwerte für die Ränder links, rechts, oben und unten.

Set_BorderWidth_Pixel

Parameter:

pdLeft As Double

pdRight As Double

pdTop As Double

pdBottom As Double

Rückgabewert:

-

 

Methode zum Setzen der Seitenränder in Pixel. Die Parameter sind die Pixelwerte für die Ränder links, rechts, oben und unten.

Set_PageOrientation

Parameter:

piOrientation As integer

Rückgabewert:

-

 

Methode zum Setzen der Seitenorientierung. Der Parameter piOriantation gibt die entsprechende Orientierung an. Folgende Werte sind möglich:

constPrint_PageOrientation_Landscape       =          Querformat

constPrint_PageOrientation_Portrait            =          Hochformat

 

CRSRPage

Die Klasse CRSRPage enthält die einzelnen Elemente einer Seite. Neue Elemente werden über die Methode Element_Add hinzugefügt. Einzelne Elemente können über die Methode Element_Find zum nachträglichen Bearbeiten zurück geliefert werden. Das eigentliche Seitenobjekt wird mit der Methode GetDrawPageObject geliefert.

 

Methoden

Constructor

Parameter:

-

Rückgabewert:

-

 

Über den Constructor wird ein neues Objekt erzeugt und benötigte interne Objekte erstellt. Benutzen Sie den Constructor nicht direkt, sondern die Methode New.

 

Beispiel:

Dim oPage as CRSRPage

oPage = new CRSRPage

Element_Add

Parameter:

pvPageElement As Variant

Rückgabewert:

-

 

Die Methode Element_Add fügt ein Druckelement der Seite hinzu. Nachfolgende Elemente können einer Seite über den Parameter pvPageElement hinzugefügt werden:

-          CRSRRectangle

-          CRSRText

-          CRSRLine

-          CRSRImage

-          CRSRCheckbox

-          CRSROval

-          CRSRGroup

-          CRSRChart_Bars

-          CRSRChart_Lines

Nach dem Aufruf der Methode wird überprüft, ob das übergebene Element eines vom Typ der vorgenannten ist. Sollte das übergebene Element nicht den vorgenannten Typen entsprechen, wird der Vorgang abgebrochen.

Element_Find

Parameter:

psName As String

Rückgabewert:

CRSRPrintElement

 

Funktion zum Suchen nach dem Printelement in der Seite, welches über den Parameter psName angegeben wird, und dieses als Ergebnis zurück liefert. Wird das Printelement nicht gefunden oder wird ein leerer String übergeben, liefert die Funktion als Rückgabewert „NIL“ zurück.

Benutzen Sie diese Methode, um nachträglich z.B. den Text für ein Element zu ändern.

GetDrawPageObject

Parameter:

pbForPreview As Boolean=true

Rückgabewert:

Group2D

 

Funktion, welche als Ergebnis die Seite als Group2D-Objekt zurück liefert. Der Parameter pbForPreview gibt an, ob das Objekt für die Preview oder den Ausdruck benötigt wird. Hat der Parameter den Wert „True“, wird ein Objekt geliefert, dessen Elemente die Eigenschaft VisibleByPreview=true besitzen. Ist der Wert des Parameter „False“, wird dementsprechend ein Objekt geliefert, bei welchem die Elemente in ihrer Eigenschaft VisibleByPrinting den Wert „True“ haben.

 

CRSRGroup

Die Klasse CRSRGroup wird verwendet, um Printelemente(CRSRText, CRSRLine usw.) oder weiter Gruppen zu einer Gruppe zusammenzufassen. Weiterhin besteht die Möglichkeit, die zu einer Gruppe zusammengefassten Objekte unabhängig von der Seite zu skalieren.

Properties

Scale

Double – gibt den Wert der Skalierung an. Diese Eigenschaft legt fest, auf welchen Wert die Gruppe nach der Erstellung skaliert wird. Defaultwert ist 100.

Methoden

Constructor

Parameter:

pdLeft_MM As Double

pdTop_MM As Double

Rückgabewert:

-

 

Erzeugt ein neues Objekt vom Typ CRSRGroup. Die Parameter geben die Position des Objektes in der Seite in Millimeter an. Benutzen Sie den Constructor nicht direkt, sondern verwenden die Methode „New“.

 

Beispiel:

.

.

.

dim oGroup As CRSRGroup

oGroup = new CRSRGroup(10,10)

.

.

.

Destructor

Parameter:

-

Rückgabewert:

-

 

Gibt belegten Speicher wieder frei. Rufen Sie den Destructor nicht direkt auf, sondern setzen Sie das Objekt auf „NIL“.

Element_Add

Parameter:

pvGroupElement As Variant

Rückgabewert:

-

 

Methode, mit welcher der Gruppe weitere Druckelemente hinzugefügt werden. Nachfolgende Elemente können einer Seite über den Parameter pvGroupElement hinzugefügt werden:

-          CRSRRectangle

-          CRSRText

-          CRSRLine

-          CRSRImage

-          CRSRCheckbox

-          CRSROval

-          CRSRGroup

-          CRSRChart_Bars

-          CRSRChart_Lines

Nach dem Aufruf der Methode wird überprüft, ob das übergebene Element eines vom Typ der vorgenannten ist. Sollte das übergebene Element nicht den vorgenannten Typen entsprechen, wird der Vorgang abgebrochen.

Element_Find

Parameter:

psName As String

Rückgabewert:

CRSRPrintElement

 

Funktion zum Suchen nach dem Printelement in der Gruppe, welches über den Parameter psName angegeben wird, und dieses als Ergebnis zurück liefert. Wird das Printelement nicht gefunden oder wird ein leerer String übergeben, liefert die Funktion als Rückgabewert „NIL“ zurück.

Benutzen Sie diese Methode, um nachträglich z.B. den Text für ein Element zu ändern.

GetDrawGroupObjekt

Parameter:

pbForPreview As Boolean=true

Rückgabewert:

Group2D

 

Funktion, welche als Ergebnis die Gruppe als Group2D-Objekt zurück liefert. Der Parameter pbForPreview gibt an, ob das Objekt für die Preview oder den Ausdruck benötigt wird. Hat der Parameter den Wert „True“, wird ein Objekt geliefert, dessen Elemente die Eigenschaft VisibleByPreview=true besitzen. Ist der Wert des Parameter „False“, wird dementsprechend ein Objekt geliefert, bei welchem die Elemente in ihrer Eigenschaft VisibleByPrinting den Wert „True“ haben.

Height_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert als Ergebnis die benötigte Höhe der gesamten Gruppe in Millimetern zurück.

CRSRPrintElement

 

Die Klasse CRSRPrintElement ist die Grundklasse für die nachfolgenden abgeleiteten Klassen:

-          CRSRImage

-          CRSRLine

-          CRSROval

-          CRSRText

-          CRSRRectangle

-          CRSRCheckbox.

CRSRPrintElement ist abgeleitet von der Klasse Group2D.

Properties

Left_Pixel

Double – referenziert die linke Position auf einer Seite bzw. in einer Gruppe

Name

String – Name des Objektes. Setzen Sie diese Eigenschaft, wenn sie im Programmverlauf nach dem Hinzufügen des Objekts zu einer Seite oder Gruppe noch einmal auf das Objekt zugreifen möchten. Hat das Objekt einen eindeutigen Namen, kann es über die Methode Element_Find der Klasse CRSRReport, CRSRPage oder CRSRGroup gefunden werden.

Top_Pixel

Double – referenziert die obere Position auf einer Seite bzw. in einer Gruppe.

VisibleByPreview

Boolean – gibt an, ob das Objekt in der Preview sichtbar ist.

VisibleByPrinting

Boolean – gibt an, ob das Objekt beim Druck sichtbar ist.

Events

drawSelf

Eventdefinition – wird nach einem Aufruf der Methode Refresh ausgelöst. Je nachdem, ob für die Preview oder den Ausdruck benötigt, wird der Event anhand der Werte der Visible… Eigenschaft ausgelöst.

 

Methoden

Left_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert den Millimeterwert für die linke Position des Objektes in der Seite oder Gruppe.

Left_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die linke Position des Objektes in der Seite oder Gruppe. Der Parameter pdValue ist der Wert für die linke Position in Millimetern.

Refresh

Parameter:

pbPreview As Boolean=True

Rückgabewert:

-

 

Methode, welche das Group2D-Objekt erneuert. Der Parameter pbPreview gibt an, ob dieser für den Ausdruck benötigt wird oder für die Vorschau. Daraufhin wird der Event „drawSelf“ anhand der Werte der Eigenschaften „Visible…“ ausgelöst.

Top_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert den Millimeterwert für die obere Position des Objektes in der Seite oder Gruppe.

Top_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die obere Position des Objektes in der Seite oder Gruppe. Der Parameter pdValue ist der Wert für die obere Position in Millimetern.

 

CRSRImage

Die Klasse CRSRImage ist von der Klasse CRSRPrintElement abgeleitet. Sie wird verwendet, um Bilder einer Seite(CRSRPage) oder einer Gruppe(CRSRGroup) hinzuzufügen.

Properties

Picture

Picture – enthält das Bild, welches dargestellt werden soll.

ScaleFactor

Double – gibt an, um welchen Faktor das Bild skaliert werden soll. Der Defaultwert ist 100. Im Event „drawSelf“ wird das Bild um den jeweiligen Faktor skaliert ausgegeben.

Events

drawSelf

Wird durch die Methode „Refresh“ der übergeordneten Klasse CRSRPrintElement ausgelöst. In dem Event wird das Objekt dem Group2D-Objekt hinzugefügt.

CRSRLine

Die Klasse CRSRLine ist von der Klasse CRSRPrintElement abgeleitet. Sie wird verwendet um Bilder einer Seite(CRSRPage) oder einer Gruppe(CRSRGroup) hinzuzufügen.

Properties

LeftEnd_Pixel

Double – Position des Endpunktes der Linie von links in Pixel. Wird benötigt, wenn die Eigenschaft „Straight“ den Wert „constPrint_Straight_None“ hat.

Length_Pixel

Double – Länge der Linie in Pixel. Wird benötigt, wenn die Eigenschaft „Straightnicht den Wert „constPrint_Straight_None“ hat.

LineColor

Color – Farbe der Linie

Straight

String – Ausrichtung der Linie. Folgende Werte sind möglich:

 

Wert

Ausrichtung

constPrint_Straight_None

freie Ausrichtung im Raum, Anfangs- und Endpunkte müssen gesetzt werden

constPrint_Straight_Vertical

gerade vertikale Linie

constPrint_Straight_Horizontal

gerade horizontale Linie

constPrint_Straight_Diagonal_RL

Diagonale Ausrichtung im Winkel von 45°, von rechts oben nach links unten

constPrint_Straight_Diagonal_LR

Diagonale Ausrichtung im Winkel von 45°, von links oben nach rechts unten

 

Thickness_Pixel

Double – Linienstärke in Pixel

TopEnd_Pixel

Double – Position des Endpunktes der Linie von oben in Pixel. Wird benötigt, wenn die Eigenschaft „Straight“ den Wert „constPrint_Straight_None“ hat.

Events

drawSelf

Wird durch die Methode „Refresh“ der übergeordneten Klasse CRSRPrintElement ausgelöst. In dem Event wird das Objekt dem Group2D-Objekt hinzugefügt.

Methoden

Constructor

Parameter:

-

Rückgabewert:

-

 

Erstellt ein Objekt vom Typ CRSRLine. Benutzen Sie den Constructor nicht direkt, sondern verwenden die Methode „New“.

 

Beispiel:

.

.

.

dim oElement As CRSRLine

oElement = new CRSRLine

.

.

.

 

Constructor

Parameter:

pdLeft_MM As Double

pdTop_MM As Double

pdLength_MM As Double

pdThickness_MM As Double=1

Rückgabewert:

-

 

Erstellt ein Objekt vom Typ CRSRLine. Die Parameter geben die Position der Linie von links und oben in Millimeter, die Länge der Linie und die Linienstärke in Millimeter an. Benutzen Sie den Constructor nicht direkt, sondern verwenden die Methode „New“.

 

Beispiel:

.

.

.

dim oElement As CRSRLine

oElement = new CRSRLine(10,10,150,0.5)

.

.

.

LeftEnd_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Position des Endpunktes der Linie von links in Millimeter. Hat die Eigenschaft „Straight“ nicht den Wert „constPrint_Straight_None“, liefert diese Funktion „0“ als Ergebnis.

LeftEnd_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Position des Endpunktes der Linie von links in Millimeter. Hat die Eigenschaft „Straight“ nicht den Wert „constPrint_Straight_None“, wird der Wert nicht berücksichtigt.

Length_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Länge der Linie in Millimeter. Hat die Eigenschaft „Straight“ den Wert „constPrint_Straight_None“, liefert diese Funktion „0“ als Ergebnis.

Length_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Länge der Linie in Millimeter. Hat die Eigenschaft „Straight“ den Wert „constPrint_Straight_None“, wird der Wert nicht berücksichtigt.

Thickness_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Linienstärke in Millimeter.

Thickness_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Stärke der Linie in Millimeter.

TopEnd_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Position des Endpunktes der Linie von oben in Millimeter. Hat die Eigenschaft „Straight“ nicht den Wert „constPrint_Straight_None“, liefert diese Funktion „0“ als Ergebnis.

TopEnd_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Position des Endpunktes der Linie von oben in Millimeter. Hat die Eigenschaft „Straight“ nicht den Wert „constPrint_Straight_None“, wird der Wert nicht berücksichtigt.

CRSROval

Die Klasse CRSROval ist abgeleitet von der Klasse CRSRPrintElement. Sie wird benutzt, um Kreise und Ovale zu zeichnen. Diese Kreise/Ovale können einen Rand in einer bestimmten Stärke und Farbe haben, welcher von der Farbe des Kreises/Ovales abweichen kann.

Properties

BorderColor

Color – Setzt die Farbe des Randes um den Kreis/Oval

BorderThickness_Pixel

Double – Setzt die Stärke des Randes um den Kreis/Oval

FillColor

Color – Setzt die Farbe des Kreises/Ovals

Height_Pixel

Double – Setzt die Höhe des Kreises/Ovals in Pixel

Width_Pixel

Double – Setzt die Breite des Kreises/Ovals in Pixel

Events

drawSelf

Wird durch die Methode „Refresh“ der übergeordneten Klasse CRSRPrintElement ausgelöst. In dem Event wird das Objekt dem Group2D-Objekt hinzugefügt.

Methoden

Constructor

Parameter:

-

Rückgabewert:

-

 

Erstellt ein Objekt vom Typ CRSROval. Benutzen Sie den Constructor nicht direkt, sondern verwenden die Methode „New“.

 

Beispiel:

.

.

.

dim oElement As CRSROval

oElement = new CRSROval

.

.

.

Constructor

Parameter:

pdLeft_MM As Double

pdTop_MM As Double

pdWidth_MM As Double

pdHeight_MM As Double

poColor As Color=&c000000

Rückgabewert:

-

 

Erstellt ein Objekt vom Typ CRSROval. Die Parameter geben die Position des Kreises/Ovals von links und oben in Millimeter, die Breite und die Höhe in Millimeter und die Füllfarbe an. Benutzen Sie den Constructor nicht direkt, sondern verwenden die Methode „New“.

 

Beispiel:

Im nachfolgenden Beispiel wird ein Kreis erstellt. Dieser hat einen Durchmesser von 8mm, die Farbe Rot und wird in einem Abstand von links und oben je 10mm ausgerichtet.

.

.

.

dim oElement As CRSROval

oElement = new CRSROval(10,10,8,8,&cFF0000)

.

.

.

Height_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Höhe des Kreises/Ovals in Millimeter.

Height_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Höhe des Kreises/Ovals in Millimeter.

Width_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Breite des Kreises/Ovals in Millimeter.

 

 

Width_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Breite des Kreises/Ovals in Millimeter.

 

CRSRText

Die Klasse CRSRText ist eine der wichtigsten Klassen. Sie ist abgeleitet von der Klasse CRSRPrintElement.

Mit ihr lässt sich einzeiliger und mehrzeiliger Text darstellen. Weiterhin besteht die Möglichkeit, den Text zu drehen sowie ihn zu der üblichen linksbündigen Ausrichtung zentriert oder rechtsbündig auszugeben. Sie ist sehr vielseitig einsetzbar.

Es ist zu beachten, dass bei gedrehtem Text keine weiteren Elemente im selben Bereich dargestellt werden dürfen. Diese Elemente würden dann den Text überdecken.

Properties

Align

String – Setzt die Ausrichtung des Textes im Bereich des Elementes. Diese Eigenschaft tritt nur dann in Kraft, wenn die Breite des Textelements gesetzt wurde. Wurde diese nicht gesetzt oder ist sie kleiner als die vom Text benötigte Breite, wird der Text links ausgerichtet.

Für die Eigenschaft Align existieren nachfolgende Werte:

 

Wert

Ausrichtung

constPrint_AlignCenter

der Text wird im Bereich des Elementes zentriert ausgerichtet

constPrint_AlignLeft

der Text wird im Bereich des Elementes links ausgerichtet

constPrint_AlignRight

der Text wird im Bereich des Elementes rechts ausgerichtet

 

Besitzt die Eigenschaft keinen der vorgenannten Werte wird der Text links ausgerichtet.

CuttingTextWithPoints

Boolean – Setzen Sie diese Eigenschaft,  um mit „ …“ die Weiterführung eines Textes zu signalisieren, der für die Größe des Elementes zu lang ist und daher nicht angezeigt wird. Defaultwert für diese Eigenschaft ist „True“. (Nachtrag alvi, 2007.06.28: Geht zur Zeit nicht zusammen mit 'WrapLines'.)

Font

CRSRFont – Bestimmen Sie über diese Eigenschaft das Erscheinungsbild des Textes. Legen Sie hier die Schriftart, -größe und -farbe fest. Weiterhin besteht die Möglichkeit der Einstellung, ob der Text fett, kursiv oder unterstrichen dargestellt werden soll.

 

Beispiel:

Im nachfolgenden Beispiel wird ein Textelement erstellt. Danach wird die Schrift auf Verdana in der Größe 12 eingestellt und als Stil „Fett“ eingestellt

.

.

.

dim oElement As CRSRText

oElement = new CRSRText

oElement.Font.FontName = “Verdana”

oElement.Font.FontSize = 12

oElement.Font.Bold = True

.

.

.

LineSpace

Double – Setzen Sie hier den Zeilenabstand. Benutzen Sie für diese Eigenschaft die nachfolgenden Werte:

 

Wert

Zeilenabstand

constPrint_LineSpace_Normal

die einzelnen Zeilen werden mit einem normalen Abstand dargestellt

constPrint_LineSpace_OneAndAHalf

die einzelnen Zeilen werden mit einem anderthalbfachen Abstand dargestellt

constPrint_LineSpace_Double

die einzelnen Zeilen werden mit einem doppelten Abstand dargestellt

 

Defaultwert ist constPrint_LineSpace_Normal.

RotateAngle

Double – legen Sie hier fest, in welche Richtung der Text gedreht werden soll. Benutzen Sie für diese Eigenschaft die nachfolgenden Werte:

 

Wert

Darstellung

constPrint_Rotate_0Grad

der Text wird normal dargestellt

constPrint_Rotate_180Grad

der Text wird um 180° gedreht dargestellt

constPrint_Rotate_90GradLeft

der Text wird um 90° nach links gedreht dargestellt

constPrint_Rotate_90GradRight

der Text wird um 90° nach rechts gedreht dargestellt

 

Text

String – enthält den Text, der dargestellt werden soll.

VerticalAlign

String – legen Sie hier fest, wie der Text vertikal im Element ausgerichtet werden soll. Diese Eigenschaft wird nur bei um 90° gedrehtem Text verwendet und folgende Werte stehen zur Verfügung:

 

Wert

Ausrichtung

constPrint_VerticalAlign_Bottom

der Text wird im Element unten ausgerichtet

constPrint_VerticalAlign_Top

der Text wird im Element oben ausgerichtet

 

Defaultwert ist constPrint_VerticalAlign_Bottom.

Width_Pixel

Double – setzen Sie hier die Breite des Elements in Pixel.

WrapLines

Boolean – bestimmen Sie hier, ob der Text automatisch umgebrochen werden soll. Defaultwert ist „False“.

Events

drawSelf

Wird durch die Methode „Refresh“ der übergeordneten Klasse CRSRPrintElement ausgelöst. In dem Event wird das Objekt dem Group2D-Objekt hinzugefügt.

Methoden

Constructor

Parameter:

-

Rückgabewert:

-

 

Erzeugt ein neues leeres Textelement. Benutzen Sie den Constructor nicht direkt, sondern verwenden die Methode „New“.

 

Beispiel:

.

.

.

dim oElement As CRSRText

oElement = new CRSRText

.

.

.

Constructor

Parameter:

pdLeft_MM As Double

pdTop_MM As Double

psText As String

piFontSize As Integer=9

psFontName As String="Arial"

Rückgabewert:

-

 

Erstellt ein Objekt vom Typ CRSRText. Die Parameter geben die Position des Textes von links und oben in Millimeter  und den Text selbst an. piFontSize und psFontName sind optionale Parameter, welche die Schriftgröße und die zu verwendende Schriftart bestimmen. Benutzen Sie den Constructor nicht direkt, sondern verwenden die Methode „New“.

 

Beispiel:

Im nachfolgenden Beispiel wird ein Textobjekt erstellt, welches von links und oben je 10mm ausgerichtet ist, den Text „Montag“ enthält und in der Standardschrift (Arial, 9 Px) dargestellt werden soll.

.

.

.

 

dim oElement As CRSRText

oElement = new CRSRText(10,10,”Montag”)

.

.

.

 

Soll der Text in der Schriftart „Verdana“, Schriftgröße 12 dargestellt werden, muss der Constructor in folgender Weise benutzt werden:

.

.

.

dim oElement As CRSRText

oElement = new CRSRText(10,10,”Montag”,12,”Verdana”)

.

.

.

Destructor

Parameter:

-

Rückgabewert:

-

 

Gibt belegten Speicher wieder frei. Rufen Sie den Destructor nicht direkt auf, sondern setzen Sie das Objekt auf „NIL“.

Font_AutoSize

Parameter:

piMinSize As Integer=6

Rückgabewert:

-

 

Rufen Sie diese Methode auf, um eine automatische Größenanpassung des Textes vorzunehmen. Ist der Text zu lang für das Textelement, wird er automatisch am Ende abgeschnitten. Haben Sie diese Methode aufgerufen, wird die Schriftgröße solange angepasst, bis der Text in das Textelement passt. Wurde die minimale, über den optionalen Parameter piMinSize angegebene Schriftgröße erreicht und ist der Text dennoch zu lang für das Textfeld, wird der Text in der minimalen Schriftgröße abgeschnitten dargestellt. (Nachtrag alvi, 2007.06.28: Geht zur Zeit nur mit einzeiligen Texten.)

Height_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Höhe des Textobjektes in Millimeter.

Height_Pixel

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Höhe des Textobjektes in Pixel.

TextHeight_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert als Ergebnis die benötigte Höhe des Textes in Millimeter. Haben Sie die Höhe des Textobjektes über die Methode Height_Pixel oder Height_MM angegeben, wird dieser Wert als Ergebnis geliefert.

Text_Missing

Parameter:

-

Rückgabewert:

String

 

Liefert als Ergebnis den Text, welcher von der Höhe des Textobjektes her nicht mehr in selbiges passt. Dazu muss die Eigenschaft WrapLines den Wert „True“ besitzen und die Höhe des Textobjektes muss definiert worden sein.

Width_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Breite des Textobjektes in Millimeter. Setzen Sie unbedingt diese Eigenschaft wenn der Text mit Zeilenumbruch ausgegeben werden soll.

Width_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Breite des Textobjektes in Millimeter.

 

CRSRRectangle

Die Klasse CRSRRectangle ist von der Klasse CRSRPrintElement abgeleitet. Mit ihr können farbige Rechtecke dargestellt werden. Diese können einen andersfarbigen Rahmen und abgerundete Ecken besitzen. Weiterhin kann einem Rechteck einzeiliger Text, der links, rechts oder zentriert ausgerichtet ist, hinzugefügt werden.

Properties

BorderColor

Color – Setzt die Farbe des Rahmens um das Rechteck. Defaultwert ist Schwarz.

BorderThickness_Pixel

Double – Setzt die Stärke des Randes in Pixel. Defaultwert ist „1“.

FillColor

Color – setzt die Füllfarbe des Rechtecks. Defaultwert ist Schwarz.

FillRectangle

Boolean – bestimmen Sie über diese Eigenschaft, ob das Rechteck mit der in FillColor angegebenen Farbe ausgefüllt werden soll. Defaultwert ist „False“.

Font

CRSRFont – Bestimmen Sie über diese Eigenschaft das Erscheinungsbild des Textes im Rechteck. Legen Sie hier die Schriftart, -größe und -farbe fest. Weiterhin besteht die Möglichkeit der Einstellung, ob der Text fett, kursiv oder unterstrichen dargestellt werden soll.

Height_Pixel

Double – Setzt die Höhe des Rechtecks in Pixel.

RoundCornerRadius_Pixel

Double – setzt den Radius der abgerundeten Ecken. Soll das Rechteck keine abgerundeten Ecken haben, tragen Sie hier den Wert „0“ ein. Der Defaultwert ist „0“.

Text

String – setzen Sie hier den Text, der in dem Rechteck angezeigt werden soll.

 

 

 

 

 

 

 

 

 

 

 

TextAlign

String – Setzt die Ausrichtung des Textes im Bereich des Elementes.

Für die Eigenschaft „TextAlign“ existieren nachfolgende Werte:

 

Wert

Ausrichtung

constPrint_AlignCenter

der Text wird im Bereich des Elementes zentriert ausgerichtet

constPrint_AlignLeft

der Text wird im Bereich des Elementes links ausgerichtet

constPrint_AlignRight

der Text wird im Bereich des Elementes rechts ausgerichtet

 

Defaultwert ist constPrint_AlignCenter.

 

TextMarginTop_Pixel

Double – Setzen Sie hier den Abstand des Textes von der oberen Kante des Rechtecks in Pixel. Weisen Sie der Eigenschaft den Wert „0“ zu, so wird der Text mittig im Rechteck ausgerichtet. Defaultwert ist „0“.

TextMargin_Pixel

Double – setzen Sie hier einen Wert für den Abstand des Textes vom linken bzw. rechten Rand des Rechtecks in Pixel. Hat die Eigenschaft „TextAlign“ den Wert „constPrint_AlignCenter“ ,wird der hier zugewiesene Wert nicht berücksichtigt. Defaultwert ist „0“.

Width_Pixel

Double – setzt die Breite des Rechtecks in Pixel.

Events

drawSelf

Wird durch die Methode „Refresh“ der übergeordneten Klasse CRSRPrintElement ausgelöst. In dem Event wird das Objekt dem Group2D-Objekt hinzugefügt.

Methoden

BorderThickness_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Stärke des Rahmens um das Rechteck in Millimeter.

 

 

 

 

 

 

BorderThickness_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Stärke des Rahmens um das Rechteck in Millimeter.

Constructor

Parameter:

-

Rückgabewert:

-

 

Erzeugt ein neues Rechteck. Benutzen Sie den Constructor nicht direkt, sondern verwenden die Methode „New“.

 

Beispiel:

.

.

.

dim oElement As CRSRRectangle

oElement = new CRSRRectangle

.

.

.

Height_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Höhe des Rechtecks in Millimeter.

Height_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Höhe des Rechtecks in Millimeter.

RoundCornerRadius_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt den Radius der abgerundeten Ecken des Rechtecks. Um ein Rechteck ohne abgerundete Ecken zu erstellen, weisen sie dieser Methode den Wert „0“ zu.

RoundCornerRadius_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert den Radius der abgerundeten Ecken des Rechtecks in Millimeter.

TextMarginTop_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt den Abstand des Textes zur oberen Kante des Rechtecks in Millimeter. Weisen Sie der Methode den Wert „0“ zu, wird der Text mittig im Rechteck ausgerichtet.

TextMarginTop_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert den Abstand des Textes zur oberen Kante des Rechtecks in Millimeter.

TextMargin_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt den Abstand des Textes vom linken bzw. rechten Rand des Rechtecks in Millimeter. Hat die Eigenschaft „TextAlign“ den Wert „constPrint_AlignCenter“, wird der hier zugewiesene Wert nicht berücksichtigt.

TextMargin_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert den Abstand des Textes vom linken bzw. rechten Rand des Rechtecks in Millimeter

Width_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Breite des Rechtecks in Millimeter.

Width_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Breite des Rechtecks in Millimeter.

 

CRSRCheckbox

Die Klasse CRSRCheckbox ist abgeleitet von der Klasse CRSRRectangle. Sie wird benutzt um ein Rechteck mit zwei gekreuzten Linien darzustellen.

Properties

CheckColor

Color – setzt die Farbe der gekreuzten Linien. Defaultwert ist Schwarz.

CheckLineThickness_Pixel

Double – setzt die Stärke der gekreuzten Linien in Pixel. Defaultwert ist „2“.

Value

Boolean – steuern Sie hier, ob die gekreuzten Linien sichtbar sind. Besitzt diese Eigenschaft den Wert „True“, werden die gekreuzten Linien angezeigt.

Events

drawSelf

Wird durch die Methode „Refresh“ der übergeordneten Klasse CRSRPrintElement ausgelöst. In dem Event wird das Objekt dem Group2D-Objekt hinzugefügt.

Methoden

CheckLineThickness_MM

Parameter:

pdValue As Double

Rückgabewert:

-

 

Setzt die Stärke der gekreuzten Linien in Millimeter.

CheckLineThickness_MM

Parameter:

-

Rückgabewert:

Double

 

Liefert die Stärke der gekreuzten Linien in Millimeter.

CRSRFont

In der Klasse CRSRFont werden alle Eigenschaften wie Schriftart, Schriftfarbe usw. für die Ausgabe von Text zusammengefasst.

Properties

Bold

Boolean – Gibt an, ob der Text fett dargestellt werden soll.

FontColor

Color – setzt die Farbe des Textes.

FontName

String – setzt die Schriftart des Textes.

FontSize

Integer – setzt die zu verwendende Schriftgröße.

Italic

Boolean – Gibt an, ob der Text kursiv dargestellt werden soll.

Underline

Boolean – Gibt an, ob der Text unterstrichen dargestellt werden soll.

Methoden

Constructor

Parameter:

-

Rückgabewert:

-

 

Erzeugt ein neues Objekt vom Typ CRSRFont. Dabei werden für die Eigenschaften Grundwerte vergeben. Nachfolgende Werte werden eingestellt:

 

Propertie

Wert

Bold

False

FontColor

Schwarz

FontName

Windows = „Arial“, MacOS = „Helvetica“, Linux = „System“

FontSize

10

Italic

False

Underline

False

 

 

Korrekturen / Ergänzungen:

 

- 2007.06.28, alvi: CRSRText -> Properties 'CuttingTextWithPoints'

CRSRText -> Properties 'CuttingTextWithPoints'        (ca. Seite 39)

Hinweis eingetragen, dass dies zur Zeit nicht genutzt werden kann, wenn die Funktion 'WrapLines' aktiviert wurde. Bei mehreren Zeilen - Zeilenumbrüchen - ist 'CuttingTextWithPoints' leider nicht aktivierbar.

 

- 2007.06.28, alvi: CRSRText -> Methode 'Font_AutoSize'

CRSRText -> Methode 'Font_AutoSize'      (ca. Seite 42)

Hinweis eingetragen, dass dies zur Zeit nur mit einzeiligen Texten genutzt werden kann.