object TAS0010M: TTAS0010M Left = 0 Top = 0 HorzScrollBar.Visible = False VertScrollBar.Visible = False Caption = #54844#51105#51648#46020#48516#49437 ClientHeight = 790 ClientWidth = 1370 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 = ( 1370 790) PixelsPerInch = 96 TextHeight = 17 object ShpTitle: TShape Left = 4 Top = 4 Width = 1362 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 = 1362 Height = 734 Anchors = [akLeft, akTop, akRight, akBottom] Pen.Color = 10849679 Pen.Width = 2 ExplicitWidth = 1436 ExplicitHeight = 766 end object LblRecords: TLabel Left = 400 Top = 9 Width = 52 Height = 17 Alignment = taRightJustify Anchors = [akTop, akRight] Caption = #51312#54924#44148#49688 Transparent = True Visible = False end object BtnClose: TcxButton Left = 1276 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 = 1344 Height = 721 Anchors = [akLeft, akTop, akRight, akBottom] BevelOuter = bvNone ParentBackground = False ParentColor = True TabOrder = 2 object PnlLeft: TPanel Left = 0 Top = 0 Width = 321 Height = 721 Align = alLeft BevelOuter = bvNone TabOrder = 0 object cxGroupBox2: TcxGroupBox Left = 0 Top = 0 Align = alTop Caption = #9654' '#44160#49353' '#51312#44148 Style.BorderColor = clCaptionText Style.Shadow = False Style.TextColor = clWindowText Style.TextStyle = [fsBold] TabOrder = 0 Height = 161 Width = 321 object ImgDesc01: TImage Left = 12 Top = 32 Width = 9 Height = 9 Transparent = True end object Label26: TLabel Left = 29 Top = 29 Width = 78 Height = 17 Alignment = taRightJustify Caption = #44160#49353#49884#51089#51068#49884 Transparent = True end object ImgDesc02: TImage Left = 12 Top = 63 Width = 9 Height = 9 Transparent = True end object Label6: TLabel Left = 29 Top = 60 Width = 78 Height = 17 Alignment = taRightJustify Caption = #44160#49353#51333#47308#51068#49884 Transparent = True end object ImgDesc03: TImage Left = 12 Top = 97 Width = 9 Height = 9 Transparent = True end object Label1: TLabel Left = 50 Top = 94 Width = 57 Height = 17 Alignment = taRightJustify Caption = #51312#54924' '#44396#48516 Transparent = True end object CbLinkLevel: TcxComboBox Left = 48 Top = 119 Cursor = crHandPoint Enabled = False Properties.Alignment.Horz = taLeftJustify Properties.Alignment.Vert = taVCenter Properties.DropDownListStyle = lsFixedList Properties.HideSelection = False Properties.Items.Strings = ( #47553#53356' ( 1'#47112#48296' )' #49436#48708#49828#47553#53356' ( 2'#47112#48296' )' #46020#47196' ( 3'#47112#48296' )') Properties.ReadOnly = True 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 = 3 Text = #49436#48708#49828#47553#53356' ( 2'#47112#48296' )' Visible = False Width = 201 end object BtnSearch: TcxButton Left = 231 Top = 122 Width = 80 Height = 25 Cursor = crHandPoint Hint = #51312#54924 Caption = #51312#54924 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 = BtnSearchClick end object cxLabel1: TcxLabel Left = 6 Top = 117 AutoSize = False Caption = #54056#53556#51221#48372#51312#54924#50640#49436' '#51068#51088#45716' '#54252#54632#54616#51648' '#50506#49845#45768#45796'.('#45380#50900' '#49884#48516')' ParentFont = False Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -12 Style.Font.Name = #47569#51008' '#44256#46357 Style.Font.Style = [fsBold] Style.TextColor = clRed Style.IsFontAssigned = True Properties.WordWrap = True Transparent = True Height = 36 Width = 208 end object CbTarget: TcxComboBox Left = 110 Top = 90 Cursor = crHandPoint Properties.Alignment.Vert = taVCenter Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( ' '#53685#44228' 5'#48516' '#51221#48372 ' '#53685#44228' 15'#48516' '#51221#48372 ' '#54056#53556' 5'#48516' '#51221#48372' ' ' '#54056#53556' 15'#48516' '#51221#48372' ') TabOrder = 0 Text = ' '#53685#44228' 5'#48516' '#51221#48372 Width = 201 end object DtStDate: TDateTimePicker Left = 110 Top = 26 Width = 121 Height = 25 BevelInner = bvNone BevelOuter = bvNone Date = 40452.000000000000000000 Time = 40452.000000000000000000 Color = clBtnFace ImeName = 'Microsoft Office IME 2007' ParentColor = True TabOrder = 4 OnChange = DtStDateChange end object DtEdDate: TDateTimePicker Left = 110 Top = 58 Width = 121 Height = 25 BevelInner = bvNone BevelOuter = bvNone Date = 40452.000000000000000000 Time = 40452.000000000000000000 Color = clBtnFace Enabled = False ImeName = 'Microsoft Office IME 2007' ParentColor = True TabOrder = 5 end object DtEdTime: TDateTimePicker Left = 237 Top = 58 Width = 75 Height = 25 BevelInner = bvNone BevelOuter = bvNone BevelKind = bkFlat Date = 40452.000000000000000000 Format = ' HH:mm' Time = 40452.000000000000000000 Color = clBtnFace DateMode = dmUpDown Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [] ImeName = 'Microsoft Office IME 2007' Kind = dtkTime ParentColor = True ParentFont = False TabOrder = 6 end object DtStTime: TDateTimePicker Left = 237 Top = 26 Width = 75 Height = 25 BevelInner = bvNone BevelOuter = bvNone BevelKind = bkFlat Date = 40452.000000000000000000 Format = ' HH:mm' Time = 40452.000000000000000000 Color = clBtnFace DateMode = dmUpDown Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [] ImeName = 'Microsoft Office IME 2007' Kind = dtkTime ParentColor = True ParentFont = False TabOrder = 7 end end object cxGroupBox3: TcxGroupBox Left = 0 Top = 161 Align = alClient Caption = #9654' '#44160#49353' '#44208#44284 Style.BorderColor = clCaptionText Style.Shadow = False Style.TextColor = clWindowText Style.TextStyle = [fsBold] TabOrder = 1 Height = 382 Width = 321 object CxList: TcxGrid Left = 3 Top = 19 Width = 315 Height = 353 Align = alClient TabOrder = 0 object TvList: TcxGridTableView Navigator.Buttons.Append.Visible = True Navigator.Buttons.SaveBookmark.Visible = False Navigator.InfoPanel.Visible = True OnCellDblClick = TvListCellDblClick 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 OptionsCustomize.ColumnGrouping = False OptionsCustomize.ColumnMoving = False OptionsCustomize.ColumnSorting = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsData.Editing = False OptionsData.Inserting = False OptionsSelection.CellSelect = False OptionsSelection.HideFocusRectOnExit = False OptionsView.NoDataToDisplayInfoText = '<'#54364#52636#54624' '#51221#48372#44032' '#50630#49845#45768#45796'>' OptionsView.ColumnAutoWidth = True OptionsView.GroupByBox = False OptionsView.Indicator = True object Column01: TcxGridColumn Caption = 'No.' DataBinding.ValueType = 'Integer' PropertiesClassName = 'TcxCalcEditProperties' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter Options.Editing = False Width = 45 end object Column02: TcxGridColumn Caption = #51068#49884 PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter Options.Editing = False Width = 164 end object Column03: TcxGridColumn Caption = #44148#49688 DataBinding.ValueType = 'Integer' PropertiesClassName = 'TcxCalcEditProperties' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter Width = 60 end object Column04: TcxGridColumn Caption = 'PRCN_DT' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Visible = False end end object GlList: TcxGridLevel GridView = TvList end end end object cxGroupBox5: TcxGroupBox Left = 0 Top = 543 Align = alBottom Caption = #9654' '#49892#54665 Style.BorderColor = clCaptionText Style.Shadow = False Style.TextColor = clWindowText Style.TextStyle = [fsBold] TabOrder = 2 Height = 101 Width = 321 object ImgDesc04: TImage Left = 12 Top = 66 Width = 9 Height = 9 Transparent = True end object Label2: TLabel Left = 40 Top = 61 Width = 52 Height = 17 Alignment = taRightJustify Caption = #44081#49888#51452#44592 Transparent = True end object Label3: TLabel Left = 163 Top = 61 Width = 51 Height = 17 Caption = #52488'(1~30)' Transparent = True end object BtnPlay: TcxButton Left = 7 Top = 22 Width = 35 Height = 25 Cursor = crHandPoint Hint = #49548#53685#51221#48372' '#54364#52636' '#49884#51089 Caption = #9654 TabOrder = 0 OnClick = BtnPlayClick end object BtnStop: TcxButton Left = 48 Top = 22 Width = 36 Height = 25 Cursor = crHandPoint Hint = #49548#53685#51221#48372' '#54364#52636' '#51333#47308 Caption = #9632 Enabled = False TabOrder = 1 OnClick = BtnStopClick end object cxTrackBar1: TcxTrackBar Left = 90 Top = 12 TabOrder = 2 Height = 43 Width = 197 end object SeRefreshSec: TcxSpinEdit Left = 99 Top = 59 Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Properties.DisplayFormat = '##0' Properties.EditFormat = '##0' Properties.LargeIncrement = 5.000000000000000000 Properties.MaxValue = 30.000000000000000000 Properties.MinValue = 1.000000000000000000 Properties.ValueType = vtInt 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 = 3 Value = 5 Width = 58 end end object cxGroupBox4: TcxGroupBox Left = 0 Top = 644 Align = alBottom Caption = #9654' '#44396#44036' ID '#44160#49353 TabOrder = 3 Visible = False Height = 77 Width = 321 object Label4: TLabel Left = 27 Top = 36 Width = 44 Height = 17 Alignment = taRightJustify Caption = #44396#44036' ID' Transparent = True end object ImgDesc05: TImage Left = 12 Top = 39 Width = 9 Height = 9 Transparent = True end object BtnSearch2: TcxButton Left = 208 Top = 33 Width = 80 Height = 25 Cursor = crHandPoint Hint = #51312#54924 Caption = #44160#49353 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 = BtnSearch2Click end object EdLinkId: TcxTextEdit Left = 76 Top = 33 TabOrder = 1 Width = 121 end end end object cxSplitter1: TcxSplitter Left = 321 Top = 0 Width = 6 Height = 721 Control = PnlLeft end object cxGroupBox1: TcxGroupBox Left = 327 Top = 0 Align = alClient Caption = #9654' '#49548#53685#51221#48372' '#54364#52636 Style.BorderColor = clCaptionText Style.Shadow = False Style.TextColor = clBlack Style.TextStyle = [fsBold] TabOrder = 2 Height = 721 Width = 1017 inline FRAMEOpenMap1: TFRAMEOpenMap Left = 3 Top = 19 Width = 1011 Height = 692 Align = alClient ParentShowHint = False ShowHint = True TabOrder = 0 ExplicitLeft = 3 ExplicitTop = 19 ExplicitWidth = 1011 ExplicitHeight = 692 inherited PnlToolbar: TPanel Width = 1011 ExplicitWidth = 1011 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 = 578 ExplicitWidth = 578 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 = 924 ExplicitLeft = 924 AnchorX = 1006 AnchorY = 19 end end inherited lblTitle: TcxLabel ExplicitWidth = 69 ExplicitHeight = 21 end inherited reMsg: TMemo Top = 545 Width = 1011 ExplicitTop = 545 ExplicitWidth = 1011 end inherited PnlMap: TPanel Width = 1011 Height = 507 ExplicitWidth = 1011 ExplicitHeight = 507 inherited WebBrowser1: TWebBrowser Width = 1007 Height = 503 ExplicitWidth = 1013 ExplicitHeight = 512 ControlData = { 4C00000014680000FD3300000000000000000000000000000000000000000000 000000004C000000000000000000000001000000E0D057007335CF11AE690800 2B2E126208000000000000004C0000000114020000000000C000000000000046 8000000000000000000000000000000000000000000000000000000000000000 00000000000000000100000000000000000000000000000000000000} end end inherited ilToolbarsSmall: TcxImageList FormatVersion = 1 end end end end object lblText1: TcxLabel Left = 27 Top = 295 Caption = #9654' '#49548#53685#51221#48372' '#54364#52636 Transparent = True Visible = False end object lblText2: TcxLabel Left = 27 Top = 343 Caption = '3'#49884#44036' '#51060#49345#51032' '#51221#48372#47484' '#51312#54924#54624' '#49688' '#50630#49845#45768#45796'.' Transparent = True Visible = False end object lblText3: TcxLabel Left = 27 Top = 381 Caption = #54364#52636#54624' '#51221#48372#44032' '#50630#49845#45768#45796'. '#51060#47141#51221#48372#47484' '#45796#49884' '#51312#54924#54616#49888' '#54980' '#51089#50629#51012' '#51652#54665' '#54616#49901#49884#50836'.' Transparent = True Visible = False end object TmrShow: TTimer Enabled = False Interval = 300 OnTimer = TmrShowTimer Left = 160 Top = 336 end object ADOQry: TADOQuery Parameters = <> Left = 216 Top = 324 end object ADOSta: TADOQuery Parameters = <> Left = 160 Top = 404 end object TmrClear: TTimer Enabled = False Interval = 10000 Left = 100 Top = 327 end end