object Form1: TForm1 Left = 0 Top = 0 Caption = 'Form1' ClientHeight = 597 ClientWidth = 1081 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object cxGrid1: TcxGrid Left = 312 Top = 240 Width = 617 Height = 200 TabOrder = 0 object cxGrid1DBTableView1: TcxGridDBTableView DataController.DataSource = DataSource1 DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> object cxGrid1DBTableView1Column1: TcxGridDBColumn DataBinding.FieldName = 'ID' end object cxGrid1DBTableView1Column2: TcxGridDBColumn DataBinding.FieldName = 'X_CRDN_ARR' end object cxGrid1DBTableView1Column3: TcxGridDBColumn DataBinding.FieldName = 'Y_CRDN_ARR' end end object cxGrid1Level1: TcxGridLevel GridView = cxGrid1DBTableView1 end end object ADOConnection1: TADOConnection ConnectionString = 'Provider=tbprov.Tbprov.5;Cache Authentication=False;Encrypt Pass' + 'word=False;Integrated Security="";Mask Password=False;Persist En' + 'crypted=False;Persist Security Info=False;User ID="";Bind Flags=' + '0;Initial Catalog="";Data Source=GMUTIS;Impersonation Level=Anon' + 'ymous;Location="";Lock Owner="";Mode=ReadWrite;Protection Level=' + 'None;Updatable Cursor=False;Enlist=None;' Mode = cmReadWrite Provider = 'tbprov.Tbprov.5' Left = 88 Top = 40 end object ADOTable1: TADOTable Connection = ADOConnection1 LockType = ltReadOnly Left = 192 Top = 64 end object ADODataSet1: TADODataSet Connection = ADOConnection1 Parameters = <> Left = 488 Top = 56 end object ADOQuery1: TADOQuery Connection = ADOConnection1 CursorType = ctStatic Parameters = <> SQL.Strings = ( 'SELECT A.ROAD_ID AS ID, A.X_CRDN_ARR, A.Y_CRDN_ARR ' ' FROM TB_ROAD_VRTX_ARR A, ' ' TB_ROAD B ' ' WHERE B.DEL_YN = '#39'N'#39' ' ' AND B.ROAD_ID = A.ROAD_ID ' ' AND A.LEVL = 7 ' '') Left = 272 Top = 32 end object DataSource1: TDataSource DataSet = ADOQuery1 Enabled = False Left = 336 Top = 40 end object ClientDataSet1: TClientDataSet Aggregates = <> Params = <> Left = 696 Top = 96 end object DataSetProvider1: TDataSetProvider DataSet = ClientDataSet1 Left = 624 Top = 48 end end