Egenskaper, Arrangementer & Metoder

 Standard eller høyere

Egenskaper

bestemme innholdet og utformingen av en strekkode
Text PropertyLink
Text char
Teksten inneholder innholdet i strekkoden. Vanligvis angis dette uten kontrollsiffer.
Du kan skrive inn kontrollkoder i menneskelig lesbar form slik: <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: Strekkoden har en tekst som kan leses av mennesker.
FALSE: Strekkoden vises uten menneskelig lesbar tekst.

Eksempler:
ActiveBarcode: TRUE
ShowText=TRUE
ActiveBarcode: FALSE
ShowText=FALSE

Vær oppmerksom på at noen strekkodetyper ikke har tekst som kan leses av mennesker. Dette gjelder QR-kode, PDF417 og DataMatrix. ShowText-egenskapen har ingen effekt når du bruker en av disse kodene.
Visual Basic:
AxBarcode1.ShowText = True
Delphi:
Barcode1.ShowText := TRUE;
C#:
axBarcode1.ShowText = true;
VBA (Office):
Barcode1.ShowText = True
Type PropertyLink
Type long
Angir strekkodetypen med et unikt 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 PropertyLink
Rotate long
Orienteringen av strekkoden i grader (0, 90, 180, 270).

Eksempler
ActiveBarcode: 0 grader
0 grader
ActiveBarcode: 90 grader
90 grader
ActiveBarcode: 180 grader
180 grader
ActiveBarcode: 270 grader
270 grader
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
Angir justeringen av strekkoden til venstre, til høyre eller sentrert. Du kan bruke AlignLeft, AlignCenter eller AlignRight.

Eksempler:
ActiveBarcode: AlignLeft
AlignLeft

ActiveBarcode: AlignCenter
AlignCenter

ActiveBarcode: AlignRight
AlignRight


Erklæring om '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
Navnet på strekkodetypen.
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
Returnerer TRUE hvis strekkoden er gyldig. Hvis den er ugyldig, kan ikke teksten kodes med den valgte strekkodetypen.
Visual Basic:
    If AxBarcode1.IsValid = False Then
        MessageBox.Show("Barcode is not valid. Please change properties")
    End If
IsSizeOk PropertyLink
IsSizeOk bool
Angir om strekkoden kan vises korrekt. Returnerer TRUE hvis dimensjonene til kontrollen er store nok til å vise strekkoden. Denne verdien kan bare bli TRUE hvis strekkoden i seg selv er korrekt, dvs. at verdien IsValid også er TRUE.
Visual Basic:
    If AxBarcode1.IsSizeOk = False Then
        MessageBox.Show("Objects size is to small. Please enlarge")
    End If
Checksum PropertyLink
Checksum long
Returnerer kontrollsifferet.
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
Returnerer strekkodebildet.
Hvis du trenger bildet i en bestemt størrelse, bruk metoden CreatePictureBySize før du henter bildet.
Visual Basic:
' Set the bitmap picture of the barcode to the clipboard
Clipboard.Clear()
Clipboard.SetImage(AxBarcode1.Picture)
BackColor PropertyLink
BackColor OLE_Color
Bakgrunnsfarge på strekkoden.

Eksempler:
ActiveBarcode: White BackColor
Hvit BackColor
ActiveBarcode: White BackColor
Grønn 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
Foregroundfarge på strekkoden.

Eksempler:
ActiveBarcode: Barcode with black forecolor
Svart Forecolor
ActiveBarcode: Barcode with green forecolor
Grønn 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
Angir skrift ved navn, stil, effekter og størrelse for tekstlinjen.

Font-egenskapen er et objekt som illustrerer de forskjellige egenskapene til skrifttypen.

Bruken av font-objektet er som følger:

Endre størrelsen:
Barcode1.Font.Size = 10

Endre skrift:
Barcode1.Font.Name = "Arial"

Endre stilen og effektene:
Barcode1.Font.Bold = True
Barcode1.Font.Italic = True
Barcode1.Font.Underline = True
Barcode1.Font.Strikethrough = True

I noen utviklingsmiljøer bestemmes disse egenskapene av oppregningstyper, f.eks. Delphi. Se i hjelpen til utviklingssystemet for informasjon om hvordan du håndterer dem.


Eksempler:
ActiveBarcode: Strekkode @ Font: Arial, 12pt, Bold
Font: Arial, 12pt, Bold
ActiveBarcode: Strekkode @ 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
Returnerer versjonsnummeret til strekkodeobjektet.
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
Høyden på rammen over og under strekkoden i piksler. Kanten er malt i den gjeldende bakgrunnsfargen.

Eksempler:
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
Bredden på rammen til venstre og høyre for strekkoden i piksler. Kanten er malt i den gjeldende bakgrunnsfargen.
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
Maksimal mulig verdi for 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
Maksimal mulig verdi for 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
Lengden på hakkene i prosent.

Eksempler:
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
Ikke brukt. Ingen funksjonalitet siden versjon 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 prøver å oppdage strekkodetypen automatisk. Denne egenskapen er foreldet og bør ikke benyttes. Det er implementert av kompatibilitetshensyn med gamle versjoner.
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

Arrangementer

utløses når egenskaper endres
TypeChange EventLink
TypeChange BarcodeType:long
Utløses når strekkodetypen endres. Egenskapen Type er overført og kan brukes.
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
Utløses når strekkodeteksten endres. Egenskapen Text er overført og kan brukes.
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
Utløses når visningen av strekkodeteksten er aktivert eller deaktivert. Egenskapen ShowText er overført og kan brukes.
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
Utløses når Autotype-alternativet er aktivert eller deaktivert. Egenskapen Autotype er overført og kan brukes.

Metoder

Få tilgang til og automatiser funksjonene til strekkodeobjektet.
CopyToClipboard MethodLink
CopyToClipboard : bool
Kopierer strekkoden i metagrafisk format til utklippstavlen. Returnerer TRUE hvis vellykket.
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
Kopierer strekkoden i metagrafisk format til utklippstavlen. Størrelsen på strekkoden angis av argumentene bredde og høyde. Returnerer TRUE hvis vellykket.
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
Gjør det mulig å håndtere en bildeegenskap med tilpasset størrelse. Størrelsen på strekkodebildet angis av argumentene bredde og høyde. Returnerer TRUE hvis vellykket.
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
Lagre den gjeldende strekkoden som bildefil (BMP, JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP, XPM). Bildestørrelsen er den gjeldende størrelsen på kontrollen. Bildetypen som brukes, defineres av filendelsen (f.eks. BMP for Windows Bitmap).

Relatert emne: Bildefilalternativer
Delphi:
Barcode1.SaveAs(MyFileName);
SaveAsBySize MethodLink
SaveAsBySize (path: WideString, Width: Integer, Height: Integer): Smallint
Lagre den gjeldende strekkoden som bildefil (BMP, JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP, XPM). Bildestørrelsen angis ved hjelp av parametrene bredde og høyde. Bildetypen som brukes, defineres av filendelsen (f.eks. BMP for Windows Bitmap).

Relatert emne: Bildefilalternativer
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
Utvidet versjon av SaveAsBySize-metoden.

Lagre den gjeldende strekkoden som bildefil.

Bildestørrelsen angis av parametrene width og height.

Bildfiltypen angis av parameterformatet.Sett den til -1 hvis du vil bruke automatisk filtypevalg basert på filnavnets filtype.

Fargedybden angis i bit (1, 8, 16, 24, 32).

Alternativet transparent er ikke implementert ennå. Sett den til 0 hvis du ikke ønsker gjennomsiktighet, og til -1 for å gjøre bakgrunnen gjennomsiktig.

Bruk flaggene for spesielle alternativer.

Alternativvinkelen brukes til å rotere bildet. Angi rotasjonen i grader (0-359). For å overstyre dette alternativet med den gjeldende innstillingen for roteringsegenskapen, sett vinkelen til -1.

Bruk parameterne dpi til å angi en bestemt oppløsning i DPI for bildefilen. Dette kan brukes i bildeformatene BMP, JPEG, TIF og PNG. (0 = ingen DPI-verdi angitt)

Her kan du se en liste over støttede bildefiltyper, fargedybder og flagg.

Denne metoden støtter følgende bildeformater: Windows Bitmap (BMP), JPEG, PNG, TIFF, Targa, GIF, WMF, EMF, PBM, PGM, PPM, WBMP og XPM.

Returverdier for denne funksjonen:
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
Angir egenskapen Tekst til en gyldig standardverdi. Bruk dette til demonstrasjons- eller testformål for å få en gyldig kode.
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
Returnerer den gjeldende strekkoden i binært PNG-bildeformat. Størrelsen angis ved hjelp av parametrene Bredde og Høyde. Denne metoden er kun tilgjengelig i Enterprise Edition.
BinaryWriteAsPNG MethodLink
BinaryWriteAsPNG : OleVariant
Returnerer den gjeldende strekkoden i binært PNG-bildeformat i gjeldende størrelse. Denne metoden er kun tilgjengelig i Enterprise Edition.
AboutBox MethodLink
AboutBox
Åpner informasjonsdialogen til ActiveBarcode og viser versjonen og andre detaljer.
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
Lagre den gjeldende strekkoden som PNG-bildefil. Bildestørrelsen er den gjeldende størrelsen på kontrollen.

Denne funksjonen er foreldet. Bruk i stedet funksjonen Lagre som, som støtter flere filformater.
SaveAsPNGBySize MethodLink
SaveAsPNGBySize (path: WideString, Width: Integer, Height: Integer): Smallint
Lagre den gjeldende strekkoden som PNG-bildefil. Bildestørrelsen angis ved hjelp av parametrene bredde og høyde.

Denne funksjonen er foreldet. Bruk i stedet funksjonen SaveAsBySize, som støtter flere filformater.

Støttede bildefilformater

Funksjonene SaveAs, SaveAsBySize og SaveAsBySizeExtended i ActiveBarcode Control støtter forskjellige bildeformater og fargedybder:

ActiveBarcode: Windows Bitmap
Windows Bitmap
Extension: BMP
Format #: 0
1-bit s/w: ✔
8-bit: ✔
16-bit: ✔
24-bit: ✔
32-bit: ✔ default
Bitmap-grafikk
ActiveBarcode: JPEG
JPEG
Extension: JPG, JPEG
Format #: 2
1-bit s/w: ✕
8-bit: gray
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Bitmap-grafikk
ActiveBarcode: Portable Network Graphic
Portable Network Graphic
Extension: PNG
Format #: 13
1-bit s/w: ✔
8-bit: ✔
16-bit: ✕
24-bit: ✔ default
32-bit: ✔
Bitmap-grafikk
ActiveBarcode: TIFF
TIFF
Extension: TIF
Format #: 18
1-bit s/w: ✔
8-bit: ✔
16-bit: ✕
24-bit: ✔ default
32-bit: ✔
Bitmap-grafikk
ActiveBarcode: Targa
Targa
Extension: TGA
Format #: 17
1-bit s/w: ✕
8-bit: ✔
16-bit: ✔
24-bit: ✔ default
32-bit: ✔
Bitmap-grafikk
ActiveBarcode: GIF
GIF
Extension: GIF
Format #: 25
1-bit s/w: ✔
8-bit: ✔ default
16-bit: ✕
24-bit: ✕
32-bit: ✕
Bitmap-grafikk
ActiveBarcode: Windows Metafile Format
Windows Metafile Format
Extension: WMF
Format #: 101
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Vektorgrafikk
ActiveBarcode: Enhanced Metafile Format
Enhanced Metafile Format
Extension: EMF
Format #: 100
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Vektorgrafikk
ActiveBarcode: Wireless Bitmap
Wireless Bitmap
Extension: WBM, WBMP
Format #: 19
1-bit s/w: ✔ default
8-bit: ✕
16-bit: ✕
24-bit: ✕
32-bit: ✕
Bitmap-grafikk
ActiveBarcode: Portable Bit Map
Portable Bit Map
Extension: PBM
Format #: 7
1-bit s/w: ✔ default
8-bit: ✕
16-bit: ✕
24-bit: ✕
32-bit: ✕
Bitmap-grafikk
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: ✕
Bitmap-grafikk
ActiveBarcode: Portable Pixel Map
Portable Pixel Map
Extension: PPM
Format #: 14
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Bitmap-grafikk
ActiveBarcode: X Pix Map
X Pix Map
Extension: XPM
Format #: 23
1-bit s/w: ✕
8-bit: ✕
16-bit: ✕
24-bit: ✔ default
32-bit: ✕
Bitmap-grafikk

Fargedybder merket som standard brukes når du bruker funksjonen SaveAs, SaveAsBySize eller når du setter fargedybden til null ved bruk av funksjonen SaveAsBySizeExtended.

Fargedybder for bildefiler

Støttede fargedybder er:

Fargedybde Beskrivelse
1 1-bit monokrom, bildet blir svart-hvitt.
8 8-bit farger eller gråtoner avhengig av bildeformatet
16 16-bit TrueColor
24 24-bit TrueColor
32 32-bit TrueColor

Vær oppmerksom på at ikke alle fargedybder er tilgjengelige for alle bildefilformater.

Støttede flagg for bildefiler

Du kan bruke følgende flagg når du lagrer bildefiler:

Bildeformat Flagg Beskrivelse
BMP 0x1 Lagre bitmappen som RLE (Run Length Encoded)
JPEG 0x80
0x100
0x200
0x400
0x800
JPEG kvalitet Super (100%)
JPEG kvalitet God (75%)
JPEG kvalitet Normal (50%)
JPEG kvalitet Gjennomsnitt (25%)
JPEG kvalitet Dårlig (10%)

DPI innstillinger

Når du lagrer som JPEG-, PNG-, TIFF- eller BMP-bildeformat, kan du angi DPI (punkter per tomme) hvis du bruker metoden SaveAsBySizeExtended.