Propiedades, Eventos & Métodos

 Standard o superior

Propiedades

determinar el contenido y el diseño de un código de barras
Text PropertyLink
Text char
El texto contiene el contenido del código de barras. Por lo general, esto se introduce sin un dígito de verificación.
Puede introducir códigos de control en forma legible de esta manera: <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: El código de barras tiene un texto legible para humanos.
FALSE: El código de barras se muestra sin el texto legible por el usuario.

Ejemplos:
ActiveBarcode: TRUE
ShowText=TRUE
ActiveBarcode: FALSE
ShowText=FALSE

Tenga en cuenta que algunos tipos de códigos de barras no tienen texto legible para humanos. Esto se aplica a QR Code, PDF417 y DataMatrix. El ShowText propiedad no tiene ningún efecto, cuando se utiliza uno de estos códigos.
Visual Basic:
AxBarcode1.ShowText = True
Delphi:
Barcode1.ShowText := TRUE;
C#:
axBarcode1.ShowText = true;
VBA (Office):
Barcode1.ShowText = True
Type PropertyLink
Type long
Especifica el tipo de código de barras con un número único.
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
La orientación del código de barras en grados (0, 90, 180, 270).

Ejemplos
ActiveBarcode: 0 titulaciones
0 titulaciones
ActiveBarcode: 90 titulaciones
90 titulaciones
ActiveBarcode: 180 titulaciones
180 titulaciones
ActiveBarcode: 270 titulaciones
270 titulaciones
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
Establece la alineación del código de barras a la izquierda, a la derecha o al centro. Puede pasar AlignLeft, AlignCenter o AlignRight.

Ejemplos:
ActiveBarcode: AlignLeft
AlignLeft

ActiveBarcode: AlignCenter
AlignCenter

ActiveBarcode: AlignRight
AlignRight


Declaración de '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
El nombre del tipo de código de barras.
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
Devuelve TRUE si el código de barras es válido. Si no es válido, el texto no se puede codificar con el tipo de código de barras seleccionado.
Visual Basic:
    If AxBarcode1.IsValid = False Then
        MessageBox.Show("Barcode is not valid. Please change properties")
    End If
IsSizeOk PropertyLink
IsSizeOk bool
Indica si el código de barras se puede mostrar correctamente. Devuelve TRUE si las dimensiones del control son lo suficientemente grandes como para mostrar el código de barras. Este valor sólo puede convertirse en TRUE si el propio código de barras es correcto, es decir, si el valor IsValid también es TRUE.
Visual Basic:
    If AxBarcode1.IsSizeOk = False Then
        MessageBox.Show("Objects size is to small. Please enlarge")
    End If
Checksum PropertyLink
Checksum long
Devuelve el dígito de comprobación.
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
Devuelve la imagen del código de barras.
Si necesita la imagen en un tamaño específico, utilice el CreatePictureBySize método antes de recuperar el Picture.
Visual Basic:
' Set the bitmap picture of the barcode to the clipboard
Clipboard.Clear()
Clipboard.SetImage(AxBarcode1.Picture)
BackColor PropertyLink
BackColor OLE_Color
Color de fondo del código de barras.

Ejemplos:
ActiveBarcode: White BackColor
Blanco BackColor
ActiveBarcode: White BackColor
Verde 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
Color de primer plano del código de barras.

Ejemplos:
ActiveBarcode: Barcode with black forecolor
Negro Forecolor
ActiveBarcode: Barcode with green forecolor
Verde 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
Especifica la fuente por nombre, estilo, efectos y el tamaño de la línea de texto.

El Font propiedad es un objeto que ilustra las diferentes propiedades de la fuente.

El uso del objeto de fuente es el siguiente:

Cambie el tamaño:
Barcode1.Font.Size = 10

Cambiar la fuente:
Barcode1.Font.Name = "Arial"

Cambiar el estilo y los efectos:
Barcode1.Font.Bold = True
Barcode1.Font.Italic = True
Barcode1.Font.Underline = True
Barcode1.Font.Strikethrough = True

En algunos entornos de desarrollo, estas propiedades están determinadas por tipos de enumeración, por ejemplo, Delphi. Echa un vistazo en la ayuda del sistema de desarrollo para obtener información sobre cómo manejarlos.


Ejemplos:
ActiveBarcode: Código de barras @ Font: Arial, 12pt, Bold
Font: Arial, 12pt, Bold
ActiveBarcode: Código de barras @ Font: Comix, 14pt, Standard
Font: Comix, 14pt, Standard
Delphi:
Barcode1.Font.name := 'Courier New';
Barcode1.Font.size := 14;
Barcode1.Font.style := [fsbold];
Version PropertyLink
Version char
Devuelve el número de versión del objeto de código de barras.
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
Altura del borde por encima y debajo del código de barras en píxeles. El borde está pintado en el color de fondo actual.

Ejemplos:
ActiveBarcode: BorderHeight=4
BorderHeight=4
ActiveBarcode: BorderHeight=20
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
Ancho del borde a la izquierda y a la derecha del código de barras en píxeles. El borde está pintado en el color de fondo actual.
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
El valor máximo posible de 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
El valor máximo posible de 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
Longitud de las muescas en porcentaje.

Ejemplos:
ActiveBarcode: 50%
NotchHeightInPercent=50
ActiveBarcode: 100%
NotchHeightInPercent=100
ActiveBarcode: 0%
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
No se usa. No hay funcionalidad desde la versión 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
ActiveBarcde intenta detectar el tipo de código de barras automáticamente. Esta propiedad está obsoleta y no se debe confiar en ella. Se implementa con fines de compatibilidad con versiones antiguas.
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

Eventos

se activan cuando cambian las propiedades
TypeChange EventLink
TypeChange BarcodeType:long
Se activa cuando se cambia el tipo de código de barras. La propiedad Type se pasa y se puede utilizar.
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
Se activa cuando se cambia el texto del código de barras. La propiedad Text se pasa y se puede utilizar.
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
Se activa cuando la visualización del texto del código de barras está activada o desactivada. La propiedad ShowText se pasa y se puede utilizar.
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
Se activa cuando la opción Autotipo está habilitada o deshabilitada. La propiedad Autotype se pasa y se puede utilizar.

Métodos

Acceda y automatice las funciones del objeto de código de barras.
CopyToClipboard MethodLink
CopyToClipboard : bool
Copia el código de barras en formato metagráfico en el portapapeles. Devuelve TRUE si se realiza correctamente.
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
Copia el código de barras en formato metagráfico en el portapapeles. El tamaño del código de barras se especifica mediante los argumentos width y height. Devuelve TRUE si se realiza correctamente.
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
Permite controlar una propiedad Picture de tamaño personalizado. El tamaño de la imagen del código de barras se especifica mediante el ancho y el alto de los argumentos. Devuelve TRUE si se realiza correctamente.
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
Guarda el código de barras actual como archivo de imagen (BMP, JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP, XPM). El tamaño de la imagen es el tamaño actual del control. El tipo de archivo de imagen utilizado se define mediante la extensión del nombre de archivo (por ejemplo, BMP para un mapa de bits de Windows).

Tema relacionado: Opciones del archivo de imagen
Delphi:
Barcode1.SaveAs(MyFileName);
SaveAsBySize MethodLink
SaveAsBySize (path: WideString, Width: Integer, Height: Integer): Smallint
Guarda el código de barras actual como archivo de imagen (BMP, JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP, XPM). El tamaño de la imagen se especifica mediante los parámetros width y height. El tipo de archivo de imagen utilizado se define mediante la extensión del nombre de archivo (por ejemplo, BMP para un mapa de bits de Windows).

Tema relacionado: Opciones del archivo de imagen
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
Versión extendida del método SaveAsBySize.

Guarda el código de barras actual como archivo de imagen.

El tamaño de la imagen se especifica mediante los parámetros width y height.

El tipo de archivo de imagen se especifica mediante el formatode parámetro.Establézalo en -1 si desea utilizar la selección automática de tipos de archivo por la extensión de nombres de archivo.

La profundidad de color se establece en el bit (1, 8, 16, 24, 32).

La opción transparente aún no se ha implementado. Establézalo en 0 si no se desea transparencia y en -1 para establecer el fondo transparente.

Utilice las marcas para opciones especiales.

El ángulo de opción se utiliza para girar la imagen. Ajuste la rotación en grados (0-359). Para anular esta opción con el ajuste actual de la propiedad rotate establecer el ángulo a -1.

Utilice los parámetros dpi para establecer una resolución específica en DPI para el archivo de imagen. Esto se puede utilizar en los formatos de imagen BMP, JPEG, TIF y PNG. (0-establecer sin valor de PPP)

Aquí puede ver una lista de los tipos de archivos de imagen, profundidades de color y banderas compatibles.

Este método admite los siguientes formatos de imagen: Windows Bitmap (BMP), JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP y XPM.

Valores devueltos de esta función:
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
Establece la propiedad Text en un valor predeterminado válido. Utilícelo con fines de demostración o prueba para obtener un código válido.
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
Devuelve el código de barras actual en formato de imagen PNG binario. El tamaño se especifica mediante los parámetros Width y Height. Este método solo está disponible en Enterprise Edition.
BinaryWriteAsPNG MethodLink
BinaryWriteAsPNG : OleVariant
Devuelve el código de barras actual en formato de imagen PNG binario de tamaño actual. Este método solo está disponible en Enterprise Edition.
AboutBox MethodLink
AboutBox
Abre el cuadro de diálogo de información de ActiveBarcode y muestra la versión y otros detalles.
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
Guarda el código de barras actual como archivo de imagen PNG. El tamaño de la imagen es el tamaño actual del control.

Esta función está obsoleta. Utilice la función SaveAs en su lugar, que admite más formatos de archivo.
SaveAsPNGBySize MethodLink
SaveAsPNGBySize (path: WideString, Width: Integer, Height: Integer): Smallint
Guarda el código de barras actual como archivo de imagen PNG. El tamaño de la imagen se especifica mediante el ancho y el alto de los parámetros.

Esta función está obsoleta. Utilice la función SaveAsBySize en su lugar, que admite más formatos de archivo.

Formatos de archivo de imagen compatibles

Las funciones SaveAs, SaveAsBySize y SaveAsBySizeExtended del ActiveBarcode Control admiten diferentes formatos de imagen y profundidades de color:

ActiveBarcode: Windows Bitmap
Windows Bitmap
Extension: BMP
Format #: 0
1-bit s/w: ✔
8-bit: ✔
16-bit: ✔
24-bit: ✔
32-bit: ✔ default
Gráficos de mapa de bits
ActiveBarcode: JPEG
JPEG
Extension: JPG, JPEG
Format #: 2
1-bit s/w: ✕
8-bit: gray
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Gráficos de mapa de bits
ActiveBarcode: Portable Network Graphic
Portable Network Graphic
Extension: PNG
Format #: 13
1-bit s/w: ✔
8-bit: ✔
16-bit: ✕
24-bit: ✔ default
32-bit: ✔
Gráficos de mapa de bits
ActiveBarcode: TIFF
TIFF
Extension: TIF
Format #: 18
1-bit s/w: ✔
8-bit: ✔
16-bit: ✕
24-bit: ✔ default
32-bit: ✔
Gráficos de mapa de bits
ActiveBarcode: Targa
Targa
Extension: TGA
Format #: 17
1-bit s/w: ✕
8-bit: ✔
16-bit: ✔
24-bit: ✔ default
32-bit: ✔
Gráficos de mapa de bits
ActiveBarcode: GIF
GIF
Extension: GIF
Format #: 25
1-bit s/w: ✔
8-bit: ✔ default
16-bit: ✕
24-bit: ✕
32-bit: ✕
Gráficos de mapa de bits
ActiveBarcode: Windows Metafile Format
Windows Metafile Format
Extension: WMF
Format #: 101
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Gráfico vectorial
ActiveBarcode: Enhanced Metafile Format
Enhanced Metafile Format
Extension: EMF
Format #: 100
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Gráfico vectorial
ActiveBarcode: Wireless Bitmap
Wireless Bitmap
Extension: WBM, WBMP
Format #: 19
1-bit s/w: ✔ default
8-bit: ✕
16-bit: ✕
24-bit: ✕
32-bit: ✕
Gráficos de mapa de bits
ActiveBarcode: Portable Bit Map
Portable Bit Map
Extension: PBM
Format #: 7
1-bit s/w: ✔ default
8-bit: ✕
16-bit: ✕
24-bit: ✕
32-bit: ✕
Gráficos de mapa de bits
ActiveBarcode: Portable Gray Map
Portable Gray Map
Extension: PGM
Format #: 11
1-bit s/w: ✕
8-bit: gray/default
16-bit: ✕
24-bit: ✕
32-bit: ✕
Gráficos de mapa de bits
ActiveBarcode: Portable Pixel Map
Portable Pixel Map
Extension: PPM
Format #: 14
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Gráficos de mapa de bits
ActiveBarcode: X Pix Map
X Pix Map
Extension: XPM
Format #: 23
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Gráficos de mapa de bits

Las profundidades de color marcadas como predeterminadas se utilizan cuando se utiliza la función SaveAs, SaveAsBySize o cuando se establece la profundidad de color en cero cuando se utiliza la función SaveAsBySizeExtended.

Profundidades de color para archivos de imagen

Las profundidades de color admitidas son:

Colordepth Descripción
1 1-bit monocromo, la imagen será b/w.
8 8-bit colores o escala de grises dependiendo del formato de imagen
16 16-bit TrueColor
24 24-bit TrueColor
32 32-bit TrueColor

Tenga en cuenta que no todas las profundidades de color están disponibles para todos los formatos de archivo de imagen.

Banderas admitidas para archivos de imagen

Puede utilizar las siguientes marcas al guardar archivos de imagen:

Formato de imagen Bandera Descripción
BMP 0x1 Guarda el mapa de bits como RLE (Run Length Encoded)
JPEG 0x80
0x100
0x200
0x400
0x800
JPEG calidad Super (100%)
JPEG calidad Buena (75%)
JPEG calidad Normal (50%)
JPEG calidad Media (25%)
JPEG calidad Pobre (10%)

DPI Configuración

Al guardar como formato de imagen JPEG, PNG, TIFF o BMP, puede establecer el PPP (puntos por pulgada), si está utilizando el método SaveAsBySizeExtended.