object frmJWLChkIn: TfrmJWLChkIn Left = 189 Top = 97 Width = 1227 Height = 660 Caption = #20837#24211#32534#36753 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 107 TextHeight = 13 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1211 AutoSize = True ButtonHeight = 30 ButtonWidth = 61 Caption = 'ToolBar1' Flat = True Images = DataLink_TradeManage.ThreeImgList List = True ShowCaptions = True TabOrder = 0 Transparent = True Wrapable = False object BtnSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 14 OnClick = BtnSaveClick end object ToolButton2: TToolButton Left = 65 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 103 OnClick = ToolButton2Click end object ToolButton3: TToolButton Left = 130 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 107 OnClick = ToolButton3Click end object BtnExit: TToolButton Left = 195 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = BtnExitClick end end object cxGrid1: TcxGrid Left = -4 Top = 43 Width = 1205 Height = 480 TabOrder = 1 object Tv1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = 'DefStr1' end item Format = 'GYS' Column = v1ShortName end item Format = 'YCLCode' Column = v1P_ChnName end item Format = '1' Position = spFooter Column = v1ShortName end item Kind = skSum Column = v1YCLMoney end item Kind = skSum Position = spFooter Column = v1YCLMoney end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1Quantity end item Kind = skSum Column = v1YCLMoney end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusFirstCellOnNewRecord = True OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Header = cxStyle1 object v1Column1: TcxGridDBColumn Caption = #20837#24211#26102#38388 DataBinding.FieldName = 'CRTime' PropertiesClassName = 'TcxDateEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.Kind = ckDateTime HeaderAlignmentHorz = taCenter Width = 127 end object v1Column5: TcxGridDBColumn Caption = #37319#36141#20154 DataBinding.FieldName = 'LYPerson' HeaderAlignmentHorz = taCenter Width = 72 end object v1Column3: TcxGridDBColumn Caption = #20837#24211#31867#22411 DataBinding.FieldName = 'CRType' PropertiesClassName = 'TcxComboBoxProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #27491#24120#20837#24211 #30424#30408#20837#24211 #22238#25910#20837#24211 #26399#21021#20837#24211) HeaderAlignmentHorz = taCenter Width = 89 end object v1Column6: TcxGridDBColumn Caption = #24211#20301 DataBinding.FieldName = 'KCPlace' PropertiesClassName = 'TcxButtonEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column6PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 80 end object v1P_ChnName: TcxGridDBColumn Tag = 2 Caption = #29289#26009#21517#31216 DataBinding.FieldName = 'YCLName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False Properties.OnButtonClick = v1P_ChnNamePropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 103 end object v1Column2: TcxGridDBColumn Tag = 2 Caption = #31867#22411 DataBinding.FieldName = 'YCLSpec' PropertiesClassName = 'TcxButtonEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column2PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 131 end object v1ShortName: TcxGridDBColumn Caption = #20379#24212#21830 DataBinding.FieldName = 'GYSName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False Properties.OnButtonClick = v1ShortNamePropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 96 end object v1Quantity: TcxGridDBColumn Tag = 2 Caption = #20837#24211#25968#37327 DataBinding.FieldName = 'CRQty' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 73 end object v1YCLMoney: TcxGridDBColumn Tag = 2 Caption = #37329#39069 DataBinding.FieldName = 'YCLMoney' HeaderAlignmentHorz = taCenter Width = 70 end object v1UnitName: TcxGridDBColumn Tag = 2 Caption = #21333#20301 DataBinding.FieldName = 'CRUnit' PropertiesClassName = 'TcxButtonEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False Properties.OnButtonClick = v1UnitNamePropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 48 end object v1Column4: TcxGridDBColumn Tag = 2 Caption = #21333#20215 DataBinding.FieldName = 'YCLPrice' Visible = False HeaderAlignmentHorz = taCenter Hidden = True Width = 58 end object v1Note: TcxGridDBColumn Tag = 2 Caption = #22791#27880 DataBinding.FieldName = 'Note' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 108 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object DataSource1: TDataSource DataSet = CDS_Sub Left = 192 Top = 168 end object CDS_Sub: TClientDataSet Aggregates = <> Params = <> Left = 232 Top = 168 end object ADOQueryMain: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 296 Top = 200 end object ADOQueryCmd: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 264 Top = 200 end object ADOQueryTemp: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 224 Top = 200 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 496 Top = 176 end object cxStyleRepository1: TcxStyleRepository Left = 65535 Top = 65534 object cxStyle1: TcxStyle AssignedValues = [svFont] Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] end end end