1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012 |
- object VMSM100M: TVMSM100M
- Left = 0
- Top = 0
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- Caption = 'VMS '#44592#48376#51221#48372' '#44288#47532
- ClientHeight = 877
- ClientWidth = 1227
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = []
- KeyPreview = True
- OldCreateOrder = False
- Position = poOwnerFormCenter
- ShowHint = True
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnShow = FormShow
- DesignSize = (
- 1227
- 877)
- PixelsPerInch = 96
- TextHeight = 17
- 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
- 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 = 1133
- Top = 11
- Width = 80
- 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 = 25
- 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 = 223
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object cxGroupBox3: TcxGroupBox
- Left = 0
- Top = 0
- Align = alClient
- Caption = #9654' VMS '#47785#47197
- Style.BorderColor = clCaptionText
- Style.Shadow = False
- Style.TextColor = clWindowText
- Style.TextStyle = [fsBold]
- TabOrder = 0
- Height = 223
- Width = 1201
- inline FRAMEVmsList1: TFRAMEVmsList
- Left = 3
- Top = 19
- Width = 1195
- Height = 194
- Align = alClient
- TabOrder = 0
- ExplicitLeft = 3
- ExplicitTop = 19
- ExplicitWidth = 1195
- ExplicitHeight = 194
- inherited CxList: TcxGrid
- Width = 1195
- Height = 132
- ExplicitTop = 33
- ExplicitWidth = 1195
- ExplicitHeight = 132
- 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 = 163
- Width = 1195
- ExplicitTop = 163
- ExplicitWidth = 1195
- inherited LblRecords: TLabel
- Left = 1084
- Width = 25
- Height = 17
- ExplicitLeft = 1084
- ExplicitWidth = 25
- ExplicitHeight = 17
- end
- inherited BtnExlSave: TcxButton
- Left = 1115
- ExplicitLeft = 1115
- end
- end
- inherited CbUsagType: TcxComboBox
- ExplicitHeight = 25
- end
- inherited CbType: TcxComboBox
- ExplicitHeight = 25
- end
- inherited lblTitle: TcxLabel
- ExplicitWidth = 57
- ExplicitHeight = 21
- end
- end
- end
- end
- object cxSplitter1: TcxSplitter
- Left = 0
- Top = 223
- Width = 1201
- Height = 6
- AlignSplitter = salBottom
- Control = PnlBottom
- end
- object PnlBottom: TPanel
- Left = 0
- Top = 229
- Width = 1201
- Height = 579
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 2
- object GrpInfo: TcxGroupBox
- Left = 852
- Top = 0
- Align = alRight
- Caption = #9654' VMS '#51221#48372
- Style.BorderColor = clCaptionText
- Style.Shadow = False
- Style.TextColor = clBlack
- Style.TextStyle = [fsBold]
- TabOrder = 0
- DesignSize = (
- 349
- 572)
- Height = 579
- Width = 349
- object PnlMenu: TPanel
- Left = 3
- Top = 527
- Width = 343
- Height = 42
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 0
- DesignSize = (
- 343
- 42)
- object BtnEdit: TcxButton
- Tag = 2
- Left = 15
- Top = 14
- Width = 80
- 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 = 96
- Top = 14
- Width = 80
- 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 = 178
- Top = 14
- Width = 80
- 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 = 259
- Top = 14
- Width = 80
- 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 = 721
- 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 = 721
- Anchors = [akLeft, akBottom]
- Caption = #9733
- Style.TextColor = clRed
- Transparent = True
- Visible = False
- end
- object PnlEdit: TPanel
- Left = 3
- Top = 19
- Width = 343
- Height = 508
- 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 = 299
- Width = 9
- Height = 9
- Transparent = True
- end
- object ImgDesc06: TImage
- Left = 9
- Top = 168
- Width = 9
- Height = 9
- Transparent = True
- end
- object ImgDesc07: TImage
- Left = 9
- Top = 200
- Width = 9
- Height = 9
- Transparent = True
- end
- object ImgDesc11: TImage
- Left = 9
- Top = 13
- Width = 9
- Height = 9
- Transparent = True
- end
- object ImgDesc14: TImage
- Left = 1
- Top = 369
- Width = 9
- Height = 9
- Transparent = True
- Visible = False
- end
- object ImgDesc25: TImage
- Left = 9
- Top = 330
- 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 = 206
- end
- object EdNmbr: TcxTextEdit
- Left = 130
- Top = 5
- Properties.Alignment.Horz = taCenter
- Properties.ReadOnly = True
- TabOrder = 13
- Width = 121
- end
- object SePosX: TcxSpinEdit
- Left = 130
- Top = 133
- 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 = 102
- end
- object SePosY: TcxSpinEdit
- Left = 234
- Top = 132
- 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 = 102
- end
- object cxLabel1: TcxLabel
- Left = 56
- Top = 38
- Caption = 'VMS ID [*]'
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 49
- end
- object cxLabel2: TcxLabel
- Left = 43
- Top = 70
- Caption = 'VMS '#47749#52845' [*]'
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 81
- end
- object cxLabel3: TcxLabel
- Left = 46
- Top = 165
- Caption = #51228#50612#44592' IP [*]'
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 176
- end
- object cxLabel6: TcxLabel
- Left = 43
- Top = 102
- Caption = 'VMS '#50976#54805' [*]'
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 113
- end
- object cxLabel18: TcxLabel
- Left = 43
- Top = 7
- Caption = 'VMS '#48264#54840' [*]'
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 18
- end
- object EdCtlrIp: TcxMaskEdit
- Left = 130
- Top = 163
- 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 = 5
- Width = 120
- end
- object CbType: TcxComboBox
- Left = 130
- Top = 101
- Cursor = crHandPoint
- Properties.Alignment.Vert = taVCenter
- Properties.DropDownListStyle = lsFixedList
- Properties.DropDownSizeable = True
- Properties.ReadOnly = False
- TabOrder = 2
- Width = 206
- end
- object cxLabel8: TcxLabel
- Left = 50
- Top = 133
- Caption = #50948#52824' X/Y [*]'
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 144
- end
- object cxLabel22: TcxLabel
- Left = 68
- Top = 292
- Caption = #49444#52824#50948#52824
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 303
- end
- object cxLabel5: TcxLabel
- Left = 23
- Top = 197
- Caption = #50937#52852#47700#46972' IP/Port'
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 208
- end
- object EdWebCamIp: TcxMaskEdit
- Left = 130
- Top = 195
- 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 = 7
- Width = 120
- end
- object EdWebCamPort: TcxTextEdit
- Left = 253
- Top = 195
- Properties.MaxLength = 5
- Properties.ReadOnly = False
- TabOrder = 8
- OnKeyPress = EdWebCamPortKeyPress
- Width = 64
- end
- object cxLabel15: TcxLabel
- Left = 50
- Top = 228
- Caption = 'ID/'#54056#49828#50892#46300
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 239
- end
- object EdWebCamId: TcxTextEdit
- Left = 130
- Top = 227
- 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 = 9
- Width = 90
- end
- object EdWebCamPswd: TcxTextEdit
- Left = 227
- Top = 227
- 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 = 10
- Width = 90
- end
- object EdWebCamStrm: TcxTextEdit
- Left = 130
- Top = 259
- 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 = 11
- Width = 206
- end
- object cxLabel16: TcxLabel
- Left = 37
- Top = 260
- Caption = #49828#53944#47532#48141' '#51452#49548
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 271
- end
- object EdCmncPort: TcxTextEdit
- Left = 253
- Top = 163
- Properties.MaxLength = 5
- Properties.ReadOnly = False
- TabOrder = 6
- OnKeyPress = EdWebCamPortKeyPress
- Width = 64
- end
- object SeMaxPhase: TcxSpinEdit
- Left = 122
- Top = 359
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Properties.MaxValue = 16.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 = 12
- Value = 9
- Visible = False
- Width = 60
- end
- object cxLabel9: TcxLabel
- Left = 21
- Top = 362
- Caption = #54364#52636#54268#52572#45824#44079#49688
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- Visible = False
- AnchorX = 116
- AnchorY = 373
- end
- object ISTL_LCTN_NM: TcxTextEdit
- Left = 130
- Top = 290
- Properties.MaxLength = 40
- Properties.ReadOnly = False
- TabOrder = 25
- Width = 206
- end
- object ISTL_LCTN_ADDR: TcxTextEdit
- Left = 130
- Top = 321
- Properties.MaxLength = 200
- Properties.ReadOnly = False
- TabOrder = 26
- Width = 206
- end
- object cxLabel7: TcxLabel
- Left = 42
- Top = 324
- Caption = #49444#52824#50948#52824#51452#49548
- Properties.Alignment.Horz = taRightJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorX = 124
- AnchorY = 335
- end
- end
- object cxGroupBox1: TcxGroupBox
- Left = 31
- Top = 417
- Caption = #51228#50612#44592' '#49444#51221' '#51221#48372
- TabOrder = 4
- 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 = 10
- Top = 26
- Caption = #51204#44305#54032' On/Off '#49884#44033
- 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 = #51204#52404' VMS '#51201#50857
- 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 = 846
- Top = 0
- Width = 6
- Height = 579
- AlignSplitter = salRight
- Control = GrpInfo
- end
- object GrpMap: TcxGroupBox
- Left = 0
- Top = 0
- Align = alClient
- Caption = #9654' '#50948#52824#49444#51221
- Style.BorderColor = clCaptionText
- Style.Shadow = False
- Style.TextColor = clBlack
- Style.TextStyle = [fsBold]
- TabOrder = 2
- Height = 579
- Width = 846
- inline FRAMEOpenMap1: TFRAMEOpenMap
- Left = 3
- Top = 19
- Width = 840
- Height = 550
- Align = alClient
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- ExplicitLeft = 3
- ExplicitTop = 19
- ExplicitWidth = 840
- ExplicitHeight = 550
- inherited PnlToolbar: TPanel
- Width = 840
- ExplicitWidth = 840
- inherited EdFocus: TEdit
- Height = 25
- ExplicitHeight = 25
- end
- inherited cxLabel26: TcxLabel
- AnchorX = 122
- AnchorY = 19
- end
- inherited cxLabel27: TcxLabel
- AnchorX = 280
- AnchorY = 19
- end
- inherited PnlGisTool: TPanel
- Width = 407
- ExplicitWidth = 407
- inherited ChkShowNmbr: TcxCheckBox
- ExplicitHeight = 28
- end
- inherited EdMapPos: TcxTextEdit
- ExplicitHeight = 28
- end
- end
- inherited cxLabel1: TcxLabel
- AnchorX = 346
- AnchorY = 19
- end
- inherited LblZoom: TcxLabel
- Left = 753
- ExplicitLeft = 753
- AnchorX = 835
- AnchorY = 19
- end
- end
- inherited lblTitle: TcxLabel
- ExplicitWidth = 69
- ExplicitHeight = 21
- end
- inherited reMsg: TMemo
- Top = 403
- Width = 840
- ExplicitTop = 403
- ExplicitWidth = 840
- end
- inherited PnlMap: TPanel
- Width = 840
- Height = 365
- ExplicitWidth = 840
- ExplicitHeight = 365
- inherited WebBrowser1: TWebBrowser
- Width = 836
- Height = 361
- ExplicitWidth = 840
- ExplicitHeight = 365
- ControlData = {
- 4C000000675600004F2500000000000000000000000000000000000000000000
- 000000004C000000000000000000000001000000E0D057007335CF11AE690800
- 2B2E126208000000000000004C0000000114020000000000C000000000000046
- 8000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000100000000000000000000000000000000000000}
- end
- end
- inherited ilToolbarsSmall: TcxImageList
- FormatVersion = 1
- end
- end
- end
- end
- end
- object lblText1: TcxLabel
- Left = 317
- Top = 149
- Caption = #49352#47196#50868' VMS '#51221#48372#47484' '#49373#49457#54616#51648' '#47803#54616#50688#49845#45768#45796'.'#13#10#54532#47196#44536#47016' '#51333#47308#54980#50640' '#45796#49884' '#49884#46020#54644' '#48372#49464#50836'.'
- Transparent = True
- Visible = False
- end
- object lblText2: TcxLabel
- Left = 605
- Top = 149
- Caption = #49325#51228#54624' VMS'#47484' '#47785#47197#50640#49436' '#49440#53469#54616#49464#50836'.'#13#10#47785#47197#50640#49436' '#45908#48660#53364#47533#54616#50668' '#49440#53469#54633#45768#45796'.'
- Transparent = True
- Visible = False
- end
- object lblText3: TcxLabel
- Left = 317
- Top = 193
- Caption = 'VMS'#48264#54840
- Transparent = True
- Visible = False
- end
- object lblText4: TcxLabel
- Left = 405
- Top = 193
- Caption = #49440#53469#54616#49888' VMS '#51221#48372#47484' '#49325#51228#54616#49884#44192#49845#45768#44620'?'
- Transparent = True
- Visible = False
- end
- object lblText5: TcxLabel
- Left = 307
- Top = 220
- Caption = 'VMS '#51221#48372#49325#51228#13#10'VMS '#51221#48372#47484' '#49325#51228' '#54616#50688#49845#45768#45796'.'
- Transparent = True
- Visible = False
- end
- object lblText6: TcxLabel
- Left = 297
- Top = 421
- Caption = #51228#50612#44592' IP'#44032' '#50976#54952#54616#51648' '#50506#49845#45768#45796'.'
- Transparent = True
- Visible = False
- end
- object lblText7: TcxLabel
- Left = 297
- Top = 450
- Caption = #50937#52852#47700#46972' IP'#44032' '#50976#54952#54616#51648' '#50506#49845#45768#45796'.'
- Transparent = True
- Visible = False
- end
- object lblText8: TcxLabel
- Left = 297
- Top = 477
- Caption = 'VMS ID'#44032' '#51060#48120' '#49324#50857' '#51473#51077#45768#45796'. VMS ID'#47484' '#54869#51064#54616#49464#50836'.'
- Transparent = True
- Visible = False
- end
- object lblText9: TcxLabel
- Left = 297
- Top = 504
- Caption = 'VMS '#51221#48372#51200#51109#13#10'VMS '#51221#48372#47484' '#51200#51109' '#54616#50688#49845#45768#45796'.'
- Transparent = True
- Visible = False
- end
- object lblText10: TcxLabel
- Left = 307
- Top = 548
- Caption = #51228#50612#44592' '#49444#51221' '#51221#48372#47484' '#51204#52404' VMS'#50640' '#46041#51068#54616#44172' '#51201#50857' '#54616#49884#44192#49845#45768#44620'?'
- Transparent = True
- Visible = False
- end
- object lblText11: TcxLabel
- Left = 297
- Top = 575
- Caption = 'VMS '#51228#50612#44592#49444#51221' '#51221#48372#51200#51109#13#10#51228#50612#44592' '#49444#51221' '#51221#48372#47484' '#51204#52404' '#51228#50612#44592#50640' '#51201#50857' '#54616#50688#49845#45768#45796'.'
- Transparent = True
- Visible = False
- end
- object TmrShow: TTimer
- Enabled = False
- Interval = 300
- OnTimer = TmrShowTimer
- Left = 876
- Top = 8
- end
- end
|