VmsCommServer/SRC/FRM/FrmOptionF.dfm

object FrmOption: TFrmOption
  Left = 0
  Top = 0
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Options'
  ClientHeight = 291
  ClientWidth = 616
  Color = clBtnFace
  DoubleBuffered = True
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Tahoma'
  Font.Style = []
  Icon.Data = {
    000001000100100F000000000000540500001600000028000000100000001E00
    000001000800000000002C01000000000000000000000000000000000000FFFF
    FF00FACEA900FFDA9500FFC49D00FFC69500E4B48E00E7AB9500E6A49100EEA4
    8B00ECA18100E3A38C00D9A29400DFA68B00DA9D8B00D99D8700D49A8600CC93
    8100CA8B830099E4FE00BF908200E9967900D4947600BD907B00A9817900A07B
    7400A3756500A06B61009F766600896A61008A626200926652008B7E5A008860
    55008D664E0081544E0073544A00734D4000674F490064484000604B3C00535B
    3B005F443B004F403F0048382C00315967003F4538002C1106001D1211000C0D
    0B00000000006DADB500719BA600628AA80063868F00736765006E6C64007957
    4E0075544700695450005D4D46007F5A360073483D00664C3F0051403B005737
    240048352F00344B6B0000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000FFFFFF003131
    3131313131313131313131313131313131302424242424242424313131313131
    2424121212122C24032424313131312403242412123224030303242431313103
    0303241212342403030303242431310303032412123424030303032424313103
    0303241212342403030303242431310303032412123424030303032424313103
    0303241212342403030303242431310303243712123424030303032424313124
    0324373333372403030324243131313103032432332403030303242431313131
    2403331212342403032424313131313131242432123524242431313131313131
    3131312F2F303131313131313131E00F0000C007000080030000000100000000
    0000000000000000000000000000000000000000000000010000800100008003
    0000C0070000E01F0000}
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object btnClose: TButton
    Left = 526
    Top = 260
    Width = 75
    Height = 25
    Cursor = crHandPoint
    Caption = 'Close'
    TabOrder = 0
    OnClick = btnCloseClick
  end
  object pnlLeft: TPanel
    AlignWithMargins = True
    Left = 2
    Top = 0
    Width = 612
    Height = 153
    Margins.Left = 2
    Margins.Top = 0
    Margins.Right = 2
    Margins.Bottom = 2
    Align = alTop
    BevelKind = bkSoft
    BevelOuter = bvNone
    TabOrder = 1
    object plServerInfo: TPanel
      AlignWithMargins = True
      Left = 2
      Top = 2
      Width = 604
      Height = 26
      Margins.Left = 2
      Margins.Top = 2
      Margins.Right = 2
      Margins.Bottom = 2
      Align = alTop
      Alignment = taLeftJustify
      BevelKind = bkSoft
      BevelOuter = bvNone
      Caption = '      Server Information'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentBackground = False
      ParentFont = False
      TabOrder = 0
      object Image3: TImage
        Left = 7
        Top = 6
        Width = 9
        Height = 9
        Picture.Data = {
          07544269746D617032010000424D320100000000000036000000280000000900
          0000090000000100180000000000FC000000C30E0000C30E0000000000000000
          00000000FF0000FF0000FF0092FF0092FF0092FF0000FF0000FF0000FF000000
          FF0092FF0092FF46AFFD46AFFD46AFFD0092FF0092FF0000FF000000FF0092FF
          46AFFD46AFFDFFFFFF46AFFD46AFFD0092FF0000FF000092FF46AFFD46AFFD46
          AFFDFFFFFF46AFFD46AFFD46AFFD0092FF000092FF46AFFDFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFF46AFFD0092FF000092FF46AFFD46AFFD46AFFDFFFFFF46AFFD
          46AFFD46AFFD0092FF000000FF0092FF46AFFD46AFFDFFFFFF46AFFD46AFFD00
          92FF0000FF000000FF0092FF0092FF46AFFD46AFFD46AFFD0092FF0092FF0000
          FF000000FF0000FF0000FF0092FF0092FF0092FF0000FF0000FF0000FF00}
        Transparent = True
      end
    end
    object Panel1: TPanel
      AlignWithMargins = True
      Left = 2
      Top = 30
      Width = 300
      Height = 117
      Margins.Left = 2
      Margins.Top = 0
      Margins.Right = 2
      Margins.Bottom = 2
      Align = alLeft
      BevelKind = bkSoft
      BevelOuter = bvNone
      TabOrder = 1
      object Panel10: TPanel
        AlignWithMargins = True
        Left = 2
        Top = 55
        Width = 292
        Height = 25
        Margins.Left = 2
        Margins.Top = 1
        Margins.Right = 2
        Margins.Bottom = 1
        Align = alTop
        BevelKind = bkFlat
        BevelOuter = bvNone
        ParentBackground = False
        TabOrder = 0
        object Label2: TLabel
          AlignWithMargins = True
          Left = 0
          Top = 3
          Width = 150
          Height = 15
          Margins.Left = 0
          Align = alLeft
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'IP Address'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          Layout = tlCenter
        end
        object plIpAddress: TPanel
          AlignWithMargins = True
          Left = 156
          Top = 0
          Width = 129
          Height = 21
          Margins.Top = 0
          Margins.Bottom = 0
          Align = alClient
          BevelKind = bkFlat
          BevelOuter = bvNone
          Caption = '127.0.0.1'
          Color = clTeal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindow
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentBackground = False
          ParentFont = False
          TabOrder = 0
        end
      end
      object Panel26: TPanel
        AlignWithMargins = True
        Left = 2
        Top = 82
        Width = 292
        Height = 25
        Margins.Left = 2
        Margins.Top = 1
        Margins.Right = 2
        Margins.Bottom = 1
        Align = alTop
        BevelKind = bkFlat
        BevelOuter = bvNone
        ParentBackground = False
        TabOrder = 1
        object Label4: TLabel
          AlignWithMargins = True
          Left = 0
          Top = 3
          Width = 150
          Height = 15
          Margins.Left = 0
          Align = alLeft
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Internal Port'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          Layout = tlCenter
        end
        object plCenterPort: TPanel
          AlignWithMargins = True
          Left = 156
          Top = 0
          Width = 129
          Height = 21
          Margins.Top = 0
          Margins.Bottom = 0
          Align = alClient
          BevelKind = bkFlat
          BevelOuter = bvNone
          Caption = '5040'
          Color = clTeal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindow
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentBackground = False
          ParentFont = False
          TabOrder = 0
        end
      end
      object Panel2: TPanel
        AlignWithMargins = True
        Left = 2
        Top = 1
        Width = 292
        Height = 25
        Margins.Left = 2
        Margins.Top = 1
        Margins.Right = 2
        Margins.Bottom = 1
        Align = alTop
        BevelKind = bkFlat
        BevelOuter = bvNone
        ParentBackground = False
        TabOrder = 2
        object Label11: TLabel
          AlignWithMargins = True
          Left = 0
          Top = 3
          Width = 285
          Height = 15
          Margins.Left = 0
          Align = alClient
          AutoSize = False
          Caption = '  Communication Information'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clPurple
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
          Layout = tlCenter
          ExplicitLeft = 16
          ExplicitWidth = 90
        end
      end
      object Panel13: TPanel
        AlignWithMargins = True
        Left = 2
        Top = 28
        Width = 292
        Height = 25
        Margins.Left = 2
        Margins.Top = 1
        Margins.Right = 2
        Margins.Bottom = 1
        Align = alTop
        BevelKind = bkFlat
        BevelOuter = bvNone
        ParentBackground = False
        TabOrder = 3
        object Label10: TLabel
          AlignWithMargins = True
          Left = 0
          Top = 3
          Width = 150
          Height = 15
          Margins.Left = 0
          Align = alLeft
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'System ID'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          Layout = tlCenter
        end
        object plSystemId: TPanel
          AlignWithMargins = True
          Left = 156
          Top = 0
          Width = 129
          Height = 21
          Margins.Top = 0
          Margins.Bottom = 0
          Align = alClient
          BevelKind = bkFlat
          BevelOuter = bvNone
          Caption = '0'
          Color = clTeal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindow
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentBackground = False
          ParentFont = False
          TabOrder = 0
        end
      end
    end
    object Panel5: TPanel
      AlignWithMargins = True
      Left = 306
      Top = 30
      Width = 300
      Height = 117
      Margins.Left = 2
      Margins.Top = 0
      Margins.Right = 2
      Margins.Bottom = 2
      Align = alLeft
      BevelKind = bkSoft
      BevelOuter = bvNone
      TabOrder = 2
      object Panel19: TPanel
        AlignWithMargins = True
        Left = 2
        Top = 1
        Width = 292
        Height = 25
        Margins.Left = 2
        Margins.Top = 1
        Margins.Right = 2
        Margins.Bottom = 1
        Align = alTop
        BevelKind = bkFlat
        BevelOuter = bvNone
        ParentBackground = False
        TabOrder = 0
        object Label15: TLabel
          AlignWithMargins = True
          Left = 0
          Top = 3
          Width = 285
          Height = 15
          Margins.Left = 0
          Align = alClient
          AutoSize = False
          Caption = '  VMS Controller Information'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clPurple
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
          Layout = tlCenter
          ExplicitLeft = 16
          ExplicitWidth = 90
        end
      end
      object Panel20: TPanel
        AlignWithMargins = True
        Left = 2
        Top = 28
        Width = 292
        Height = 25
        Margins.Left = 2
        Margins.Top = 1
        Margins.Right = 2
        Margins.Bottom = 1
        Align = alTop
        BevelKind = bkFlat
        BevelOuter = bvNone
        ParentBackground = False
        TabOrder = 1
        object Label16: TLabel
          AlignWithMargins = True
          Left = 0
          Top = 3
          Width = 150
          Height = 15
          Margins.Left = 0
          Align = alLeft
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Total VMS'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          Layout = tlCenter
        end
        object plTot: TPanel
          AlignWithMargins = True
          Left = 156
          Top = 0
          Width = 129
          Height = 21
          Margins.Top = 0
          Margins.Bottom = 0
          Align = alClient
          BevelKind = bkFlat
          BevelOuter = bvNone
          Caption = '0'
          Color = clTeal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindow
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentBackground = False
          ParentFont = False
          TabOrder = 0
        end
      end
      object Panel22: TPanel
        AlignWithMargins = True
        Left = 2
        Top = 55
        Width = 292
        Height = 25
        Margins.Left = 2
        Margins.Top = 1
        Margins.Right = 2
        Margins.Bottom = 1
        Align = alTop
        BevelKind = bkFlat
        BevelOuter = bvNone
        ParentBackground = False
        TabOrder = 2
        object Label17: TLabel
          AlignWithMargins = True
          Left = 0
          Top = 3
          Width = 150
          Height = 15
          Margins.Left = 0
          Align = alLeft
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Normal VMS'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          Layout = tlCenter
        end
        object plNor: TPanel
          AlignWithMargins = True
          Left = 156
          Top = 0
          Width = 129
          Height = 21
          Margins.Top = 0
          Margins.Bottom = 0
          Align = alClient
          BevelKind = bkFlat
          BevelOuter = bvNone
          Caption = '0'
          Color = clTeal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindow
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentBackground = False
          ParentFont = False
          TabOrder = 0
        end
      end
      object Panel25: TPanel
        AlignWithMargins = True
        Left = 2
        Top = 82
        Width = 292
        Height = 25
        Margins.Left = 2
        Margins.Top = 1
        Margins.Right = 2
        Margins.Bottom = 1
        Align = alTop
        BevelKind = bkFlat
        BevelOuter = bvNone
        ParentBackground = False
        TabOrder = 3
        object Label18: TLabel
          AlignWithMargins = True
          Left = 0
          Top = 3
          Width = 150
          Height = 15
          Margins.Left = 0
          Align = alLeft
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Error VMS'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          Layout = tlCenter
        end
        object plErr: TPanel
          AlignWithMargins = True
          Left = 156
          Top = 0
          Width = 129
          Height = 21
          Margins.Top = 0
          Margins.Bottom = 0
          Align = alClient
          BevelKind = bkFlat
          BevelOuter = bvNone
          Caption = '0'
          Color = clTeal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clRed
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentBackground = False
          ParentFont = False
          TabOrder = 0
        end
      end
    end
  end
  object Panel4: TPanel
    AlignWithMargins = True
    Left = 2
    Top = 155
    Width = 612
    Height = 98
    Margins.Left = 2
    Margins.Top = 0
    Margins.Right = 2
    Margins.Bottom = 2
    Align = alTop
    BevelKind = bkSoft
    BevelOuter = bvNone
    TabOrder = 2
    object Panel6: TPanel
      AlignWithMargins = True
      Left = 2
      Top = 2
      Width = 604
      Height = 26
      Margins.Left = 2
      Margins.Top = 2
      Margins.Right = 2
      Margins.Bottom = 2
      Align = alTop
      Alignment = taLeftJustify
      BevelKind = bkSoft
      BevelOuter = bvNone
      Caption = '      Log Options'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentBackground = False
      ParentFont = False
      TabOrder = 0
      object Image1: TImage
        Left = 7
        Top = 6
        Width = 9
        Height = 9
        Picture.Data = {
          07544269746D617032010000424D320100000000000036000000280000000900
          0000090000000100180000000000FC000000C30E0000C30E0000000000000000
          00000000FF0000FF0000FF0092FF0092FF0092FF0000FF0000FF0000FF000000
          FF0092FF0092FF46AFFD46AFFD46AFFD0092FF0092FF0000FF000000FF0092FF
          46AFFD46AFFDFFFFFF46AFFD46AFFD0092FF0000FF000092FF46AFFD46AFFD46
          AFFDFFFFFF46AFFD46AFFD46AFFD0092FF000092FF46AFFDFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFF46AFFD0092FF000092FF46AFFD46AFFD46AFFDFFFFFF46AFFD
          46AFFD46AFFD0092FF000000FF0092FF46AFFD46AFFDFFFFFF46AFFD46AFFD00
          92FF0000FF000000FF0092FF0092FF46AFFD46AFFD46AFFD0092FF0092FF0000
          FF000000FF0000FF0000FF0092FF0092FF0092FF0000FF0000FF0000FF00}
        Transparent = True
      end
    end
    object chkInfo: TCheckBox
      Left = 15
      Top = 37
      Width = 97
      Height = 17
      Cursor = crHandPoint
      Caption = ' Information'
      TabOrder = 1
    end
    object chkData: TCheckBox
      Left = 352
      Top = 37
      Width = 97
      Height = 17
      Cursor = crHandPoint
      Caption = ' Data'
      Enabled = False
      TabOrder = 2
    end
    object chkDetail: TCheckBox
      Left = 143
      Top = 60
      Width = 97
      Height = 17
      Cursor = crHandPoint
      Caption = ' Detail'
      TabOrder = 3
      Visible = False
    end
    object chkError: TCheckBox
      Left = 127
      Top = 37
      Width = 97
      Height = 17
      Cursor = crHandPoint
      Caption = ' Error'
      TabOrder = 4
    end
    object chkWarning: TCheckBox
      Left = 240
      Top = 37
      Width = 97
      Height = 17
      Cursor = crHandPoint
      Caption = ' Warning'
      TabOrder = 5
    end
    object chkDebug: TCheckBox
      Left = 465
      Top = 37
      Width = 97
      Height = 17
      Cursor = crHandPoint
      Caption = ' Debug'
      Enabled = False
      TabOrder = 6
    end
    object btnSetLog: TButton
      Left = 522
      Top = 60
      Width = 75
      Height = 25
      Cursor = crHandPoint
      Caption = 'Save'
      TabOrder = 7
      OnClick = btnSetLogClick
    end
  end
  object Panel7: TPanel
    AlignWithMargins = True
    Left = 19
    Top = 255
    Width = 300
    Height = 195
    Margins.Left = 2
    Margins.Top = 0
    Margins.Right = 2
    Margins.Bottom = 2
    BevelKind = bkSoft
    BevelOuter = bvNone
    TabOrder = 3
    Visible = False
    object Panel3: TPanel
      AlignWithMargins = True
      Left = 2
      Top = 1
      Width = 292
      Height = 25
      Margins.Left = 2
      Margins.Top = 1
      Margins.Right = 2
      Margins.Bottom = 1
      Align = alTop
      BevelKind = bkFlat
      BevelOuter = bvNone
      ParentBackground = False
      TabOrder = 0
      Visible = False
      object Label1: TLabel
        AlignWithMargins = True
        Left = 0
        Top = 3
        Width = 150
        Height = 15
        Margins.Left = 0
        Align = alLeft
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Process ID'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        Layout = tlCenter
      end
      object plProcessId: TPanel
        AlignWithMargins = True
        Left = 156
        Top = 0
        Width = 129
        Height = 21
        Margins.Top = 0
        Margins.Bottom = 0
        Align = alClient
        BevelKind = bkFlat
        BevelOuter = bvNone
        Caption = '20301'
        Color = clTeal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindow
        Font.Height = -12
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentBackground = False
        ParentFont = False
        TabOrder = 0
      end
    end
    object Panel24: TPanel
      AlignWithMargins = True
      Left = 2
      Top = 28
      Width = 292
      Height = 25
      Margins.Left = 2
      Margins.Top = 1
      Margins.Right = 2
      Margins.Bottom = 1
      Align = alTop
      BevelKind = bkFlat
      BevelOuter = bvNone
      ParentBackground = False
      TabOrder = 1
      Visible = False
      object Label3: TLabel
        AlignWithMargins = True
        Left = 0
        Top = 3
        Width = 150
        Height = 15
        Margins.Left = 0
        Align = alLeft
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'VMS Binding Port'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        Layout = tlCenter
      end
      object plVmsPort: TPanel
        AlignWithMargins = True
        Left = 156
        Top = 0
        Width = 129
        Height = 21
        Margins.Top = 0
        Margins.Bottom = 0
        Align = alClient
        BevelKind = bkFlat
        BevelOuter = bvNone
        Caption = '6020'
        Color = clTeal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindow
        Font.Height = -12
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentBackground = False
        ParentFont = False
        TabOrder = 0
      end
    end
    object Panel9: TPanel
      AlignWithMargins = True
      Left = 2
      Top = 55
      Width = 292
      Height = 25
      Margins.Left = 2
      Margins.Top = 1
      Margins.Right = 2
      Margins.Bottom = 1
      Align = alTop
      BevelKind = bkFlat
      BevelOuter = bvNone
      ParentBackground = False
      TabOrder = 2
      Visible = False
      object Label9: TLabel
        AlignWithMargins = True
        Left = 0
        Top = 3
        Width = 150
        Height = 15
        Margins.Left = 0
        Align = alLeft
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'VMS Connect Port'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        Layout = tlCenter
        Visible = False
      end
      object plVmsConPort: TPanel
        AlignWithMargins = True
        Left = 156
        Top = 0
        Width = 129
        Height = 21
        Margins.Top = 0
        Margins.Bottom = 0
        Align = alClient
        BevelKind = bkFlat
        BevelOuter = bvNone
        Caption = '0'
        Color = clTeal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindow
        Font.Height = -12
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentBackground = False
        ParentFont = False
        TabOrder = 0
        Visible = False
      end
    end
  end
end