Eigenschappen, Evenementen & Methoden

Eigenschappen

de inhoud en het ontwerp van een streepjescode bepalen

Text Property Link
Text char

Tekst bevat de inhoud van de barcode. Meestal wordt dit ingevoerd zonder controlegetal.
Je kunt controlecodes op deze manier invoeren in een voor mensen leesbare vorm: <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: De barcode heeft een voor mensen leesbare tekst.
FALSE: De barcode wordt weergegeven zonder de leesbare tekst.

Voorbeelden:

ShowText=TRUE

ShowText=FALSE

Houd er rekening mee dat sommige barcodetypes geen door mensen leesbare tekst hebben. Dit geldt voor QR Code, PDF417 en DataMatrix. De eigenschap ShowText heeft geen effect als een van deze codes wordt gebruikt.

Visual Basic:

AxBarcode1.ShowText = True

Delphi:

Barcode1.ShowText := TRUE;

C#:

axBarcode1.ShowText = true;

VBA (Office):

Barcode1.ShowText = True

Type Property Link
Type long

Geeft het type streepjescode op met een uniek nummer.

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

De oriëntatie van de streepjescode in graden (0, 90, 180, 270).

Voorbeelden

0 graden

90 graden

180 graden

270 graden

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

Stelt de uitlijning van de streepjescode links, rechts of gecentreerd in. Je kunt AlignLeft, AlignCenter of AlignRight doorgeven.

Voorbeelden:
ActiveBarcode: AlignLeft

AlignLeft

AlignCenter

ActiveBarcode: AlignRight

AlignRight

Verklaring van '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

De naam van het barcodetype.

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

Geeft WAAR als de streepjescode geldig is. Als het ongeldig is, kan de tekst niet worden gecodeerd met het geselecteerde barcodetype.

Visual Basic:

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

IsSizeOk Property Link
IsSizeOk bool

Geeft aan of de streepjescode correct kan worden weergegeven. Geeft WAAR als de afmetingen van het besturingselement groot genoeg zijn om de streepjescode weer te geven. Deze waarde kan alleen WAAR worden als de barcode zelf juist is - d.w.z. als de waarde IsValid ook WAAR is.

Visual Basic:

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

Checksum Property Link
Checksum long

Geeft het controlecijfer.

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

Geeft de afbeelding van de streepjescode.
Als je de afbeelding in een specifieke grootte nodig hebt, gebruik dan de methode CreatePictureBySize voordat je de afbeelding ophaalt.

Visual Basic:

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

BackColor Property Link
BackColor OLE_Color

Achtergrondkleur van de streepjescode.

Voorbeelden:

Wit BackColor

Groen 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

Voorgrondkleur van de barcode.

Voorbeelden:

ActiveBarcode: Barcode with black forecolor

Zwart Forecolor

ActiveBarcode: Barcode with green forecolor

Groen 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

Specificeert het lettertype met naam, stijl, effecten en de grootte voor de tekstregel.

De Font eigenschap is een object dat de verschillende eigenschappen van het lettertype illustreert.

Het font-object wordt als volgt gebruikt:

Wijzig de grootte:
Barcode1.Font.Size = 10

Lettertype wijzigen:
Barcode1.Font.Name = "Arial"

Verander de stijl en de effecten:
Barcode1.Font.Bold = True
Barcode1.Font.Italic = True
Barcode1.Font.Underline = True
Barcode1.Font.Strikethrough = True

In sommige ontwikkelomgevingen worden deze eigenschappen bepaald door opsommingstypen, bijvoorbeeld Delphi. Kijk in de help van het ontwikkelende systeem voor informatie over hoe je hiermee om moet gaan.

Voorbeelden:

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

Geeft als resultaat het versienummer van het barcodeobject.

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

Hoogte van de rand boven en onder de streepjescode in pixels. De rand wordt in de huidige achtergrondkleur geschilderd.

Voorbeelden:

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

Breedte van de rand links en rechts van de streepjescode in pixels. De rand wordt in de huidige achtergrondkleur geschilderd.

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

De maximaal mogelijke waarde van 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

De maximaal mogelijke waarde van 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

Lengte van de inkepingen in procenten.

Voorbeelden:

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

Niet gebruikt. Geen functionaliteit sinds versie 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 probeert het type streepjescode automatisch te detecteren. Deze eigenschap is verouderd en moet niet worden gebruikt. Het is geïmplementeerd voor compatibiliteit met oude versies.

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

Evenementen

worden geactiveerd wanneer eigenschappen veranderen

TypeChange Event Link
TypeChange BarcodeType:long

Wordt geactiveerd wanneer het barcodetype wordt gewijzigd. De eigenschap Type is doorgegeven en kan worden gebruikt.

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

Wordt geactiveerd wanneer de barcodetekst wordt gewijzigd. De eigenschap Text is doorgegeven en kan worden gebruikt.

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

Wordt geactiveerd wanneer de weergave van de barcodetekst wordt in- of uitgeschakeld. De eigenschap ShowText is doorgegeven en kan worden gebruikt.

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

Wordt geactiveerd wanneer de optie Autotype is ingeschakeld of uitgeschakeld. De eigenschap Autotype is doorgegeven en kan worden gebruikt.

Methoden

Krijg toegang tot de barcodeobjectfuncties en automatiseer deze.

CopyToClipboard Method Link
CopyToClipboard : bool

Kopieert de barcode in meta grafisch formaat naar het klembord. Geeft TRUE terug indien succesvol.

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

Kopieert de barcode in meta grafisch formaat naar het klembord. De grootte van de streepjescode wordt gespecificeerd door de argumenten breedte en hoogte. Geeft TRUE terug indien succesvol.

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

Hiermee kan een afbeelding van aangepaste grootte worden verwerkt. De grootte van de barcodeafbeelding wordt gespecificeerd door de argumenten breedte en hoogte. Geeft TRUE terug indien succesvol.

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

Slaat de huidige barcode op als afbeeldingsbestand (BMP, JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP, XPM). De afbeeldingsgrootte is de huidige grootte van het besturingselement. Het gebruikte type afbeeldingsbestand wordt bepaald door de extensie van de bestandsnaam (bijv. BMP voor een Windows Bitmap).

Gerelateerd onderwerp: Opties voor afbeeldingsbestanden

Delphi:

Barcode1.SaveAs(MyFileName);

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

Slaat de huidige barcode op als afbeeldingsbestand (BMP, JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP, XPM). De afbeeldingsgrootte wordt gespecificeerd door de parameters breedte en hoogte. Het gebruikte type afbeeldingsbestand wordt bepaald door de extensie van de bestandsnaam (bijv. BMP voor een Windows Bitmap).

Gerelateerd onderwerp: Opties voor afbeeldingsbestanden

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

Uitgebreide versie van de methode SaveAsBySize.

Slaat de huidige barcode op als afbeeldingsbestand.

De afbeeldingsgrootte wordt gespecificeerd door de parameters width en height.

Het bestandstype wordt gespecificeerd door de parameter format.Stel dit in op -1 als je de automatische bestandstypeselectie wilt gebruiken op basis van de extensie van de bestandsnamen.

De kleurdiepte is ingesteld in bit (1, 8, 16, 24, 32).

De optie transparant is nog niet geïmplementeerd. Stel deze in op 0 als transparantie niet gewenst is en op -1 om de achtergrond transparant te maken.

Gebruik de vlaggen voor speciale opties.

De optie hoek wordt gebruikt om de afbeelding te roteren. Stel de rotatie in graden in (0-359). Om deze optie te negeren met de huidige instelling van de rotate eigenschap stel hoek in op -1.

Gebruik de parameters dpi om een specifieke resolutie in DPI in te stellen voor het afbeeldingsbestand. Dit kan worden gebruikt in de afbeeldingsformaten BMP, JPEG, TIF en PNG. (0=geen DPI-waarde instellen)

Hier zie je een lijst met ondersteunde afbeeldingsbestandstypen, kleurdiepten en vlaggen.

Deze methode ondersteunt de volgende afbeeldingsindelingen: Windows Bitmap (BMP), JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP en XPM.

Retourwaarden van deze functie:
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

Stelt de eigenschap Tekst in op een geldige standaardwaarde. Gebruik dit voor demonstratie- of testdoeleinden om een geldige code te krijgen.

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

Geeft de huidige streepjescode in binair PNG-afbeeldingsformaat. De grootte wordt opgegeven door de parameters breedte en hoogte. Deze methode is alleen beschikbaar in de Enterprise Edition.

BinaryWriteAsPNG Method Link
BinaryWriteAsPNG : OleVariant

Geeft de huidige streepjescode in binair PNG-afbeeldingsformaat van de huidige grootte. Deze methode is alleen beschikbaar in de Enterprise Edition.

AboutBox Method Link
AboutBox

Opent het infodialoogvenster van ActiveBarcode en toont de versie en andere details.

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

Slaat de huidige barcode op als PNG-afbeeldingsbestand. De afbeeldingsgrootte is de huidige grootte van het besturingselement.

Deze functie is verouderd. Gebruik in plaats daarvan de functie SaveAs die meer bestandsindelingen ondersteunt.

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

Slaat de huidige barcode op als PNG-afbeeldingsbestand. De afbeeldingsgrootte wordt gespecificeerd door de parameters breedte en hoogte.

Deze functie is verouderd. Gebruik in plaats daarvan de functie SaveAsBySize die meer bestandsindelingen ondersteunt.

Ondersteunde afbeeldingsbestandsindelingen

De functies SaveAs, SaveAsBySize en SaveAsBySizeExtended van de ActiveBarcode Control ondersteunen verschillende afbeeldingsindelingen en kleurdiepten:

Windows Bitmap

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

JPEG

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

Portable Network Graphic

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

TIFF

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

Targa

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

GIF

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

Windows Metafile Format

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

Enhanced Metafile Format

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

Wireless Bitmap

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

Portable Bit Map

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

Portable Gray Map

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

Portable Pixel Map

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

X Pix Map

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

Kleurdiepten gemarkeerd als standaard worden gebruikt wanneer je de functie SaveAs, SaveAsBySize gebruikt of wanneer je de kleurdiepte op nul zet met de functie SaveAsBySizeExtended.

Kleurdiepten voor afbeeldingsbestanden

Ondersteunde kleurdiepten zijn:

Kleurdiepte	Beschrijving
1	1-bit monochroom, zal de afbeelding z/w zijn.
8	8-bit kleuren of grijstinten, afhankelijk van het afbeeldingsformaat
16	16-bit TrueColor
24	24-bit TrueColor
32	32-bit TrueColor

Houd er rekening mee dat niet elke kleurdiepte beschikbaar is voor elk afbeeldingsformaat.

Ondersteunde vlaggen voor afbeeldingsbestanden

Je kunt de volgende vlaggen gebruiken bij het opslaan van afbeeldingsbestanden:

Afbeeldingsformaat	Vlag	Beschrijving
BMP	0x1	Slaat de bitmap op als RLE (Run Length Encoded)
JPEG	0x80 0x100 0x200 0x400 0x800	JPEG kwaliteit Super (100%) JPEG kwaliteit Goed (75%) JPEG kwaliteit Normaal (50%) JPEG kwaliteit gemiddeld (25%) JPEG kwaliteit slecht (10%)

DPI instellingen

Bij het opslaan als JPEG, PNG, TIFF of BMP afbeeldingsformaat kun je de DPI (Dots per Inch) instellen als je de methode SaveAsBySizeExtended gebruikt.