Eigenschaften, Ereignisse & Methoden

Eigenschaften

den Inhalt und die Gestaltung eines Strichcodes zu bestimmen

Text Property Link
Text char

Text enthält den Inhalt des Barcodes. In der Regel wird dieser ohne Prüfziffer eingegeben.
Sie können Steuerzeichen in lesbarer Form eingeben: <CR>, <LF>, ...

Visual Basic:

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
    AxBarcode1.Text = TextBox1.Text
End Sub

Delphi:

procedure TForm1.Edit1Change(Sender: TObject);
begin
  Barcode1.Text := Edit1.Text;
end;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

ShowText Property Link
ShowText bool

TRUE: Der Barcode wird mit Klarschriftzeile dargestellt.
FALSE: Der Barcode wird ohne Klarschriftzeile dargestellt.

Beispiele:

ShowText=TRUE

ShowText=FALSE

Bitte beachten Sie, dass einige Barcode-Typen keine Klarschriftzeile haben. Dies gilt für QR Code, PDF417 und DataMatrix. Die ShowText-Eigenschaft hat keine Auswirkungen, wenn sie einen dieser Codes verwenden.

Visual Basic:

AxBarcode1.ShowText = True

Delphi:

Barcode1.ShowText := TRUE;

C#:

axBarcode1.ShowText = true;

VBA (Office):

Barcode1.ShowText = True

Type Property Link
Type long

Gibt den Barcodetyp mit einer eindeutigen Nummer an.

Value	Code	Name
0	ISBN-10	CODEISBN
1	EAN 13	CODEEAN13
2	EAN 8	CODEEAN8
3	EAN 5	CODEEAN5
4	EAN 2	CODEEAN2
5	UPC A	CODEUPCA
6	Code 39	CODE39
7	Code 25 Interleaved	CODE25I
8	Codabar	CODABAR
9	Code 25 Industrial	CODE25
10	Code 39 Extended	CODE39E
11	Code 128A	CODECODE128A
12	Code 128B	CODECODE128B
13	Code 128C	CODECODE128C
14	Code 128	CODECODE128
15	EAN/UCC 128	CODEEAN128
16	EAN 99	CODEEAN99
17	UPC E	CODEUPCE
18	PostNet	CODEPOSTNET
19	Royal Mail	CODEROYALMAIL
20	MSI	CODEMSI
21	Code 93	CODE93
22	Code 93 Extended	CODE93E
23	PZN7	CODEPZN8
24	Identcode	CODEIDENTCODE
25	Leitcode	CODELEITCODE
26	Code 39 Checksum	CODE39CHECKSUM
27	Code 39 Extended Checksum	CODE39ECHECKSUM
28	EAN/UCC 128 AI	CODEEAN128AI
29	EAN 14	CODEEAN14
30	ITF-14	CODEITF14
31	EAN-18/NVE	CODEEAN18
32	SSCC-18	CODESSCC18
33	Codabar Checksum	CODABARCHECKSUM
34	Code 25 Interleaved Checksum	CODE25ICHECKSUM
35	Code 25 Industrial Checksum	CODE25CHECKSUM
36	PDF417	CODEPDF417
37	DataMatrix	CODEDATAMATRIX
38	ISBN-13	CODEISBN13
39	ISBN-13 Dual	CODEISBN13DUAL
40	ISSN	CODEISSN
41	ISMN	CODEISMN
42	DataMatrix Square	CODEDATAMATRIXSQUARE
43	DataMatrix Rectangular	CODEDATAMATRIXRECTANGULAR
44	DataMatrix 10x10	CODEDATAMATRIX10X10
45	DataMatrix 12x12	CODEDATAMATRIX12X12
46	DataMatrix 8x18	CODEDATAMATRIX8X18
47	DataMatrix 14x14	CODEDATAMATRIX14X14
48	DataMatrix 8x32	CODEDATAMATRIX8X32
49	DataMatrix 16x16	CODEDATAMATRIX16X16
50	DataMatrix 12x26	CODEDATAMATRIX12X26
51	DataMatrix 18x18	CODEDATAMATRIX18X18
52	DataMatrix 20x20	CODEDATAMATRIX20X20
53	DataMatrix 12x36	CODEDATAMATRIX12X36
54	DataMatrix 22x22	CODEDATAMATRIX22X22
55	DataMatrix 16x36	CODEDATAMATRIX16X36
56	DataMatrix 24x24	CODEDATAMATRIX24X24
57	DataMatrix 26x26	CODEDATAMATRIX26X26
58	DataMatrix 16x48	CODEDATAMATRIX16X48
59	DataMatrix 32x32	CODEDATAMATRIX32X32
60	DataMatrix 36x36	CODEDATAMATRIX36X36
61	DataMatrix 40x40	CODEDATAMATRIX40X40
62	DataMatrix 44x44	CODEDATAMATRIX44X44
63	DataMatrix 48x48	CODEDATAMATRIX48X48
64	DataMatrix 52x52	CODEDATAMATRIX52X52
65	DataMatrix 64x64	CODEDATAMATRIX64X64
66	DataMatrix 72x72	CODEDATAMATRIX72X72
67	DataMatrix 80x80	CODEDATAMATRIX80X80
68	DataMatrix 88x88	CODEDATAMATRIX88X88
69	DataMatrix 96x96	CODEDATAMATRIX96X96
70	DataMatrix 104x104	CODEDATAMATRIX104X104
71	DataMatrix 120x120	CODEDATAMATRIX120X120
72	DataMatrix 132x132	CODEDATAMATRIX132X132
73	DataMatrix 144x144	CODEDATAMATRIX144X144
74	GS1-Data Matrix	CODEGS1DATAMATRIX
75	GS1-Data Matrix Square	CODEGS1DATAMATRIXSQUARE
76	GS1-Data Matrix Rectangular	CODEGS1DATAMATRIXRECTANGULAR
77	GS1-Data Matrix 10x10	CODEGS1DATAMATRIX10X10
78	GS1-Data Matrix 12x12	CODEGS1DATAMATRIX12X12
79	GS1-Data Matrix 8x18	CODEGS1DATAMATRIX8X18
80	GS1-Data Matrix 14x14	CODEGS1DATAMATRIX14X14
81	GS1-Data Matrix 8x32	CODEGS1DATAMATRIX8X32
82	GS1-Data Matrix 16x16	CODEGS1DATAMATRIX16X16
83	GS1-Data Matrix 12x26	CODEGS1DATAMATRIX12X26
84	GS1-Data Matrix 18x18	CODEGS1DATAMATRIX18X18
85	GS1-Data Matrix 20x20	CODEGS1DATAMATRIX20X20
86	GS1-Data Matrix 12x36	CODEGS1DATAMATRIX12X36
87	GS1-Data Matrix 22x22	CODEGS1DATAMATRIX22X22
88	GS1-Data Matrix 16x36	CODEGS1DATAMATRIX16X36
89	GS1-Data Matrix 24x24	CODEGS1DATAMATRIX24X24
90	GS1-Data Matrix 26x26	CODEGS1DATAMATRIX26X26
91	GS1-Data Matrix 16x48	CODEGS1DATAMATRIX16X48
92	GS1-Data Matrix 32x32	CODEGS1DATAMATRIX32X32
93	GS1-Data Matrix 36x36	CODEGS1DATAMATRIX36X36
94	GS1-Data Matrix 40x40	CODEGS1DATAMATRIX40X40
95	GS1-Data Matrix 44x44	CODEGS1DATAMATRIX44X44
96	GS1-Data Matrix 48x48	CODEGS1DATAMATRIX48X48
97	GS1-Data Matrix 52x52	CODEGS1DATAMATRIX52X52
98	GS1-Data Matrix 64x64	CODEGS1DATAMATRIX64X64
99	None	CODENONE
100	GS1-Data Matrix 72x72	CODEGS1DATAMATRIX72X72
101	GS1-Data Matrix 80x80	CODEGS1DATAMATRIX80X80
102	GS1-Data Matrix 88x88	CODEGS1DATAMATRIX88X88
103	GS1-Data Matrix 96x96	CODEGS1DATAMATRIX96X96
104	GS1-Data Matrix 104x104	CODEGS1DATAMATRIX104X104
105	GS1-Data Matrix 120x120	CODEGS1DATAMATRIX120X120
106	GS1-Data Matrix 132x132	CODEGS1DATAMATRIX132X132
107	GS1-Data Matrix 144x144	CODEGS1DATAMATRIX144X144
108	GS1-128	CODEGS1128
109	GTIN-8	CODEGTIN8
110	GTIN-12	CODEGTIN12
111	GTIN-13	CODEGTIN13
112	GTIN-14	CODEGTIN14
113	QR Code	CODEQRCODE
114	QR Code ECC Level L	CODEQRCODEECCLEVELL
115	QR Code ECC Level M	CODEQRCODEECCLEVELM
116	QR Code ECC Level Q	CODEQRCODEECCLEVELQ
117	QR Code ECC Level H	CODEQRCODEECCLEVELH
118	QR Code 21x21	CODEQRCODE21X21
119	QR Code 25x25	CODEQRCODE25X25
120	QR Code 29x29	CODEQRCODE29X29
121	QR Code 33x33	CODEQRCODE33X33
122	QR Code 37x37	CODEQRCODE37X37
123	QR Code 41x41	CODEQRCODE41X41
124	QR Code 45x45	CODEQRCODE45X45
125	QR Code 49x49	CODEQRCODE49X49
126	QR Code 53x53	CODEQRCODE53X53
127	QR Code 57x57	CODEQRCODE57X57
128	QR Code 61x61	CODEQRCODE61X61
129	QR Code 65x65	CODEQRCODE65X65
130	QR Code 69x69	CODEQRCODE69X69
131	QR Code 73x73	CODEQRCODE73X73
132	QR Code 77x77	CODEQRCODE77X77
133	QR Code 81x81	CODEQRCODE81X81
134	QR Code 85x85	CODEQRCODE85X85
135	QR Code 89x89	CODEQRCODE89X89
136	QR Code 93x93	CODEQRCODE93X93
137	QR Code 97x97	CODEQRCODE97X97
138	QR Code 101x101	CODEQRCODE101X101
139	QR Code 105x105	CODEQRCODE105X105
140	QR Code 109x109	CODEQRCODE109X109
141	QR Code 113x113	CODEQRCODE113X113
142	QR Code 117x117	CODEQRCODE117X117
143	QR Code 121x121	CODEQRCODE121X121
144	QR Code 125x125	CODEQRCODE125X125
145	QR Code 129x129	CODEQRCODE129X129
146	QR Code 133x133	CODEQRCODE133X133
147	QR Code 137x137	CODEQRCODE137X137
148	QR Code 141x141	CODEQRCODE141X141
149	QR Code 145x145	CODEQRCODE145X145
150	QR Code 149x149	CODEQRCODE149X149
151	QR Code 153x153	CODEQRCODE153X153
152	QR Code 157x157	CODEQRCODE157X157
153	QR Code 161x161	CODEQRCODE161X161
154	QR Code 165x165	CODEQRCODE165X165
155	QR Code 169x169	CODEQRCODE169X169
156	QR Code 173x173	CODEQRCODE173X173
157	QR Code 177x177	CODEQRCODE177X177
158	PZN8	CODEPZN8

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

Rotate Property Link
Rotate long

Die Ausrichtung des Barcodes in Grad (0, 90, 180, 270).

Beispiele

0 Grad

90 Grad

180 Grad

270 Grad

Visual Basic:

AxBarcode1.Rotate = 0
AxBarcode1.Rotate = 90
AxBarcode1.Rotate = 180
AxBarcode1.Rotate = 270

Delphi:

Barcode1.Rotate := 0;
Barcode1.Rotate := 90;
Barcode1.Rotate := 180;
Barcode1.Rotate := 270;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

Alignment Property Link
Alignment AlignConstants

Legt die Ausrichtung des Barcodes nach links, rechts oder zentriert fest. Sie können AlignLeft, AlignCenter oder AlignRight übergeben.

Beispiele:
ActiveBarcode: AlignLeft

AlignLeft

AlignCenter

ActiveBarcode: AlignRight

AlignRight

Definition der 'AlignConstants':

type
  AlignConstants = TOleEnum;
const
  ALIGNLEFT = $00000000;
  ALIGNCENTER = $00000001;
  ALIGNRIGHT = $00000002;

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

TypeName Property Link
TypeName char

Der Name des Barcodetyps.

Visual Basic:

AxBarcode1.TypeName = "EAN-13"
AxBarcode1.Text = "431234100707"

MessageBox.Show("Current barcode symbology is: " & AxBarcode1.TypeName)

Delphi:

Barcode1.TypeName := 'EAN-13';
Barcode1.Text := '431234100707';

Application.Messagebox(PChar(Barcode1.TypeName),'Current Barcode symbology',mb_ok);

VBA (Office):

Barcode1.TypeName = "EAN-13"
Barcode1.Text = "431234100707"

MsgBox ("Current barcode symbology is: " & Barcode1.TypeName)

IsValid Property Link
IsValid bool

Gibt TRUE zurück, wenn der Barcode gültig ist. Zeigt an, ob der Barcode gültig ist. Wenn der Barcode ungültig ist, kann der zu codierende Text nicht mit dem ausgewählten Barcodetyp dargestellt werden.

Visual Basic:

    If AxBarcode1.IsValid = False Then
        MessageBox.Show("Barcode is not valid. Please change properties")
    End If

IsSizeOk Property Link
IsSizeOk bool

Gibt an, ob der Barcode korrekt angezeigt werden kann. Gibt TRUE zurück, wenn die Abmessungen des Steuerelements groß genug sind, um den Barcode anzuzeigen. Dieser Wert kann nur TRUE werden, wenn der Barcode selbst korrekt ist - d.h. der Wert IsValid ist ebenfalls TRUE.

Visual Basic:

    If AxBarcode1.IsSizeOk = False Then
        MessageBox.Show("Objects size is to small. Please enlarge")
    End If

Checksum Property Link
Checksum long

Gibt die Prüfziffer zurück.

Visual Basic:

AxBarcode1.TypeName = "EAN-13"
AxBarcode1.Text = "431234100707"
MessageBox.Show("The check digit of this code is: " & AxBarcode1.Checksum)

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Application.Messagebox(Pchar(inttostr(Barcode1.Checksum)),
                       'The barcodes check digit',mb_ok);

Picture Property Link
Picture pictureobject

Gibt das Barcodebild zurück.
Wenn Sie das Bild in einer bestimmten Größe benötigen, verwenden Sie die CreatePictureBySize-Methode, bevor Sie das Bild abrufen.

Visual Basic:

' Set the bitmap picture of the barcode to the clipboard
Clipboard.Clear()
Clipboard.SetImage(AxBarcode1.Picture)

BackColor Property Link
BackColor OLE_Color

Hintergrundfarbe des Barcodes.

Beispiele:

Weiß BackColor

Grün BackColor

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.BackColor = &HFFFFFF ' White

ForeColor Property Link
ForeColor OLE_Color

Vordergrundfarbe des Barcodes.

Beispiele:

ActiveBarcode: Barcode with black forecolor

Schwarz Forecolor

ActiveBarcode: Barcode with green forecolor

Grün Forecolor

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.ForeColor = &H000000 ' Black

Font Property Link
Font fontobject

Gibt die Schriftart nach Name, Stil, Effekten und Größe für die Klarschriftzeile an.

Die Font-Eigenschaft ist ein Objekt, das die verschiedenen Eigenschaften der Schriftart verfügbar macht..

Die Verwendung des Font-Objekts ist wie folgt:

Ändern der Größe:
Barcode1.Font.Size = 10

Ändern der Schriftart:
Barcode1.Font.Name = "Arial"

Ändern Sie den Stil und die Effekte:
Barcode1.Font.Bold = True
Barcode1.Font.Italic = True
Barcode1.Font.Underline = True
Barcode1.Font.Strikethrough = True

In einigen Entwicklungsumgebungen werden diese Eigenschaften durch Enumerationstypen bestimmt, z.B. Delphi. Werfen Sie einen Blick in die Hilfe der Entwicklungsumgebung für Informationen zur Handhabung dieser Typen.

Beispiele:

Font: Arial, 12pt, Bold

Font: Comix, 14pt, Standard

Delphi:

Barcode1.Font.name := 'Courier New';
Barcode1.Font.size := 14;
Barcode1.Font.style := [fsbold];

Version Property Link
Version char

Gibt die Versionsnummer des Barcodeobjekts zurück.

Visual Basic:

   MessageBox.Show("The barcode objects version is: " & AxBarcode1.version)

Delphi:

Application.Messagebox(Pchar(Barcode1.Version),
                       'The barcode objects version number',mb_ok);

BorderHeight Property Link
BorderHeight long

Höhe des Rahmens über und unter dem Barcode in Pixel. Der Rahmen wird in der aktuellen Hintergrundfarbe dargestellt.

Beispiele:

BorderHeight=4

BorderHeight=20

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

BorderWidth Property Link
BorderWidth long

Breite des Rahmens links und rechts des Barcodes in Pixel. Der Rahmen wird in der aktuellen Hintergrundfarbe dargestellt.

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

MaxBorderHeight Property Link
MaxBorderHeight long

Der maximal mögliche Wert von BorderHeight.

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

MaxBorderWidth Property Link
MaxBorderWidth long

Der maximal mögliche Wert von BorderWidth.

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

NotchHeightInPercent Property Link
NotchHeightInPercent long

Länge der Kerben in Prozent.

Beispiele:

NotchHeightInPercent=50

NotchHeightInPercent=100

NotchHeightInPercent=0

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

PrintFix Property Link
PrintFix bool

Nicht verwendet. Keine Funktionalität seit Version 6.0.0.

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

AutoType Property Link
AutoType bool

ActiveBarcde versucht, den Barcodetyp automatisch zu erkennen. Diese Eigenschaft ist veraltet und sollte nicht herangezogen werden. Es ist aus Kompatibilitätsgründen mit alten Versionen implementiert.

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

Ereignisse

werden ausgelöst, wenn sich Eigenschaften ändern

TypeChange Event Link
TypeChange BarcodeType:long

Wird ausgelöst, wenn der Barcodetyp geändert wird. Die Eigenschaft Type wird übergeben und kann verwendet werden.

Visual Basic:

Private Sub AxBarcode1_TypeChange(sender As Object, 
            e As AxBARCODELib._DBarcodeEvents_TypeChangeEvent) Handles AxBarcode1.TypeChange
    MessageBox.Show("Barcode symbology changed to: " & AxBarcode1.TypeName)
End Sub

TextChange Event Link
TextChange Text:char

Wird ausgelöst, wenn der Barcodetext geändert wird. Die Eigenschaft Text wird übergeben und kann verwendet werden.

Visual Basic:

Private Sub AxBarcode1_TextChange(sender As Object, 
            e As AxBARCODELib._DBarcodeEvents_TextChangeEvent) Handles AxBarcode1.TextChange
    MessageBox.Show("Barcode content changed to: " & AxBarcode1.Text)
End Sub

ShowTextChange Event Link
ShowTextChange ShowText:bool

Wird ausgelöst, wenn die Anzeige des Barcodetexts aktiviert oder deaktiviert ist. Die Eigenschaft ShowText wird übergeben und kann verwendet werden.

Visual Basic:

Private Sub AxBarcode1_ShowTextChange(sender As Object, 
        e As AxBARCODELib._DBarcodeEvents_ShowTextChangeEvent) Handles AxBarcode1.ShowTextChange
    If AxBarcode1.ShowText = False Then
        MessageBox.Show("Human readable text is disabled now")
    End If
End Sub

AutoTypeChange Event Link
AutoTypeChange AutoType:bool

Wird ausgelöst, wenn die Autotype-Option aktiviert oder deaktiviert ist. Die Eigenschaft Autotype wird übergeben und kann verwendet werden.

Methoden

Funktionen zur Automatisierung des Barcode-Objekts.

CopyToClipboard Method Link
CopyToClipboard : bool

Kopiert den Barcode im Meta-Grafikformat in die Zwischenablage. Gibt TRUE zurück, wenn erfolgreich.

Visual Basic:

Private Sub CopyButton_Click(sender As Object, e As EventArgs) Handles CopyButton.Click
    AxBarcode1.CopyToClipboard()
End Sub

Delphi:

procedure TForm1.CopyButtonClick(Sender: TObject);
begin
  Barcode1.CopyToClipboard; 
end;

CopyToClipboardBySize Method Link
CopyToClipboardBySize (Width: Integer, Height: Integer): Bool

Kopiert den Barcode im Meta-Grafikformat in die Zwischenablage. Die Größe des Barcodes wird durch die Argumente Breite und Höhe angegeben. Gibt TRUE zurück, wenn erfolgreich.

Visual Basic:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
' Assigns a sized image of the barcode to the clipboard
    AxBarcode1.CopyToClipboardBySize(600, 400)
End Sub

CreatePictureBySize Method Link
CreatePictureBySize (Width: Integer, Height: Integer): Bool

Ermöglicht die Verarbeitung einer benutzerdefinierten Picture-Eigenschaft. Die Größe des Barcodebildes wird durch die Argumente Breite und Höhe angegeben. Gibt TRUE zurück, wenn erfolgreich.

Visual Basic:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
' Create an image of the barcode in specific size and assigns this to the clipboard
    AxBarcode1.CreatePictureBySize(800, 800)
    Clipboard.SetImage(AxBarcode1.Picture)
End Sub

SaveAs Method Link
SaveAs (path: WideString): Smallint

Speichert den aktuellen Barcode als Bilddatei (BMP, JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP, XPM). Die Bildgröße ist die aktuelle Größe des Steuerelements. Der verwendete Bilddateityp wird durch die Erweiterung des Dateinamens definiert (z. B. BMP für eine Windows-Bitmap).

Verwandtes Thema: Bilddateioptionen

Delphi:

Barcode1.SaveAs(MyFileName);

SaveAsBySize Method Link
SaveAsBySize (path: WideString, Width: Integer, Height: Integer): Smallint

Speichert den aktuellen Barcode als Bilddatei (BMP, JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP, XPM). Die Bildgröße wird durch die Parameter Breite und Höhe angegeben. Der verwendete Bilddateityp wird durch die Erweiterung des Dateinamens definiert (z. B. BMP für eine Windows-Bitmap).

Verwandtes Thema: Bilddateioptionen

Delphi:

Barcode1.SaveAsBySize(MyFileName,600,200);

SaveAsBySizeExtended Method Link
SaveAsBySizeExtended (path: WideString, Width: Integer, Height: Integer, Format: Integer, ColorDepth: Integer, Transparent: Integer, Flags: Integer, Angle: Integer, DPI: Integer): Smallint

Erweiterte Version der SaveAsBySize-Methode.

Speichert den aktuellen Barcode als Bilddatei.

Die Bildgröße wird durch die Parameter width und height angegeben.

Der Bilddateityp wird durch den Parameter Formatangegeben.Legen Sie es auf -1 fest, wenn Sie die automatische Dateitypauswahl durch die Dateinamenerweiterung verwenden möchten.

Die Farbtiefe wird in Bit (1, 8, 16, 24, 32) festgelegt.

Die Option transparent ist noch nicht implementiert. Legen Sie es auf 0 fest, wenn keine Transparenz gewünscht wird, und auf -1, um den Hintergrund transparent festzulegen.

Verwenden Sie die Flags für spezielle Optionen.

Der Option angle wird verwendet, um das Bild zu drehen. Stellen Sie die Drehung in Grad (0-359) ein. Verwenden Sie den Wert -1 um den aktuell gesetzten Wert der Rotate Property zu übernehmen.

Verwenden Sie die Parameter dpi, um eine bestimmte Auflösung in DPI für die Bilddatei festzulegen. Dies kann in den Bildformaten BMP, JPEG, TIF und PNG verwendet werden. (0=kein DPI-Wert festlegen)

Hier finden Sie eine Liste der unterstützten Bilddateitypen, Farbtiefen und Flags.

Diese Methode unterstützt die folgenden Bildformate: Windows Bitmap (BMP), JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP und XPM.

Rückgabewerte dieser Funktion:
0 : File save ok. No errors.
1 : Error while saving file.
2 : Wrong colordepth for this file format
3 : Colordepth/angle combination not possible
4 : Filetype not supported
5 : Low memory
6 : Low memory
7 : Low memory

SetDemoText Method Link
SetDemoText

Legt die Eigenschaft Text auf einen gültigen Standardwert fest. Verwenden Sie dies zu Demonstrations- oder Testzwecken, um einen gültigen Code zu erhalten.

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

BinaryWriteAsPNGBySize Method Link
BinaryWriteAsPNGBySize (Width: Integer, Height: Integer): OleVariant

Gibt den aktuellen Barcode im PNG-Bildformat zurück. Die Größe wird durch die Parameter Breite und Höhe angegeben. Diese Methode ist ab der Enterprise Edition verfügbar.

BinaryWriteAsPNG Method Link
BinaryWriteAsPNG : OleVariant

Gibt den aktuellen Barcode im binären PNG-Bildformat der aktuellen Größe zurück. Diese Methode ist ab der Enterprise Edition verfügbar.

AboutBox Method Link
AboutBox

Öffnet den Info-Dialog von ActiveBarcode und zeigt die Version und andere Details an.

Visual Basic:

AxBarcode1.Type = 1 ' EAN-13
AxBarcode1.Text = "431234100707"
AxBarcode1.ForeColor = Color.DimGray
AxBarcode1.BackColor = Color.AntiqueWhite
AxBarcode1.BorderHeight = 10
AxBarcode1.BorderWidth = 20
AxBarcode1.Rotate = 90
AxBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER
AxBarcode1.NotchHeightInPercent = 50
AxBarcode1.AutoType = False
AxBarcode1.PrintFix = False
AxBarcode1.AboutBox
axBarcode1.SetDemoText

Delphi:

Barcode1.Type_ := 1; // EAN_13
Barcode1.Text := '431234100707';
Barcode1.Alignment := AlignLeft;
Barcode1.ForeColor := clDkGray;
Barcode1.BackColor := clCream;
Barcode1.BorderHeight := 10;
Barcode1.BorderWidth := 20;
Barcode1.NotchHeightInPercent := 50;
Barcode1.AutoType := FALSE;
Barcode1.PrintFix := FALSE;
Barcode1.AboutBox;
Barcode1.SetDemoText;
if (Barcode1.MaxBorderHeight < MyValue) then BEGIN DoAnything; END;
if (Barcode1.MaxBorderWidth < MyValue) then BEGIN DoAnything; END;

C#:

axBarcode1.Type = BARCODELib.TypeConstants.CODEEAN13;
axBarcode1.Text = "431234100707";
axBarcode1.ForeColor = Color.DimGray;
axBarcode1.BackColor = Color.AntiqueWhite;
axBarcode1.Rotate = 90;
axBarcode1.BorderHeight = 10;
axBarcode1.BorderWidth = 20;
axBarcode1.Alignment = BARCODELib.AlignConstants.ALIGNCENTER;
axBarcode1.NotchHeightInPercent = 50;
axBarcode1.AutoType = false;
axBarcode1.PrintFix = false;
axBarcode1.AboutBox;
axBarcode1.SetDemoText;

VBA (Office):

Barcode1.Type = 1 ' EAN-13
Barcode1.Text = "431234100707"
Barcode1.ForeColor = vbBlack
Barcode1.BackColor = vbWhite
Barcode1.BorderHeight = 10
Barcode1.BorderWidth = 20
Barcode1.Rotate = 90
Barcode1.Alignment = ALIGNCENTER
Barcode1.NotchHeightInPercent = 50
Barcode1.AutoType = False
Barcode1.PrintFix = False
Barcode1.AboutBox
Barcode1.SetDemoText

SaveAsPNG Method Link
SaveAsPNG (path: WideString): Smallint

Speichert den aktuellen Barcode als PNG-Bilddatei. Die Bildgröße ist die aktuelle Größe des Steuerelements.

Diese Funktion ist veraltet. Verwenden Sie stattdessen die Funktion SaveAs, die mehr Dateiformate unterstützt.

SaveAsPNGBySize Method Link
SaveAsPNGBySize (path: WideString, Width: Integer, Height: Integer): Smallint

Speichert den aktuellen Barcode als PNG-Bilddatei. Die Bildgröße wird durch die Breite und Höhe der Paramter angegeben.

Diese Funktion ist veraltet. Verwenden Sie stattdessen die Funktion SaveAsBySize, die mehr Dateiformate unterstützt.

Unterstützte Bilddateiformate

Die Funktionen SaveAs, SaveAsBySize und SaveAsBySizeExtended des ActiveBarcode-Steuerelements unterstützen verschiedene Bildformate und Farbtiefen:

Windows Bitmap

Extension: BMP
Format #: 0
1-bit s/w: ✔
8-bit: ✔
16-bit: ✔
24-bit: ✔
32-bit: ✔ default
Rastergrafik

JPEG

Extension: JPG, JPEG
Format #: 2
1-bit s/w: ✕
8-bit: gray
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Rastergrafik

Portable Network Graphic

Extension: PNG
Format #: 13
1-bit s/w: ✔
8-bit: ✔
16-bit: ✕
24-bit: ✔ default
32-bit: ✔
Rastergrafik

TIFF

Extension: TIF
Format #: 18
1-bit s/w: ✔
8-bit: ✔
16-bit: ✕
24-bit: ✔ default
32-bit: ✔
Rastergrafik

Targa

Extension: TGA
Format #: 17
1-bit s/w: ✕
8-bit: ✔
16-bit: ✔
24-bit: ✔ default
32-bit: ✔
Rastergrafik

GIF

Extension: GIF
Format #: 25
1-bit s/w: ✔
8-bit: ✔ default
16-bit: ✕
24-bit: ✕
32-bit: ✕
Rastergrafik

Windows Metafile Format

Extension: WMF
Format #: 101
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Vektorgrafik

Enhanced Metafile Format

Extension: EMF
Format #: 100
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Vektorgrafik

Wireless Bitmap

Extension: WBM, WBMP
Format #: 19
1-bit s/w: ✔ default
8-bit: ✕
16-bit: ✕
24-bit: ✕
32-bit: ✕
Rastergrafik

Portable Bit Map

Extension: PBM
Format #: 7
1-bit s/w: ✔ default
8-bit: ✕
16-bit: ✕
24-bit: ✕
32-bit: ✕
Rastergrafik

Portable Gray Map

Extension: PGM
Format #: 11
1-bit s/w: ✕
8-bit: gray/default
16-bit: ✕
24-bit: ✕
32-bit: ✕
Rastergrafik

Portable Pixel Map

Extension: PPM
Format #: 14
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Rastergrafik

X Pix Map

Extension: XPM
Format #: 23
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Rastergrafik

Als Standard markierte Farbtiefen werden verwendet, wenn Sie die SaveAs-Funktion, die SaveAsBySize-Funktion verwenden oder wenn Sie die Farbtiefe bei Verwendung der Funktion SaveAsBySizeExtended auf Null festlegen.

Farbtiefen für Bilddateien

Unterstützte Farbtiefen sind:

Farbtiefe	Beschreibung
1	1-bit monochrom ist das Bild s/w.
8	8-bit Farben oder Graustufen je nach Bildformat
16	16-bit TrueColor
24	24-bit TrueColor
32	32-bit TrueColor

Bitte beachten Sie, dass nicht jede Farbtiefe für jedes Bilddateiformat verfügbar ist.

Unterstützte Flags für Bilddateien

Sie können beim Speichern von Bilddateien die folgenden Flags verwenden:

Bildformat	Flag	Beschreibung
BMP	0x1	Speichert die Bitmap als RLE (Run Length Encoded)
JPEG	0x80 0x100 0x200 0x400 0x800	JPEG Qualität Super (100%) JPEG Qualität Gut (75%) JPEG Qualität Normal (50%) JPEG Qualität Durchschnitt (25%) JPEG Qualität Schlecht (10%)

DPI Einstellungen

Beim Speichern als JPEG-, PNG-, TIFF- oder BMP-Bildformat können Sie den DPI (Dots per Inch) festlegen, wenn Sie die SaveAsBySizeExtended-Methode verwenden.