object frmGKDRtInPut: TfrmGKDRtInPut Left = 302 Top = 139 Caption = #25253#24223#24405#20837 ClientHeight = 644 ClientWidth = 1252 Color = clWhite Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Tag = 1 Left = 0 Top = 0 Width = 1252 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 91 Caption = 'ToolBar1' Color = clWhite DisabledImages = DataLink_BaseInfo.ImageList_new32 EdgeInner = esNone EdgeOuter = esNone Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_BaseInfo.ImageList_new32 List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 16 OnClick = TBSaveClick end object ToolButton4: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = ToolButton4Click end object TBClose: TToolButton Left = 166 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object ScrollBox1: TScrollBox Left = 0 Top = 38 Width = 1252 Height = 75 Align = alTop BevelInner = bvNone BevelOuter = bvNone Color = clWhite Ctl3D = False ParentColor = False ParentCtl3D = False TabOrder = 1 ExplicitTop = 32 object Label1: TLabel Left = 244 Top = 13 Width = 52 Height = 12 Caption = #30003#35831#20154#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 31 Top = 42 Width = 65 Height = 12 Caption = #25253#24223#21407#22240#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 31 Top = 13 Width = 65 Height = 12 Caption = #25253#24223#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Note: TEdit Tag = 1 Left = 96 Top = 39 Width = 346 Height = 18 TabOrder = 0 end object DlyDate: TDateTimePicker Tag = 1 Left = 96 Top = 9 Width = 132 Height = 20 Date = 40675.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.464761099538009100 TabOrder = 1 end object Filler: TEdit Tag = 1 Left = 302 Top = 10 Width = 140 Height = 18 TabOrder = 2 end end object ToolBar2: TToolBar Tag = 1 Left = 0 Top = 113 Width = 1252 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 91 Caption = 'ToolBar1' Color = clBtnFace DisabledImages = DataLink_BaseInfo.ImageList_new32 EdgeInner = esNone EdgeOuter = esNone Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_BaseInfo.ImageList_new32 List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 2 object ToolButton3: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #38050#31576#36873#25321 ImageIndex = 12 OnClick = ToolButton3Click end object ToolButton1: TToolButton Left = 95 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 2 Visible = False OnClick = ToolButton1Click end object ToolButton2: TToolButton Left = 166 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 6 OnClick = ToolButton2Click end end object cxGrid1: TcxGrid Left = 0 Top = 151 Width = 1252 Height = 493 Align = alClient TabOrder = 3 ExplicitTop = 150 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False object Tv1Column1: TcxGridDBColumn Caption = #38050#25187#24207#21495 DataBinding.FieldName = 'GKNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 120 end object Tv1Column2: TcxGridDBColumn Caption = #38050#25187#31576#21495 DataBinding.FieldName = 'GKKH' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 120 end object Tv1Column3: TcxGridDBColumn Caption = #38050#25187#40831#25968 DataBinding.FieldName = 'GKCS' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 120 end object Tv1Column4: TcxGridDBColumn Caption = #38050#25187#32534#21495 DataBinding.FieldName = 'GKBH' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 120 end object Tv1Column5: TcxGridDBColumn Caption = #38050#25187#35268#26684 DataBinding.FieldName = 'GKSpec' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 120 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ADOTemp: TADOQuery Connection = DataLink_BaseInfo.ADOLink LockType = ltReadOnly Parameters = <> Left = 256 Top = 281 end object ADOCmd: TADOQuery Connection = DataLink_BaseInfo.ADOLink Parameters = <> Left = 328 Top = 281 end object DataSource1: TDataSource DataSet = Order_Sub Left = 684 Top = 276 end object Order_Sub: TClientDataSet Aggregates = <> Params = <> Left = 596 Top = 284 end object ADOQuery1: TADOQuery Connection = DataLink_BaseInfo.ADOLink Parameters = <> Left = 188 Top = 281 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 456 Top = 276 end object cxStyleRepository1: TcxStyleRepository Left = 200 Top = 432 PixelsPerInch = 96 object dazi1: TcxStyle AssignedValues = [svColor] Color = clRed end end end