object ITSSELAM: TITSSELAM Left = 0 Top = 0 HorzScrollBar.Visible = False VertScrollBar.Visible = False Caption = #44396#44036' '#49440#53469 ClientHeight = 891 ClientWidth = 1436 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 OnShow = FormShow DesignSize = ( 1436 891) PixelsPerInch = 96 TextHeight = 17 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 = 3 Top = 4 Width = 1429 Height = 885 Anchors = [akLeft, akTop, akRight, akBottom] Pen.Color = 10849679 Pen.Width = 2 Visible = False ExplicitWidth = 1118 ExplicitHeight = 563 end object EdFocus: TEdit Left = -10 Top = -10 Width = 2 Height = 25 ImeName = 'Microsoft Office IME 2007' TabOrder = 2 Text = 'EdFocus' end object PnlBack: TPanel Left = 4 Top = 4 Width = 1429 Height = 885 Anchors = [akLeft, akTop, akRight, akBottom] BevelOuter = bvNone DoubleBuffered = False ParentDoubleBuffered = False TabOrder = 3 object cxGroupBox1: TcxGroupBox Left = 0 Top = 0 Align = alClient Caption = #9654' '#51648#46020 Style.TextStyle = [fsBold] TabOrder = 0 Height = 885 Width = 1105 object StatusBar: TStatusBar Left = 3 Top = 856 Width = 1099 Height = 19 Panels = < item Alignment = taCenter Bevel = pbRaised Width = 100 end item Width = 50 end> end object Panel1: TPanel Left = 623 Top = 200 Width = 425 Height = 245 DoubleBuffered = False ParentDoubleBuffered = False TabOrder = 1 Visible = False object ImgDesc04: TImage Left = 6 Top = 31 Width = 9 Height = 9 Transparent = True end object ImgDesc01: TImage Left = 6 Top = 59 Width = 9 Height = 9 Transparent = True end object cxLabel4: TcxLabel Left = 27 Top = 22 Caption = #49440#53469#51340#54364 Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 83 AnchorY = 33 end object cxLabel1: TcxLabel Left = 27 Top = 50 Caption = #49440#53469#44396#44036 Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 83 AnchorY = 61 end object EdPos: TcxTextEdit Left = 89 Top = 21 Properties.Alignment.Vert = taVCenter Properties.ReadOnly = True TabOrder = 2 Width = 220 end object EdLinkId: TcxTextEdit Left = 89 Top = 49 Properties.Alignment.Vert = taVCenter Properties.ReadOnly = True TabOrder = 3 Width = 220 end end inline FRAMEGoogleMap1: TFRAMEGoogleMap Left = 3 Top = 19 Width = 1099 Height = 837 Align = alClient TabOrder = 2 ExplicitLeft = 3 ExplicitTop = 19 ExplicitWidth = 1099 ExplicitHeight = 837 inherited PnlToolbar: TPanel Width = 1099 ExplicitWidth = 1099 inherited lblGap1: TcxLabel AnchorX = 122 AnchorY = 19 end inherited lblGap2: TcxLabel AnchorX = 292 AnchorY = 19 end inherited PnlGisTool: TPanel Width = 663 ExplicitWidth = 663 inherited ChkDrawCenter: TcxCheckBox ExplicitHeight = 28 end inherited ChkDrawVms: TcxCheckBox ExplicitHeight = 28 end inherited ChkDrawIncident: TcxCheckBox ExplicitHeight = 28 end inherited ChkDrawVds: TcxCheckBox ExplicitHeight = 28 end inherited ChkTrafficLayer: TcxCheckBox ExplicitHeight = 28 end end inherited lblGap3: TcxLabel AnchorX = 337 AnchorY = 19 end inherited PnlZoom: TPanel Left = 1016 ExplicitLeft = 1016 end end inherited WebBrowser1: TWebBrowser Width = 1099 Height = 799 ExplicitWidth = 1099 ExplicitHeight = 799 ControlData = { 4C00000096710000945200000000000000000000000000000000000000000000 000000004C000000000000000000000001000000E0D057007335CF11AE690800 2B2E126208000000000000004C0000000114020000000000C000000000000046 8000000000000000000000000000000000000000000000000000000000000000 00000000000000000100000000000000000000000000000000000000} end inherited GMMarker1: TGMMarker VisualObjects = < item Title = 'MarkerPos' ShowInfoWinMouseOver = True end> end inherited GMMap1: TGMMap OnClick = FRAMEGoogleMap1GMMap1Click end end end object cxSplitter1: TcxSplitter Left = 1105 Top = 0 Width = 6 Height = 885 AlignSplitter = salRight Control = PnlRight end object PnlRight: TPanel Left = 1111 Top = 0 Width = 318 Height = 885 Align = alRight BevelOuter = bvNone TabOrder = 2 object cxGroupBox2: TcxGroupBox Left = 0 Top = 0 Align = alTop Caption = #9654' '#49440#53469' '#44396#44036' '#47785#47197 Style.TextStyle = [fsBold] TabOrder = 0 DesignSize = ( 318 186) Height = 193 Width = 318 object BtnSelect: TcxButton Tag = 4 Left = 132 Top = 120 Width = 120 Height = 25 Cursor = crHandPoint Hint = #44396#44036#51012' '#49440#53469#54633#45768#45796'.' Anchors = [akLeft, akBottom] Caption = #44396#44036#49440#53469 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 = BtnSelectClick ExplicitTop = 134 end object CxList: TcxGrid Left = 3 Top = 19 Width = 312 Height = 95 Align = alTop Anchors = [akLeft, akTop, akRight, akBottom] TabOrder = 1 ExplicitHeight = 109 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.Inserting = False OptionsSelection.CellSelect = False OptionsView.NoDataToDisplayInfoText = '<'#49440#53469#44396#44036#51221#48372'>' OptionsView.ColumnAutoWidth = True OptionsView.GroupByBox = False OptionsView.Indicator = True object Column01: TcxGridColumn Caption = #44396#44036' ID' PropertiesClassName = 'TcxLabelProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Options.Editing = False Width = 133 end object Column02: TcxGridColumn Caption = #51340#54364' X' DataBinding.ValueType = 'Float' PropertiesClassName = 'TcxCalcEditProperties' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Properties.DisplayFormat = '##0.######0' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Column03: TcxGridColumn Caption = #51340#54364' Y' DataBinding.ValueType = 'Float' PropertiesClassName = 'TcxCalcEditProperties' Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Properties.DisplayFormat = '##0.######0' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Column99: TcxGridColumn Caption = #47700#47784#47532 DataBinding.ValueType = 'Integer' PropertiesClassName = 'TcxCalcEditProperties' Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False end end object GlList: TcxGridLevel GridView = TvList end end object BtnDelete: TcxButton Tag = 4 Left = 6 Top = 120 Width = 120 Height = 25 Cursor = crHandPoint Hint = #47785#47197#50640#49436' '#49440#53469#54620' '#44396#44036#51012' '#49325#51228#54633#45768#45796'.' Anchors = [akLeft, akBottom] Caption = #49440#53469#49325#51228 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 = BtnDeleteClick ExplicitTop = 134 end end object PgList: TcxPageControl Left = 0 Top = 199 Width = 318 Height = 686 Align = alClient TabOrder = 1 Properties.ActivePage = TabLink ClientRectBottom = 681 ClientRectLeft = 2 ClientRectRight = 313 ClientRectTop = 28 object TabNode: TcxTabSheet Caption = #45432#46300' ' ImageIndex = 0 inline FRAMENodeList1: TFRAMENodeList Left = 0 Top = 0 Width = 311 Height = 653 Align = alClient TabOrder = 0 ExplicitWidth = 311 ExplicitHeight = 653 inherited CxList: TcxGrid Width = 311 Height = 591 ExplicitWidth = 311 ExplicitHeight = 591 inherited TvList: TcxGridTableView OnCellDblClick = FRAMENodeList1TvListCellDblClick end end inherited PnlTop: TPanel Width = 311 ExplicitWidth = 311 end inherited PnlBottom: TPanel Top = 622 Width = 311 ExplicitTop = 622 ExplicitWidth = 311 inherited LblRecords: TLabel Left = 200 Width = 25 Height = 17 ExplicitLeft = 200 ExplicitWidth = 25 ExplicitHeight = 17 end inherited ChkDispExt: TcxCheckBox ExplicitHeight = 21 end inherited BtnExlSave: TcxButton Left = 231 ExplicitLeft = 231 end end inherited lblFileName: TcxLabel ExplicitWidth = 56 ExplicitHeight = 21 end end end object TabLink: TcxTabSheet Caption = #47553#53356' ' ImageIndex = 1 inline FRAMELinkList1: TFRAMELinkList Left = 0 Top = 0 Width = 311 Height = 653 Align = alClient TabOrder = 0 ExplicitWidth = 311 ExplicitHeight = 653 inherited CxList: TcxGrid Width = 311 Height = 591 ExplicitWidth = 311 ExplicitHeight = 591 inherited TvList: TcxGridTableView OnCellDblClick = FRAMELinkList1TvListCellDblClick end end inherited PnlTop: TPanel Width = 311 ExplicitWidth = 311 end inherited PnlBottom: TPanel Top = 622 Width = 311 ExplicitTop = 622 ExplicitWidth = 311 inherited LblRecords: TLabel Left = 200 Width = 25 Height = 17 ExplicitLeft = 200 ExplicitWidth = 25 ExplicitHeight = 17 end inherited ChkDispExt: TcxCheckBox ExplicitHeight = 21 end inherited BtnExlSave: TcxButton Left = 231 ExplicitLeft = 231 end end inherited lblFileName: TcxLabel ExplicitWidth = 56 ExplicitHeight = 21 end end end object TabServiceLink: TcxTabSheet Caption = #49436#48708#49828#47553#53356' ' ImageIndex = 2 inline FRAMEServiceLinkList1: TFRAMEServiceLinkList Left = 0 Top = 0 Width = 311 Height = 653 Align = alClient TabOrder = 0 ExplicitWidth = 311 ExplicitHeight = 653 inherited CxList: TcxGrid Width = 311 Height = 591 ExplicitWidth = 311 ExplicitHeight = 591 inherited TvList: TcxGridTableView OnCellDblClick = FRAMEServiceLinkList1TvListCellClick end end inherited PnlTop: TPanel Width = 311 ExplicitWidth = 311 end inherited PnlBottom: TPanel Top = 622 Width = 311 ExplicitTop = 622 ExplicitWidth = 311 inherited LblRecords: TLabel Left = 200 Width = 25 Height = 17 ExplicitLeft = 200 ExplicitWidth = 25 ExplicitHeight = 17 end inherited ChkDispExt: TcxCheckBox ExplicitHeight = 21 end inherited BtnExlSave: TcxButton Left = 231 ExplicitLeft = 231 end end inherited lblFileName: TcxLabel ExplicitWidth = 95 ExplicitHeight = 21 end end end object TabRoad: TcxTabSheet Caption = #46020#47196' ' ImageIndex = 3 inline FRAMERoadList1: TFRAMERoadList Left = 0 Top = 0 Width = 311 Height = 653 Align = alClient TabOrder = 0 ExplicitWidth = 311 ExplicitHeight = 653 inherited CxList: TcxGrid Width = 311 Height = 591 ExplicitWidth = 311 ExplicitHeight = 591 inherited TvList: TcxGridTableView OnCellDblClick = FRAMERoadList1TvListCellClick end end inherited PnlTop: TPanel Width = 311 ExplicitWidth = 311 end inherited PnlBottom: TPanel Top = 622 Width = 311 ExplicitTop = 622 ExplicitWidth = 311 inherited LblRecords: TLabel Left = 200 Width = 25 Height = 17 ExplicitLeft = 200 ExplicitWidth = 25 ExplicitHeight = 17 end inherited ChkDispExt: TcxCheckBox ExplicitHeight = 21 end inherited BtnExlSave: TcxButton Left = 231 ExplicitLeft = 231 end end inherited lblFileName: TcxLabel ExplicitWidth = 56 ExplicitHeight = 21 end end end end object cxSplitter2: TcxSplitter Left = 0 Top = 193 Width = 318 Height = 6 AlignSplitter = salTop Control = cxGroupBox2 end end end object BtnClose: TcxButton Left = 1028 Top = 8 Width = 75 Height = 25 Cursor = crHandPoint Hint = #45803#44592 Anchors = [akTop, akRight] Caption = #45803#44592 Colors.Default = 10737865 TabOrder = 1 Visible = False 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 = 943 Top = 8 Width = 75 Height = 25 Cursor = crHandPoint Hint = #51312#54924 Anchors = [akTop, akRight] Caption = #51312#54924 Colors.Default = 10737865 TabOrder = 0 Visible = False 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 lblText1: TcxLabel Left = 131 Top = 356 Caption = #44396#44036#51060' '#49440#53469#46104#51648' '#50506#50520#49845#45768#45796'.'#13#10#51648#46020#50640#49436' '#44396#44036#51012' '#49440#53469#54616#49464#50836'.' Transparent = True Visible = False end object TmrShow: TTimer Enabled = False Interval = 500 OnTimer = TmrShowTimer Left = 623 Top = 92 end object GMPolyLink: TGMPolyline Tag = 1 VisualObjects = <> OnClick = GMPolyLinkClick Left = 192 Top = 208 end object TmrClear: TTimer Enabled = False Interval = 3000 OnTimer = TmrClearTimer Left = 487 Top = 452 end object GMMarkerPos: TGMMarker AutoUpdate = False VisualObjects = < item Animation.OnDrop = True Title = 'MarkerPos' ShowInfoWinMouseOver = True end item Title = 'MarkerVeh' ShowInfoWinMouseOver = True end> Left = 344 Top = 172 end object TmrPosClear: TTimer Enabled = False Interval = 3000 OnTimer = TmrPosClearTimer Left = 463 Top = 396 end end