object IFM0070M: TIFM0070M Left = 0 Top = 0 HorzScrollBar.Visible = False VertScrollBar.Visible = False Caption = #49884#49444#47932' '#51221#48372' '#52636#47141 ClientHeight = 711 ClientWidth = 1324 Color = clWhite DoubleBuffered = True 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 OnShow = FormShow DesignSize = ( 1324 711) PixelsPerInch = 96 TextHeight = 17 object ShpList: TShape Left = 4 Top = 50 Width = 1315 Height = 657 Anchors = [akLeft, akTop, akRight, akBottom] Pen.Color = 10849679 Pen.Width = 2 ExplicitWidth = 1346 ExplicitHeight = 709 end object ShpTitle: TShape Left = 4 Top = 4 Width = 1316 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 LblRecords: TLabel Left = 1161 Top = 16 Width = 52 Height = 17 Alignment = taRightJustify Anchors = [akTop, akRight] Caption = #51312#54924#44148#49688 Transparent = True Visible = False ExplicitLeft = 370 end object PgList: TcxPageControl Left = 11 Top = 56 Width = 1300 Height = 645 Anchors = [akLeft, akTop, akRight, akBottom] Focusable = False ParentBackground = False ParentShowHint = False ShowHint = False TabOrder = 0 Properties.ActivePage = TsList Properties.HotTrack = True ClientRectBottom = 640 ClientRectLeft = 2 ClientRectRight = 1295 ClientRectTop = 28 object TsList: TcxTabSheet Caption = ' '#49884#49444#47932' '#49440#53469' ' ImageIndex = 0 object Panel2: TPanel Left = 0 Top = 0 Width = 1293 Height = 42 Align = alTop BevelOuter = bvNone ParentColor = True TabOrder = 0 DesignSize = ( 1293 42) object ImgDesc1: TImage Left = 15 Top = 13 Width = 9 Height = 9 Transparent = True end object lblFacility: TLabel Left = 632 Top = 16 Width = 52 Height = 17 Caption = 'lblFacility' Visible = False end object cxLabel1: TcxLabel Left = 30 Top = 8 AutoSize = False Caption = #49884#49444#47932 Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True Height = 21 Width = 84 AnchorX = 114 AnchorY = 19 end object BtnExlSave: TcxButton Left = 1208 Top = 8 Width = 80 Height = 25 Cursor = crHandPoint Hint = #51312#54924' '#44208#44284#47484' '#54028#51068#47196' '#51200#51109#54633#45768#45796'.' Anchors = [akTop, akRight] Caption = #51200#51109 Colors.Default = 3893744 TabOrder = 1 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnExlSaveClick end object CbType: TcxComboBox Left = 121 Top = 7 Cursor = crHandPoint Hint = #49884#49444#47932' '#51333#47448#47484' '#49440#53469' '#54633#45768#45796'.' Properties.Alignment.Horz = taLeftJustify Properties.Alignment.Vert = taVCenter Properties.DropDownListStyle = lsFixedList Properties.HideSelection = False Properties.Items.Strings = ( ' CCTV' ' VMS' ' VDS' ' '#50937#52852#47700#46972 ' DSRC' ' '#44368#52264#47196#44368#53685#47049' '#44368#52264#47196 ' '#44368#52264#47196#44368#53685#47049' '#52852#47700#46972 ' '#51452#52264#51109) Properties.ReadOnly = False Style.BorderColor = clWindowFrame Style.BorderStyle = ebsUltraFlat Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.NativeStyle = False Style.ButtonStyle = btsUltraFlat Style.PopupBorderStyle = epbsFlat StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.NativeStyle = False StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.NativeStyle = False StyleFocused.TextColor = clBlack StyleFocused.TextStyle = [fsBold] StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.NativeStyle = False TabOrder = 2 Text = ' CCTV' Width = 242 end end object CxList: TcxGrid Left = 0 Top = 42 Width = 1293 Height = 570 Align = alClient TabOrder = 1 object TvList: TcxGridTableView Navigator.Buttons.Append.Visible = True Navigator.Buttons.SaveBookmark.Visible = False Navigator.InfoPanel.Visible = True DataController.Filter.OnChanged = TvListDataControllerFilterChanged DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> FilterRow.InfoText = #44160#49353#50612#47484' '#51077#47141#54616#49464#50836'.' OptionsBehavior.CellHints = True OptionsBehavior.ShowLockedStateImageOptions.BestFit = lsimImmediate OptionsBehavior.ShowLockedStateImageOptions.Filtering = lsimImmediate OptionsBehavior.ShowLockedStateImageOptions.Grouping = lsimImmediate OptionsBehavior.ShowLockedStateImageOptions.Sorting = lsimImmediate OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsData.Editing = False OptionsData.Inserting = False OptionsView.GroupByBox = False OptionsView.Indicator = True object Column11: TcxGridColumn Caption = #49884#49444#47932#50976#54805 PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Width = 140 end object Column01: TcxGridColumn Caption = #44288#47532#48264#54840 DataBinding.ValueType = 'Integer' PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter BestFitMaxWidth = 80 HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Options.Editing = False Width = 80 end object Column02: TcxGridColumn Caption = #49884#49444#47932' ID' PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter BestFitMaxWidth = 100 HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Options.Editing = False Width = 80 end object Column13: TcxGridColumn Caption = #44368#52264#47196#47749 PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter Visible = False HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter VisibleForCustomization = False Width = 172 end object Column03: TcxGridColumn Caption = #49884#49444#47932#47749 PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter BestFitMaxWidth = 200 HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Options.Editing = False Width = 200 end object Column04: TcxGridColumn Caption = #49444#52824#50948#52824#51452#49548 PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter BestFitMaxWidth = 300 HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Width = 300 end object Column05: TcxGridColumn Caption = #51340#54364' X' PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter BestFitMaxWidth = 120 HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Width = 120 end object Column06: TcxGridColumn Caption = #51340#54364' Y' PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter BestFitMaxWidth = 120 HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Width = 120 end object Column07: TcxGridColumn Caption = #47784#45944#47749 PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter BestFitMaxWidth = 160 HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Width = 160 end object Column08: TcxGridColumn Caption = #49444#52824#51068 PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter BestFitMaxWidth = 100 HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Width = 100 end object Column09: TcxGridColumn Caption = #51228#51312#50629#52404 PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter BestFitMaxWidth = 120 HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Width = 120 end object Column10: TcxGridColumn Caption = #49444#52824#50629#52404 PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter BestFitMaxWidth = 120 HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter MinWidth = 80 Width = 120 end object Column12: TcxGridColumn Caption = 'IP Address' PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter Width = 100 end object Column14: TcxGridColumn PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter Visible = False HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter VisibleForCustomization = False end object Column15: TcxGridColumn PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter Visible = False HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter VisibleForCustomization = False end object Column16: TcxGridColumn PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter Visible = False HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter VisibleForCustomization = False end object Column17: TcxGridColumn PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter Visible = False HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter VisibleForCustomization = False end object Column18: TcxGridColumn PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter Visible = False HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter VisibleForCustomization = False end object Column19: TcxGridColumn PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Vert = taVCenter Visible = False HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter VisibleForCustomization = False end end object GlList: TcxGridLevel GridView = TvList end end end end object BtnClose: TcxButton Left = 1230 Top = 11 Width = 80 Height = 25 Cursor = crHandPoint Hint = #45803#44592 Anchors = [akTop, akRight] Caption = #45803#44592 Colors.Default = 10737865 TabOrder = 2 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 BtnSearch: TcxButton Left = 389 Top = 92 Width = 80 Height = 25 Cursor = crHandPoint Hint = #45936#51060#53552#47484' '#44160#49353#54633#45768#45796'.' Caption = #51312#54924 Colors.Default = 3893744 TabOrder = 1 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnSearchClick end object TmrRefresh: TTimer Enabled = False Interval = 500 OnTimer = TmrRefreshTimer Left = 305 Top = 441 end object ADOQry: TADOQuery Parameters = <> Left = 72 Top = 264 end end