object FormInput: TFormInput Left = 267 Top = 14 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'FormInput' ClientHeight = 395 ClientWidth = 372 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Menu = MainMenu Position = poScreenCenter OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object LtitCod: TLabel Left = 34 Top = 10 Width = 86 Height = 13 Alignment = taRightJustify Caption = 'Tipo di codice:' end object ChooseBar: TComboBox Left = 122 Top = 6 Width = 209 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 OnChange = ChooseBarChange OnEnter = ChooseBarEnter end object PageSpec: TPageControl Left = 8 Top = 32 Width = 349 Height = 227 ActivePage = TabSheetCODE39 TabOrder = 1 TabStop = False object TabSheetEAN: TTabSheet Caption = 'TabSheetEAN' TabVisible = False object Lmag_EAN: TLabel Left = 89 Top = 62 Width = 142 Height = 13 Alignment = taRightJustify Caption = 'Fattore di ingrandimento:' end object NameFontEan: TLabel Left = 14 Top = 154 Width = 30 Height = 13 Caption = 'Font:' end object Ltbt_EAN: TLabel Left = 70 Top = 10 Width = 161 Height = 13 Alignment = taRightJustify Caption = 'Spessore della barra stretta:' end object Lhig_EAN: TLabel Left = 58 Top = 36 Width = 173 Height = 13 Alignment = taRightJustify Caption = 'Altezza delle barre del codice:' end object Lbwr_EAN: TLabel Left = 23 Top = 88 Width = 210 Height = 13 Alignment = taRightJustify Caption = 'Riduzione dello spessore delle barre:' end object Lcor_EAN: TLabel Left = 38 Top = 198 Width = 125 Height = 13 Alignment = taRightJustify Caption = 'Rotazione del codice:' Visible = False end object mm1: TLabel Left = 290 Top = 12 Width = 26 Height = 13 Caption = 'mm1' end object mm2: TLabel Left = 290 Top = 36 Width = 26 Height = 13 Caption = 'mm2' end object mm3: TLabel Left = 290 Top = 90 Width = 26 Height = 13 Caption = 'mm3' end object E_mag_EAN: TEdit Left = 234 Top = 58 Width = 49 Height = 21 MaxLength = 6 TabOrder = 2 OnEnter = E_mag_EANEnter OnKeyPress = E_wtb_EANKeyPress end object Cptc_EAN: TCheckBox Left = 8 Top = 126 Width = 219 Height = 17 Caption = 'Stampo il testo sotto il codice' TabOrder = 5 OnEnter = Cptc_EANEnter end object FontEAN: TButton Left = 222 Top = 148 Width = 75 Height = 25 Caption = 'Font' TabOrder = 6 OnClick = FontEANClick OnEnter = FontEANEnter end object CautoCheck: TCheckBox Left = 8 Top = 106 Width = 305 Height = 17 Caption = 'Calcolo automatico del carattere di controllo' TabOrder = 4 OnEnter = CautoCheckEnter end object E_wtb_EAN: TEdit Left = 234 Top = 6 Width = 49 Height = 21 AutoSize = False MaxLength = 6 TabOrder = 0 OnEnter = E_wtb_EANEnter OnKeyPress = E_wtb_EANKeyPress end object E_hig_EAN: TEdit Left = 234 Top = 32 Width = 49 Height = 21 MaxLength = 6 TabOrder = 1 OnEnter = E_hig_EANEnter OnKeyPress = E_wtb_EANKeyPress end object E_red_EAN: TEdit Left = 234 Top = 84 Width = 49 Height = 21 MaxLength = 6 TabOrder = 3 OnEnter = E_red_EANEnter OnKeyPress = E_red_EANKeyPress end object Ccor_EAN: TComboBox Left = 168 Top = 194 Width = 69 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( '0' '90' '180' '270') TabOrder = 7 Visible = False OnEnter = Ccor_CODE39Enter end end object TabSheetCODE39: TTabSheet Caption = 'TabSheetCODE39' TabVisible = False object Ltbt_CODE39: TLabel Left = 70 Top = 10 Width = 161 Height = 13 Alignment = taRightJustify Caption = 'Spessore della barra stretta:' end object Lrtl_CODE39: TLabel Left = 32 Top = 34 Width = 199 Height = 13 Alignment = taRightJustify Caption = 'Rapporto tra barre strette e larghe:' end object Lhig_CODE39: TLabel Left = 58 Top = 60 Width = 173 Height = 13 Alignment = taRightJustify Caption = 'Altezza delle barre del codice:' end object Ltsi_CODE39: TLabel Left = 23 Top = 86 Width = 208 Height = 13 Alignment = taRightJustify Caption = 'Spessore dello spazio intercarattere:' end object Lbwr_CODE39: TLabel Left = 21 Top = 112 Width = 210 Height = 13 Alignment = taRightJustify Caption = 'Riduzione dello spessore delle barre:' end object NameFontCode39: TLabel Left = 16 Top = 174 Width = 26 Height = 13 Caption = 'Font' end object Lcor_CODE39: TLabel Left = 38 Top = 198 Width = 125 Height = 13 Alignment = taRightJustify Caption = 'Rotazione del codice:' Visible = False end object mm4: TLabel Left = 290 Top = 10 Width = 26 Height = 13 Caption = 'mm4' end object mm5: TLabel Left = 290 Top = 60 Width = 26 Height = 13 Caption = 'mm5' end object mm6: TLabel Left = 290 Top = 112 Width = 26 Height = 13 Caption = 'mm6' end object mm13: TLabel Left = 290 Top = 86 Width = 33 Height = 13 Caption = 'mm13' end object E_wtb_CODE39: TEdit Left = 234 Top = 6 Width = 49 Height = 21 AutoSize = False MaxLength = 5 TabOrder = 0 OnEnter = E_wtb_CODE39Enter OnKeyPress = E_wtb_EANKeyPress end object E_rbr_CODE39: TEdit Left = 234 Top = 30 Width = 49 Height = 21 MaxLength = 5 TabOrder = 1 OnEnter = E_rbr_CODE39Enter OnKeyPress = E_wtb_EANKeyPress end object E_hig_CODE39: TEdit Left = 234 Top = 56 Width = 49 Height = 21 MaxLength = 5 TabOrder = 2 OnEnter = E_hig_CODE39Enter OnKeyPress = E_wtb_EANKeyPress end object E_icr_CODE39: TEdit Left = 234 Top = 82 Width = 49 Height = 21 MaxLength = 5 TabOrder = 3 OnEnter = E_icr_CODE39Enter OnKeyPress = E_wtb_EANKeyPress end object E_red_CODE39: TEdit Left = 234 Top = 108 Width = 49 Height = 21 MaxLength = 5 TabOrder = 4 OnEnter = E_red_CODE39Enter OnKeyPress = E_red_EANKeyPress end object Cack_CODE39: TCheckBox Left = 18 Top = 132 Width = 221 Height = 17 Caption = 'Aggiungo il carattere di controllo' TabOrder = 5 OnEnter = Cack_CODE39Enter end object Cptc_CODE39: TCheckBox Left = 18 Top = 150 Width = 255 Height = 17 Caption = 'Stampo il testo sotto il codice' TabOrder = 6 OnEnter = Cptc_CODE39Enter end object FontCode39: TButton Left = 252 Top = 166 Width = 75 Height = 25 Caption = 'Font' TabOrder = 7 OnClick = FontEANClick OnEnter = FontCode39Enter end object Ccor_CODE39: TComboBox Left = 168 Top = 194 Width = 69 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( '0' '90' '180' '270') TabOrder = 8 Visible = False OnEnter = Ccor_CODE39Enter end end object TabSheetCODE32: TTabSheet Caption = 'TabSheetCODE32' TabVisible = False object NameFontCode32: TLabel Left = 16 Top = 174 Width = 26 Height = 13 Caption = 'Font' end object Ltbt_CODE32: TLabel Left = 70 Top = 10 Width = 161 Height = 13 Alignment = taRightJustify Caption = 'Spessore della barra stretta:' end object Lrtl_CODE32: TLabel Left = 32 Top = 36 Width = 199 Height = 13 Alignment = taRightJustify Caption = 'Rapporto tra barre strette e larghe:' end object Lhig_CODE32: TLabel Left = 58 Top = 62 Width = 173 Height = 13 Alignment = taRightJustify Caption = 'Altezza delle barre del codice:' end object Lbwr_CODE32: TLabel Left = 21 Top = 112 Width = 210 Height = 13 Alignment = taRightJustify Caption = 'Riduzione dello spessore delle barre:' end object Lcor_CODE32: TLabel Left = 38 Top = 198 Width = 125 Height = 13 Alignment = taRightJustify Caption = 'Rotazione del codice:' Visible = False end object mm7: TLabel Left = 290 Top = 10 Width = 26 Height = 13 Caption = 'mm7' end object mm8: TLabel Left = 290 Top = 62 Width = 26 Height = 13 Caption = 'mm8' end object mm9: TLabel Left = 290 Top = 112 Width = 26 Height = 13 Caption = 'mm9' end object FontCode32: TButton Left = 212 Top = 166 Width = 75 Height = 25 Caption = 'Font' TabOrder = 5 OnClick = FontEANClick OnEnter = FontCode32Enter end object E_wtb_CODE32: TEdit Left = 234 Top = 6 Width = 49 Height = 21 AutoSize = False TabOrder = 0 OnEnter = E_wtb_CODE32Enter OnKeyPress = E_wtb_EANKeyPress end object E_rbr_CODE32: TEdit Left = 234 Top = 32 Width = 49 Height = 21 TabOrder = 1 OnEnter = E_rbr_CODE32Enter OnKeyPress = E_wtb_EANKeyPress end object E_hig_CODE32: TEdit Left = 234 Top = 58 Width = 49 Height = 21 TabOrder = 2 OnEnter = E_hig_CODE32Enter OnKeyPress = E_wtb_EANKeyPress end object E_red_CODE32: TEdit Left = 234 Top = 108 Width = 49 Height = 21 TabOrder = 3 OnEnter = E_red_CODE32Enter OnKeyPress = E_red_EANKeyPress end object Cptc_CODE32: TCheckBox Left = 14 Top = 138 Width = 219 Height = 17 Caption = 'Stampo il testo sotto il codice' TabOrder = 4 OnEnter = Cptc_CODE32Enter end object Ccor_CODE32: TComboBox Left = 168 Top = 194 Width = 69 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( '0' '90' '180' '270') TabOrder = 6 Visible = False OnEnter = Ccor_CODE39Enter end end object TabSheetINT25: TTabSheet Caption = 'TabSheetINT25' TabVisible = False object NameFontInt25: TLabel Left = 16 Top = 174 Width = 26 Height = 13 Caption = 'Font' end object Ltbt_INT25: TLabel Left = 70 Top = 10 Width = 161 Height = 13 Alignment = taRightJustify Caption = 'Spessore della barra stretta:' end object Lrtl_INT25: TLabel Left = 32 Top = 36 Width = 199 Height = 13 Alignment = taRightJustify Caption = 'Rapporto tra barre strette e larghe:' end object Lhig_INT25: TLabel Left = 58 Top = 62 Width = 173 Height = 13 Alignment = taRightJustify Caption = 'Altezza delle barre del codice:' end object Lbwr_INT25: TLabel Left = 21 Top = 112 Width = 210 Height = 13 Alignment = taRightJustify Caption = 'Riduzione dello spessore delle barre:' end object Lcor_INT25: TLabel Left = 38 Top = 198 Width = 125 Height = 13 Alignment = taRightJustify Caption = 'Rotazione del codice:' Visible = False end object mm10: TLabel Left = 292 Top = 12 Width = 33 Height = 13 Caption = 'mm10' end object mm11: TLabel Left = 292 Top = 62 Width = 33 Height = 13 Caption = 'mm11' end object mm12: TLabel Left = 292 Top = 110 Width = 33 Height = 13 Caption = 'mm12' end object Cack_INT25: TCheckBox Left = 18 Top = 132 Width = 221 Height = 17 Caption = 'Aggiungo il carattere di controllo' TabOrder = 4 OnEnter = Cack_INT25Enter end object Cptc_INT25: TCheckBox Left = 18 Top = 150 Width = 255 Height = 17 Caption = 'Stampo il testo sotto il codice' TabOrder = 5 OnEnter = Cptc_INT25Enter end object FontInt25: TButton Left = 214 Top = 166 Width = 75 Height = 25 Caption = 'Font' TabOrder = 6 OnClick = FontEANClick OnEnter = FontInt25Enter end object E_wtb_INT25: TEdit Left = 234 Top = 6 Width = 49 Height = 21 AutoSize = False MaxLength = 5 TabOrder = 0 OnEnter = E_wtb_INT25Enter OnKeyPress = E_wtb_EANKeyPress end object E_rbr_INT25: TEdit Left = 234 Top = 32 Width = 49 Height = 21 MaxLength = 5 TabOrder = 1 OnEnter = E_rbr_INT25Enter OnKeyPress = E_wtb_EANKeyPress end object E_hig_INT25: TEdit Left = 234 Top = 58 Width = 49 Height = 21 MaxLength = 5 TabOrder = 2 OnEnter = E_hig_INT25Enter OnKeyPress = E_wtb_EANKeyPress end object E_red_INT25: TEdit Left = 234 Top = 106 Width = 49 Height = 21 MaxLength = 5 TabOrder = 3 OnEnter = E_red_INT25Enter OnKeyPress = E_red_EANKeyPress end object Ccor_INT25: TComboBox Left = 168 Top = 194 Width = 69 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( '0' '90' '180' '270') TabOrder = 7 Visible = False OnEnter = Ccor_CODE39Enter end end end object ButMemo: TButton Left = 16 Top = 366 Width = 75 Height = 25 Caption = 'Memorizza' TabOrder = 2 OnClick = ButMemoClick OnEnter = ButMemoEnter end object ButLoad: TButton Left = 104 Top = 366 Width = 75 Height = 25 Caption = 'Load' TabOrder = 3 OnClick = ButLoadClick OnEnter = ButLoadEnter end object PageDesc: TPageControl Left = 8 Top = 262 Width = 349 Height = 93 ActivePage = TabSheetDescCodeEANUCC TabOrder = 5 TabStop = False object TabSheetDescEAN13: TTabSheet Caption = 'TabSheetDescEAN13' TabVisible = False object Image1: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescEAN13: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescEAN8: TTabSheet Caption = 'TabSheetDescEAN8' TabVisible = False object Image2: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescEAN8: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescCODE39: TTabSheet Caption = 'TabSheetDescCODE39' TabVisible = False object Image3: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescCode39: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescCODE32: TTabSheet Caption = 'TabSheetDescCODE32' TabVisible = False object Image4: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescCODE32: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescINT25: TTabSheet Caption = 'TabSheetDescINT25' TabVisible = False object Image5: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescINT25: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescCODABAR: TTabSheet Caption = 'TabSheetDescCODABAR' TabVisible = False object Image6: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescCODABAR: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescThinBar: TTabSheet Caption = 'TabSheetDescThinBar' TabVisible = False object Image7: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescThinBar: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescRapBar: TTabSheet Caption = 'TabSheetDescRapBar' TabVisible = False object Image8: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescRapBar: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'MemoDescRapBar') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescHigh: TTabSheet Caption = 'TabSheetDescHigh' TabVisible = False object Image9: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescHigh: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescIntCar: TTabSheet Caption = 'TabSheetDescIntCar' TabVisible = False object Image10: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescIntCar: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescMagnify: TTabSheet Caption = 'TabSheetDescMagnify' TabVisible = False object Image11: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescMagnify: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescReduction: TTabSheet Caption = 'TabSheetDescReduction' TabVisible = False object Image12: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescReduction: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescAddCheck: TTabSheet Caption = 'TabSheetDescAddCheck' TabVisible = False object Image13: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescAddCheck: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescAddCheckCODABAR: TTabSheet Caption = 'TabSheetDescAddCheckCODABAR' TabVisible = False object Image14: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescAddCheck_CODABAR: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescAddCheckINT25: TTabSheet Caption = 'TabSheetDescAddCheckINT25' TabVisible = False object Image15: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescAddCheck_INT25: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescAutoCheck: TTabSheet Caption = 'TabSheetDescAutoCheck' TabVisible = False object Image16: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescAutoCheck: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescPrintTextCODE39: TTabSheet Caption = 'TabSheetDescPrintTextCODE39' TabVisible = False object Image17: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescPrintTextCODE39: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescPrintTextEAN8: TTabSheet Caption = 'TabSheetDescPrintTextEAN8' TabVisible = False object Image18: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescPrintTextEAN8: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescPrintTextEAN13: TTabSheet Caption = 'TabSheetDescPrintTextEAN13' TabVisible = False object Image19: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescPrintTextEAN13: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescPrintTextCODE32: TTabSheet Caption = 'TabSheetDescPrintTextCODE32' TabVisible = False object Image20: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescPrintTextCODE32: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescPrintTextINT25: TTabSheet Caption = 'TabSheetDescPrintTextINT25' TabVisible = False object Image21: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescPrintTextINT25: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescPrintTextCODABAR: TTabSheet Caption = 'TabSheetDescPrintTextCODABAR' TabVisible = False object Image22: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescPrintTextCODABAR: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescRot: TTabSheet Caption = 'TabSheetDescRot' TabVisible = False object Image23: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescRot: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescUPCA: TTabSheet Caption = 'TabSheetDescUPCA' TabVisible = False object Image24: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescUPCA: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescUPCE: TTabSheet Caption = 'TabSheetDescUPCE' TabVisible = False object Image25: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescUPCE: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescCode39Ascii: TTabSheet Caption = 'TabSheetDescCode39Ascii' TabVisible = False object Image26: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescCode39Ascii: TMemo Left = 116 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescCODE93: TTabSheet Caption = 'TabSheetDescCODE93' TabVisible = False object Image27: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescCode93: TMemo Left = 118 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescCode128: TTabSheet Caption = 'TabSheetDescCode128' TabVisible = False object Image28: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescCode128: TMemo Left = 118 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end object TabSheetDescCodeEANUCC: TTabSheet Caption = 'TabSheetDescCodeEANUCC' TabVisible = False object Image29: TImage Left = 6 Top = 4 Width = 105 Height = 77 Center = True Picture.Data = {} end object MemoDescCodeEANUCC: TMemo Left = 118 Top = 2 Width = 221 Height = 79 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True TabOrder = 0 end end end object ButTest: TButton Left = 192 Top = 366 Width = 75 Height = 25 Caption = 'Test' TabOrder = 4 OnClick = ButTestClick OnEnter = ButTestEnter end object ButExit: TButton Left = 280 Top = 366 Width = 75 Height = 25 Caption = 'Chiudi' TabOrder = 6 OnClick = ButExitClick OnEnter = ButExitEnter end object MainMenu: TMainMenu Left = 340 Top = 340 object File1: TMenuItem Caption = '&File' ShortCut = 0 object MenuNewCode: TMenuItem Caption = '&Nuovo formato di codice a barre' ShortCut = 0 OnClick = MenuNewCodeClick end object MenuModCode: TMenuItem Caption = '&Modifica formato di codice a barre' ShortCut = 0 OnClick = MenuModCodeClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object MenuSave: TMenuItem Caption = '&Salva il formato di codice a barre' ShortCut = 0 OnClick = MenuSaveClick end object MenuSaveAs: TMenuItem Caption = 'Salva il formato di codice a barre con &nome' ShortCut = 0 OnClick = MenuSaveAsClick end object N2: TMenuItem Caption = '-' ShortCut = 0 end object MenuExit: TMenuItem Caption = '&Chiudi' ShortCut = 0 OnClick = MenuExitClick end end object MenuOptions: TMenuItem Caption = '&Opzioni' ShortCut = 0 object MenuUnita: TMenuItem Caption = '&Unit� di misura' ShortCut = 0 object MenuMM: TMenuItem Caption = '&millimetri' ShortCut = 0 OnClick = MenuMMClick end object MenuInch: TMenuItem Caption = '&pollici' ShortCut = 0 OnClick = MenuInchClick end end end object MenuHelp: TMenuItem Caption = '&Guida' ShortCut = 0 object MenuSommario: TMenuItem Caption = '&Sommario' ShortCut = 0 OnClick = MenuSommarioClick end object MenuCodice: TMenuItem Caption = 'Codice' ShortCut = 0 OnClick = MenuCodiceClick end end end object SaveBarCode: TSaveDialog DefaultExt = 'brc' FileEditStyle = fsEdit FileName = '*.brc' Filter = 'CreaBar files|*.brc' Options = [ofOverwritePrompt, ofHideReadOnly] Title = 'Salva il formato del codice a barre' Left = 340 Top = 366 end object LoadBarCode: TOpenDialog DefaultExt = 'brc' FileEditStyle = fsEdit FileName = '*.brc' Filter = 'CreaBar files|*.brc' Options = [ofHideReadOnly, ofFileMustExist] Title = 'Carica un formato di codice a barre' Left = 318 Top = 364 end end