object VMSM100M: TVMSM100M Left = 0 Top = 0 HorzScrollBar.Visible = False VertScrollBar.Visible = False Caption = 'VMS Information Management' ClientHeight = 877 ClientWidth = 1227 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [] KeyPreview = True OldCreateOrder = False Position = poOwnerFormCenter ShowHint = True OnClose = FormClose OnCloseQuery = FormCloseQuery OnShow = FormShow DesignSize = ( 1227 877) PixelsPerInch = 96 TextHeight = 16 object ShpTitle: TShape Left = 4 Top = 4 Width = 1219 Height = 40 Anchors = [akLeft, akTop, akRight] Brush.Color = 14671839 Pen.Color = 10849679 Pen.Width = 2 ExplicitWidth = 1269 end object LblCaption: TLabel Left = 16 Top = 10 Width = 267 Height = 23 Caption = #53440#51060#53952' ' Font.Charset = DEFAULT_CHARSET Font.Color = 4740964 Font.Height = -17 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnDblClick = LblCaptionDblClick end object ShpList: TShape Left = 4 Top = 50 Width = 1219 Height = 821 Anchors = [akLeft, akTop, akRight, akBottom] Pen.Color = 10849679 Pen.Width = 2 ExplicitWidth = 1436 ExplicitHeight = 766 end object BtnClose: TcxButton Left = 1138 Top = 11 Width = 75 Height = 25 Cursor = crHandPoint Hint = #45803#44592 Anchors = [akTop, akRight] Caption = #45803#44592 Colors.Default = 10737865 TabOrder = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnCloseClick end object EdFocus: TEdit Left = -10 Top = -10 Width = 2 Height = 24 ImeName = 'Microsoft Office IME 2007' TabOrder = 1 Text = 'EdFocus' end object PnlBack: TPanel Left = 12 Top = 56 Width = 1201 Height = 808 Anchors = [akLeft, akTop, akRight, akBottom] BevelOuter = bvNone ParentBackground = False ParentColor = True TabOrder = 2 object PnlLeft: TPanel Left = 0 Top = 0 Width = 1201 Height = 256 Align = alClient BevelOuter = bvNone TabOrder = 0 object cxGroupBox3: TcxGroupBox Left = 0 Top = 0 Align = alClient Caption = #9654' VMS List (Double-click the list to select VMS)' Style.BorderColor = clCaptionText Style.Shadow = False Style.TextColor = clWindowText Style.TextStyle = [fsBold] TabOrder = 0 Height = 256 Width = 1201 inline FRAMEVmsList1: TFRAMEVmsList Left = 3 Top = 18 Width = 1195 Height = 228 Align = alClient TabOrder = 0 ExplicitLeft = 3 ExplicitTop = 18 ExplicitWidth = 1195 ExplicitHeight = 228 inherited CxList: TcxGrid Width = 1195 Height = 166 ExplicitWidth = 1195 ExplicitHeight = 166 inherited TvList: TcxGridTableView OnCellDblClick = FRAMEVmsList1TvListCellDblClick inherited Column10: TcxGridColumn Caption = 'Web Cam IP' end end end inherited PnlTop: TPanel Width = 1195 ExplicitWidth = 1195 end inherited PnlBottom: TPanel Top = 197 Width = 1195 ExplicitTop = 197 ExplicitWidth = 1195 inherited LblRecords: TLabel Left = 1087 Width = 22 Height = 16 ExplicitLeft = 1087 ExplicitWidth = 22 ExplicitHeight = 16 end inherited BtnExlSave: TcxButton Left = 1115 ExplicitLeft = 1115 end end inherited CbUsagType: TcxComboBox ExplicitHeight = 24 end inherited CbType: TcxComboBox ExplicitHeight = 24 end end end end object cxSplitter1: TcxSplitter Left = 0 Top = 256 Width = 1201 Height = 6 AlignSplitter = salBottom Control = PnlBottom end object PnlBottom: TPanel Left = 0 Top = 262 Width = 1201 Height = 546 Align = alBottom BevelOuter = bvNone TabOrder = 2 object GrpInfo: TcxGroupBox Left = 860 Top = 0 Align = alRight Caption = #9654' VMS Information' Style.BorderColor = clCaptionText Style.Shadow = False Style.TextColor = clBlack Style.TextStyle = [fsBold] TabOrder = 0 DesignSize = ( 341 539) Height = 546 Width = 341 object PnlMenu: TPanel Left = 3 Top = 494 Width = 335 Height = 42 Align = alBottom BevelOuter = bvNone TabOrder = 0 DesignSize = ( 335 42) object BtnEdit: TcxButton Tag = 2 Left = 11 Top = 14 Width = 75 Height = 25 Cursor = crHandPoint Hint = #45936#51060#53552' '#54200#51665 Anchors = [akRight, akBottom] Caption = #54200#51665 Colors.Default = 10737865 Enabled = False TabOrder = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnEditClick end object BtnInsert: TcxButton Tag = 2 Left = 92 Top = 14 Width = 75 Height = 25 Cursor = crHandPoint Hint = #45936#51060#53552' '#52628#44032 Anchors = [akRight, akBottom] Caption = #52628#44032 Colors.Default = 10737865 TabOrder = 1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnInsertClick end object BtnDelete: TcxButton Tag = 4 Left = 174 Top = 14 Width = 75 Height = 25 Cursor = crHandPoint Hint = #45936#51060#53552' '#49325#51228 Anchors = [akRight, akBottom] Caption = #49325#51228 Colors.Default = 10737865 Enabled = False TabOrder = 2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnDeleteClick end object BtnSave: TcxButton Tag = 5 Left = 255 Top = 14 Width = 75 Height = 25 Cursor = crHandPoint Hint = #54200#51665#51089#50629' '#51200#51109 Anchors = [akRight, akBottom] Caption = #51200#51109 Colors.Default = 10737865 Enabled = False TabOrder = 3 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnSaveClick end end object cxLabel11: TcxLabel Left = 14 Top = 688 Anchors = [akLeft, akBottom] Caption = '[*] '#54364#49884#54637#47785#51008' '#54596#49688' '#51077#47141' '#54637#47785#51077#45768#45796'.' StyleDisabled.BorderColor = cl3DLight Transparent = True end object cxLabel12: TcxLabel Left = 259 Top = 688 Anchors = [akLeft, akBottom] Caption = #9733 Style.TextColor = clRed Transparent = True Visible = False end object PnlEdit: TPanel Left = 3 Top = 18 Width = 335 Height = 476 Align = alClient BevelOuter = bvNone TabOrder = 3 object ImgDesc01: TImage Left = 9 Top = 44 Width = 9 Height = 9 Transparent = True end object ImgDesc02: TImage Left = 9 Top = 76 Width = 9 Height = 9 Transparent = True end object ImgDesc03: TImage Left = 9 Top = 107 Width = 9 Height = 9 Transparent = True end object ImgDesc04: TImage Left = 9 Top = 139 Width = 9 Height = 9 Transparent = True end object ImgDesc05: TImage Left = 9 Top = 170 Width = 9 Height = 9 Transparent = True end object ImgDesc06: TImage Left = 9 Top = 202 Width = 9 Height = 9 Transparent = True end object ImgDesc07: TImage Left = 9 Top = 234 Width = 9 Height = 9 Transparent = True end object ImgDesc11: TImage Left = 9 Top = 13 Width = 9 Height = 9 Transparent = True end object ImgDesc08: TImage Left = 9 Top = 265 Width = 9 Height = 9 Transparent = True end object ImgDesc14: TImage Left = 9 Top = 362 Width = 9 Height = 9 Transparent = True end object EdVmsId: TcxTextEdit Left = 130 Top = 36 Properties.MaxLength = 30 TabOrder = 0 Width = 121 end object EdVmsNm: TcxTextEdit Left = 130 Top = 68 Properties.MaxLength = 40 Properties.ReadOnly = False TabOrder = 1 Width = 183 end object EdNmbr: TcxTextEdit Left = 130 Top = 5 Properties.ReadOnly = True TabOrder = 2 Width = 121 end object SePosX: TcxSpinEdit Left = 130 Top = 163 Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Properties.DisplayFormat = '##0.######0' Properties.EditFormat = '##0.######0' Properties.MaxValue = 9999999999.000000000000000000 Properties.ReadOnly = False Properties.SpinButtons.Visible = False Properties.ValueType = vtFloat Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.NativeStyle = False Style.TextStyle = [] Style.ButtonStyle = btsUltraFlat StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.NativeStyle = False StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.NativeStyle = False StyleFocused.TextStyle = [fsBold] StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.NativeStyle = False TabOrder = 3 Width = 120 end object SePosY: TcxSpinEdit Left = 130 Top = 194 Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Properties.DisplayFormat = '##0.######0' Properties.EditFormat = '##0.######0' Properties.MaxValue = 9999999999.000000000000000000 Properties.ReadOnly = False Properties.SpinButtons.Visible = False Properties.ValueType = vtFloat Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.NativeStyle = False Style.TextStyle = [] Style.ButtonStyle = btsUltraFlat StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.NativeStyle = False StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.NativeStyle = False StyleFocused.TextStyle = [fsBold] StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.NativeStyle = False TabOrder = 4 Width = 120 end object cxLabel1: TcxLabel Left = 56 Top = 39 Caption = 'VMS ID [*]' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 49 end object cxLabel2: TcxLabel Left = 35 Top = 71 Caption = 'VMS Name [*]' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 81 end object cxLabel3: TcxLabel Left = 27 Top = 228 Caption = 'Controller IP [*]' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 238 end object cxLabel6: TcxLabel Left = 40 Top = 102 Caption = 'VMS Type [*]' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 112 end object cxLabel7: TcxLabel Left = 44 Top = 134 Caption = 'VMS Size [*]' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 144 end object cxLabel18: TcxLabel Left = 53 Top = 8 Caption = 'VMS No [*]' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 18 end object EdId: TcxTextEdit Left = 262 Top = 5 Properties.ReadOnly = True TabOrder = 11 Visible = False Width = 51 end object EdCtlrIp: TcxMaskEdit Left = 130 Top = 226 Properties.MaskKind = emkRegExprEx Properties.EditMask = '(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.(25[0-5]|2[0-4][0-9]|[01' + ']?[0-9][0-9]?)\.(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.(25[0-5]' + '|2[0-4][0-9]|[01]?[0-9][0-9]?)' Properties.MaxLength = 0 TabOrder = 12 Width = 120 end object CbUsagType: TcxComboBox Left = 130 Top = 99 Cursor = crHandPoint Properties.Alignment.Vert = taVCenter Properties.DropDownListStyle = lsFixedList Properties.DropDownSizeable = True Properties.ReadOnly = False TabOrder = 13 Width = 183 end object CbType: TcxComboBox Left = 130 Top = 131 Cursor = crHandPoint Properties.Alignment.Vert = taVCenter Properties.DropDownListStyle = lsFixedList Properties.DropDownSizeable = True Properties.ReadOnly = False TabOrder = 14 Width = 183 end object cxLabel8: TcxLabel Left = 39 Top = 165 Caption = 'Location X [*]' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 175 end object cxLabel22: TcxLabel Left = 40 Top = 197 Caption = 'Location Y [*]' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 207 end object cxLabel5: TcxLabel Left = 21 Top = 260 Caption = 'Web Cam IP/Port' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 270 end object EdWebCamIp: TcxMaskEdit Left = 130 Top = 257 Properties.MaskKind = emkRegExprEx Properties.EditMask = '(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.(25[0-5]|2[0-4][0-9]|[01' + ']?[0-9][0-9]?)\.(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.(25[0-5]' + '|2[0-4][0-9]|[01]?[0-9][0-9]?)' Properties.MaxLength = 0 TabOrder = 18 Width = 120 end object EdWebCamPort: TcxTextEdit Left = 253 Top = 257 Properties.MaxLength = 5 Properties.ReadOnly = False TabOrder = 19 OnKeyPress = EdWebCamPortKeyPress Width = 64 end object cxLabel15: TcxLabel Left = 56 Top = 291 Caption = ' ID/Passwd' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 301 end object EdWebCamId: TcxTextEdit Left = 130 Top = 289 Properties.Alignment.Horz = taLeftJustify Properties.Alignment.Vert = taVCenter Properties.MaxLength = 0 Properties.ReadOnly = False Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.NativeStyle = False Style.Shadow = False StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.NativeStyle = False StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.NativeStyle = False StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.NativeStyle = False TabOrder = 21 Width = 90 end object EdWebCamPswd: TcxTextEdit Left = 227 Top = 289 Properties.Alignment.Horz = taLeftJustify Properties.Alignment.Vert = taVCenter Properties.MaxLength = 0 Properties.ReadOnly = False Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.NativeStyle = False Style.Shadow = False StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.NativeStyle = False StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.NativeStyle = False StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.NativeStyle = False TabOrder = 22 Width = 90 end object EdWebCamStrm: TcxTextEdit Left = 130 Top = 321 Properties.Alignment.Horz = taLeftJustify Properties.Alignment.Vert = taVCenter Properties.MaxLength = 0 Properties.ReadOnly = False Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.NativeStyle = False Style.Shadow = False StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.NativeStyle = False StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.NativeStyle = False StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.NativeStyle = False TabOrder = 23 Width = 187 end object cxLabel16: TcxLabel Left = 15 Top = 323 Caption = 'Streamming Addr.' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 333 end object EdCmncPort: TcxTextEdit Left = 253 Top = 226 Properties.MaxLength = 5 Properties.ReadOnly = False TabOrder = 25 OnKeyPress = EdWebCamPortKeyPress Width = 64 end object SeMaxPhase: TcxSpinEdit Left = 130 Top = 352 Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Properties.MaxValue = 9.000000000000000000 Properties.MinValue = 1.000000000000000000 Properties.ReadOnly = False Properties.OnChange = SeMaxPhasePropertiesChange Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.NativeStyle = False Style.ButtonStyle = btsUltraFlat StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.NativeStyle = False StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.NativeStyle = False StyleFocused.TextStyle = [fsBold] StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.NativeStyle = False TabOrder = 26 Value = 9 Width = 60 end object cxLabel9: TcxLabel Left = 26 Top = 356 Caption = 'Max Form Count' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 124 AnchorY = 366 end end object cxGroupBox1: TcxGroupBox Left = 12 Top = 401 Caption = 'Controller Setting' TabOrder = 4 Visible = False Height = 98 Width = 308 object cxTimeOn: TcxTimeEdit Left = 132 Top = 24 EditValue = 0d Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.TimeFormat = tfHourMin Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.NativeStyle = False StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.NativeStyle = False StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.NativeStyle = False StyleFocused.TextStyle = [fsBold] StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.NativeStyle = False TabOrder = 0 Width = 63 end object cxTimeOff: TcxTimeEdit Left = 200 Top = 24 EditValue = 0d Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.TimeFormat = tfHourMin Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.NativeStyle = False StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.NativeStyle = False StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.NativeStyle = False StyleFocused.TextStyle = [fsBold] StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.NativeStyle = False TabOrder = 1 Width = 63 end object cxLabel4: TcxLabel Left = 18 Top = 27 Caption = 'Board On/Off Time' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 130 AnchorY = 37 end object BtnSaveAll: TcxButton Tag = 5 Left = 159 Top = 57 Width = 140 Height = 25 Cursor = crHandPoint Hint = 'Apply the same value to the entire VMS.' Caption = 'Apply All VMS' Colors.Default = 10737865 TabOrder = 3 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnSaveAllClick end end end object cxSplitter2: TcxSplitter Left = 854 Top = 0 Width = 6 Height = 546 AlignSplitter = salRight Control = GrpInfo end object GrpMap: TcxGroupBox Left = 0 Top = 0 Align = alClient Caption = #9654' VMS Location' Style.BorderColor = clCaptionText Style.Shadow = False Style.TextColor = clBlack Style.TextStyle = [fsBold] TabOrder = 2 Height = 546 Width = 854 end end end object cxButton1: TcxButton Tag = 2 Left = 952 Top = 11 Width = 171 Height = 25 Cursor = crHandPoint Hint = #50937#52852#47700#46972#48624#50612' '#54028#51068' '#49373#49457 Anchors = [akTop, akRight] Caption = #50937#52852#47700#46972#48624#50612' '#54028#51068' '#49373#49457 Colors.Default = 10737865 TabOrder = 3 Visible = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = cxButton1Click end object TmrShow: TTimer Enabled = False Interval = 300 OnTimer = TmrShowTimer Left = 876 Top = 8 end end