Svojstva,
Događaji & Metode

Svojstva

odrediti sadržaj i dizajn crtičnog koda

Text PropertyLink
Text char

Tekst sadrži sadržaj crtičnog koda. Obično se ovo unosi bez kontrolnog znaka.
Možete unijeti kontrolne kodove u čitljivom obliku za ljude ovako: <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 PropertyLink
ShowText bool

TRUE: Barcode ima tekst čitljiv ljudima.
FALSE: Barcode se prikazuje bez teksta čitljivog ljudima.

Primjeri:

ShowText=TRUE

ShowText=FALSE

Imajte na umu da neki tipovi barkodova nemaju tekst čitljiv ljudima. Ovo se odnosi na QR kod, PDF417 i DataMatrix. Svojstvo ShowText nema učinka kada se koristi jedan od ovih kodova.

Visual Basic:

AxBarcode1.ShowText = True

Delphi:

Barcode1.ShowText := TRUE;

C#:

axBarcode1.ShowText = true;

VBA (Office):

Barcode1.ShowText = True

Type PropertyLink
Type long

Određuje tip barkoda jedinstvenim brojem.

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 PropertyLink
Rotate long

Orijentacija crtičnog koda u stupnjevima (0, 90, 180, 270).

Primjeri

0 stupnjevi

90 stupnjevi

180 stupnjevi

270 stupnjevi

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 PropertyLink
Alignment AlignConstants

Postavlja poravnanje crtičnog koda ulijevo, udesno ili u sredinu. Možete proslijediti AlignLeft, AlignCenter ili AlignRight.

Primjeri:
ActiveBarcode: AlignLeft

AlignLeft

AlignCenter

ActiveBarcode: AlignRight

AlignRight

Izjava o '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 PropertyLink
TypeName char

Naziv vrste barkoda.

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 PropertyLink
IsValid bool

Vraća TRUE ako je crtični kod valjan. Ako je neispravan, tekst se ne može kodirati odabranom vrstom crtičnog koda.

Visual Basic:

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

IsSizeOk PropertyLink
IsSizeOk bool

Pokazuje može li se crtični kod ispravno prikazati. Vraća TRUE ako su dimenzije kontrole dovoljno velike za prikaz crtičnog koda. Ova vrijednost može postati ISTINITA samo ako je sam crtični kod ispravan – tj. ako je vrijednost IsValid također ISTINITA.

Visual Basic:

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

Checksum PropertyLink
Checksum long

Vraća kontrolni znak.

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 PropertyLink
Picture pictureobject

Vraća sliku barkoda.
Ako vam je slika potrebna u određenoj veličini, upotrijebite metodu CreatePictureBySize prije nego što dohvatite sliku.

Visual Basic:

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

BackColor PropertyLink
BackColor OLE_Color

Pozadinska boja barkoda.

Primjeri:

Bijeli BackColor

Zeleni 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 PropertyLink
ForeColor OLE_Color

Boja u prvom planu barkoda.

Primjeri:

ActiveBarcode: Barcode with black forecolor

Crni Forecolor

ActiveBarcode: Barcode with green forecolor

Zeleni 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 PropertyLink
Font fontobject

Određuje font po nazivu, stilu, efektima i veličini za tekstualni redak.

Svojstvo Font je objekt koji ilustrira različita svojstva fonta.

Upotreba objekta fonta je sljedeća:

Promijeni veličinu:
Barcode1.Font.Size = 10

Promijeni font:
Barcode1.Font.Name = "Arial"

Promijenite stil i efekte:
Barcode1.Font.Bold = True
Barcode1.Font.Italic = True
Barcode1.Font.Underline = True
Barcode1.Font.Strikethrough = True

U nekim razvojnim okruženjima ova svojstva određuju tipovi niza, npr. Delphi. Pogledajte u pomoć sustava za razvoj za informacije o tome kako ih rukovati.

Primjeri:

Font: Arial, 12pt, Bold

Font: Comix, 14pt, Standard

Delphi:

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

Version PropertyLink
Version char

Vraća broj verzije objekta crtičnog koda.

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 PropertyLink
BorderHeight long

Visina obruba iznad i ispod crtičnog koda u pikselsima. Granica je obojena trenutnom bojom pozadine.

Primjeri:

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 PropertyLink
BorderWidth long

Širina obruba lijevo i desno od crtičnog koda u pikselsima. Granica je obojena trenutnom bojom pozadine.

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 PropertyLink
MaxBorderHeight long

Maksimalna moguća vrijednost 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 PropertyLink
MaxBorderWidth long

Maksimalna moguća vrijednost 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 PropertyLink
NotchHeightInPercent long

Duljina utora u postotku.

Primjeri:

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 PropertyLink
PrintFix bool

Nije korišteno. Nema funkcionalnosti od verzije 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 PropertyLink
AutoType bool

ActiveBarcode pokušava automatski prepoznati vrstu barkoda. Ovaj atribut je zastario i ne treba se na njega oslanjati. Implementirano je radi kompatibilnosti sa starim verzijama.

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

Događaji

Aktiviraju se kada se svojstva promijene

TypeChange EventLink
TypeChange BarcodeType:long

Pokreće se kada se promijeni vrsta barkoda. Svojstvo Type je proslijeđeno i može se koristiti.

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 EventLink
TextChange Text:char

Pokreće se kada se promijeni tekst crtičnog koda. Svojstvo Text je proslijeđeno i može se koristiti.

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 EventLink
ShowTextChange ShowText:bool

Pokreće se kada je prikaz teksta barkoda omogućen ili onemogućen. Svojstvo ShowText je proslijeđeno i može se koristiti.

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 EventLink
AutoTypeChange AutoType:bool

Pokreće se kada je opcija Autotype omogućena ili onemogućena. Svojstvo Autotype je proslijeđeno i može se koristiti.

Metode

Pristupite i automatizirajte značajke objekta barkoda.

CopyToClipboard MethodLink
CopyToClipboard : bool

Kopira crtični kod u meta-grafičkom formatu na međuspremnik. Vraća TRUE ako je uspješno.

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 MethodLink
CopyToClipboardBySize (Width: Integer, Height: Integer): Bool

Kopira crtični kod u meta-grafičkom formatu na međuspremnik. Veličina barkoda određuje se argumentima width i height. Vraća TRUE ako je uspješno.

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 MethodLink
CreatePictureBySize (Width: Integer, Height: Integer): Bool

Omogućuje rukovanje svojstvom slike prilagođene veličine. Veličina slike crtičnog koda određuje se argumentima width i height. Vraća TRUE ako je uspješno.

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 MethodLink
SaveAs (path: WideString): Smallint

Sačuvaj trenutni barkod kao datoteku slike (BMP, JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP, XPM). Veličina slike je trenutna veličina kontrole. Tip datoteke slike definira se nastavkom naziva datoteke (npr. BMP za Windows bitmapu).

Povezana tema: Opcije datoteke slike

Delphi:

Barcode1.SaveAs(MyFileName);

SaveAsBySize MethodLink
SaveAsBySize (path: WideString, Width: Integer, Height: Integer): Smallint

Sačuvaj trenutni barkod kao datoteku slike (BMP, JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP, XPM). Veličina slike određena je parametrima width i height. Tip datoteke slike definira se nastavkom naziva datoteke (npr. BMP za Windows bitmapu).

Povezana tema: Opcije datoteke slike

Delphi:

Barcode1.SaveAsBySize(MyFileName,600,200);

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

Proširena verzija metode SaveAsBySize.

Sačuvaj trenutni barkod kao datoteku slike.

Veličina slike određena je parametrima width i height.

Tip slike se navodi parametrom format.Postavite ga na -1 ako želite koristiti automatski odabir tipa datoteke prema ekstenziji naziva datoteke.

Dubina boje postavljena je na (1, 8, 16, 24, 32) bita.

Opcija transparent još nije implementirana. Postavite na 0 ako ne želite prozirnost, a na -1 da pozadina bude prozirna.

Koristite zastavice za posebne opcije.

Kut opcije se koristi za rotiranje slike. Postavite rotaciju u stupnjevima (0-359). Da biste poništili ovu opciju s trenutnom postavkom svojstva rotate, postavite kut na -1.

Koristite parametar dpi za postavljanje određene rezolucije u DPI za datoteku slike. Ovo se može koristiti u formatima slika BMP, JPEG, TIF i PNG. (0=postavi nula DPI vrijednost)

Ovdje možete vidjeti popis podržanih formata slika, dubina boja i zastavica.

Ova metoda podržava sljedeće formate slika: Windows Bitmap (BMP), JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP i XPM.

Vrijednosti povrata ove funkcije:
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 MethodLink
SetDemoText

Postavlja svojstvo Text na valjanu zadanu vrijednost. Koristite ovo za demonstraciju ili testne svrhe kako biste dobili valjan kod.

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 MethodLink
BinaryWriteAsPNGBySize (Width: Integer, Height: Integer): OleVariant

Vraća trenutni barkod u binarnom PNG formatu slike. Veličina se određuje parametrima Širina i Visina. Ova metoda je dostupna samo u Enterprise izdanju.

BinaryWriteAsPNG MethodLink
BinaryWriteAsPNG : OleVariant

Vraća trenutni barkod u trenutnoj veličini u binarnom PNG formatu slike. Ova metoda je dostupna samo u Enterprise izdanju.

AboutBox MethodLink
AboutBox

Otvara informacijski dijalog ActiveBarcodea i prikazuje verziju i ostale detalje.

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 MethodLink
SaveAsPNG (path: WideString): Smallint

Sačuvaj trenutni barkod kao PNG sliku. Veličina slike je trenutna veličina kontrole.

Ova funkcija je zastarjela. Umjesto toga upotrijebite funkciju SaveAs koja podržava više formata datoteka.

SaveAsPNGBySize MethodLink
SaveAsPNGBySize (path: WideString, Width: Integer, Height: Integer): Smallint

Sačuvaj trenutni barkod kao PNG sliku. Veličina slike određuje se parametrima width i height.

Ova funkcija je zastarjela. Umjesto toga upotrijebite funkciju SaveAsBySize koja podržava više formata datoteka.

Podržani formati slika

Funkcije SaveAs, SaveAsBySize i SaveAsBySizeExtended kontrole ActiveBarcode podržavaju različite formate slika i dubine boja:

Windows Bitmap

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

JPEG

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

Portable Network Graphic

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

TIFF

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

Targa

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

GIF

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

Windows Metafile Format

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

Enhanced Metafile Format

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

Wireless Bitmap

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

Portable Bit Map

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

Portable Gray Map

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

Portable Pixel Map

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

X Pix Map

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

Dubine boja označene kao zadane koriste se kada koristite funkciju SaveAs ili SaveAsBySize ili kada postavite dubinu boje na nulu koristeći funkciju SaveAsBySizeExtended.

Dubine boja za datoteke sa slikama

Podržane dubine boja su:

Boja dubine	Opis
1	1-bit U monohromatskoj varijanti, slika će biti crno-bijela.
8	8-bit boje ili sivina ovisno o formatu slike
16	16-bit TrueColor
24	24-bit TrueColor
32	32-bit TrueColor

Imajte na umu da dubina boje nije dostupna za svaki format slike.

Podržane zastavice za datoteke slika

Možete koristiti sljedeće zastavice pri spremanju datoteka sa slikama:

Format slike	Zastava	Opis
BMP	0x1	Sačuvaj bitmapu kao RLE (Run Length Encoded)
JPEG	0x80 0x100 0x200 0x400 0x800	JPEG super kvalitete (100%) JPEG kvaliteta Dobra (75%) JPEG kvaliteta Normalno (50%) JPEG kvalitet prosječno (25%) JPEG kvalitetno Loše (10%)

DPI Postavke

Prilikom spremanja u slikovne formate JPEG, PNG, TIFF ili BMP možete postaviti DPI (točaka po inču) ako koristite metodu SaveAsBySizeExtended.