object frmClothContractInPutPB: TfrmClothContractInPutPB Left = 199 Top = 123 Width = 995 Height = 557 Caption = #22383#24067#35746#36141#21512#21516#24405#20837 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter WindowState = wsMaximized OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 979 Height = 29 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_TradeManage.ThreeImgList List = True ParentFont = False ShowCaptions = True TabOrder = 0 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 14 OnClick = TBSaveClick end object TBClose: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object ScrollBox1: TScrollBox Left = 0 Top = 29 Width = 979 Height = 236 Align = alTop BevelInner = bvNone BevelOuter = bvNone Ctl3D = True ParentCtl3D = False TabOrder = 1 object Label1: TLabel Left = 20 Top = 18 Width = 60 Height = 12 Caption = #21512#21516#32534#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label4: TLabel Left = 20 Top = 66 Width = 60 Height = 12 Caption = #20132#36135#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label5: TLabel Left = 295 Top = 18 Width = 60 Height = 12 Caption = #20379' '#26041#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label2: TLabel Left = 20 Top = 42 Width = 60 Height = 12 Caption = #31614#35746#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label3: TLabel Left = 550 Top = 18 Width = 60 Height = 12 Caption = #38656' '#26041#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label6: TLabel Left = 295 Top = 42 Width = 60 Height = 12 Caption = #31614#35746#22320#28857#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label8: TLabel Left = 295 Top = 66 Width = 60 Height = 12 Caption = #20132#36135#22320#28857#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label7: TLabel Left = 295 Top = 134 Width = 60 Height = 12 Caption = #36136#37327#35201#27714#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label10: TLabel Left = 20 Top = 162 Width = 60 Height = 12 Caption = #21253#35013#35201#27714#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label11: TLabel Left = 550 Top = 42 Width = 60 Height = 12 Caption = #32467#31639#26041#24335#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label12: TLabel Left = 20 Top = 186 Width = 60 Height = 12 Caption = #39564#25910#26631#20934#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label13: TLabel Left = 20 Top = 210 Width = 60 Height = 12 Caption = #20854#23427#35201#27714#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label15: TLabel Left = 550 Top = 68 Width = 60 Height = 12 Caption = #20132#26399#35828#26126#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label9: TLabel Left = 20 Top = 136 Width = 60 Height = 12 Caption = #36816#36755#26041#24335#65306 end object Label14: TLabel Left = 20 Top = 88 Width = 72 Height = 12 Caption = #20379#26041#32852#31995#20154#65306 end object Label16: TLabel Left = 550 Top = 88 Width = 60 Height = 12 Caption = #20379#26041#22320#22336#65306 end object Label17: TLabel Left = 295 Top = 110 Width = 72 Height = 12 Caption = #20379#26041#24320#25143#34892#65306 end object Label18: TLabel Left = 20 Top = 112 Width = 84 Height = 12 Caption = #20379#26041#38134#34892#36134#21495#65306 end object Label19: TLabel Left = 295 Top = 88 Width = 60 Height = 12 Caption = #20379#26041#30005#35805#65306 end object ConNo: TEdit Left = 94 Top = 15 Width = 160 Height = 20 TabOrder = 0 OnKeyPress = ConNoKeyPress end object DeliveryDate: TDateTimePicker Left = 94 Top = 62 Width = 160 Height = 20 BevelInner = bvNone Date = 40916.000000000000000000 Format = 'yyyy-MM-dd' Time = 40916.000000000000000000 TabOrder = 1 end object FactoryNoName: TcxButtonEdit Left = 359 Top = 15 Hint = 'FactoryNo' BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = FactoryNoNamePropertiesButtonClick TabOrder = 2 Width = 160 end object QDTime: TDateTimePicker Left = 94 Top = 38 Width = 160 Height = 20 BevelInner = bvNone Date = 40916.000000000000000000 Format = 'yyyy-MM-dd' Time = 40916.000000000000000000 TabOrder = 3 end object CompanyName: TcxButtonEdit Left = 608 Top = 16 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = CompanyNamePropertiesButtonClick TabOrder = 4 Width = 160 end object QDPalce: TEdit Left = 359 Top = 38 Width = 160 Height = 20 TabOrder = 5 end object JHPlace: TcxButtonEdit Left = 359 Top = 62 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = JHPlacePropertiesButtonClick TabOrder = 6 Width = 160 end object ConTk2: TcxButtonEdit Left = 94 Top = 132 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = ConTk2PropertiesButtonClick TabOrder = 7 Width = 160 end object ConTK4: TcxButtonEdit Left = 608 Top = 40 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = ConTK4PropertiesButtonClick TabOrder = 8 Width = 160 end object ConTk7: TEdit Left = 608 Top = 64 Width = 160 Height = 20 TabOrder = 9 end object LXPerson: TEdit Left = 94 Top = 84 Width = 160 Height = 20 TabOrder = 10 end object bankNo: TEdit Left = 94 Top = 108 Width = 160 Height = 20 TabOrder = 11 end object LXTel: TEdit Left = 359 Top = 84 Width = 160 Height = 20 TabOrder = 12 end object bankName: TEdit Left = 359 Top = 108 Width = 410 Height = 20 TabOrder = 13 end object LXaddress: TEdit Left = 608 Top = 84 Width = 160 Height = 20 TabOrder = 14 end object ConTK1: TEdit Left = 359 Top = 132 Width = 410 Height = 20 TabOrder = 15 end object ConTK3: TEdit Left = 94 Top = 156 Width = 675 Height = 20 TabOrder = 16 end object ConTK5: TEdit Left = 94 Top = 180 Width = 675 Height = 20 TabOrder = 17 end object ConTK6: TEdit Left = 94 Top = 204 Width = 675 Height = 20 TabOrder = 18 end end object ToolBar2: TToolBar Left = 0 Top = 265 Width = 979 Height = 28 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_TradeManage.ThreeImgList List = True ParentFont = False ShowCaptions = True TabOrder = 2 object ToolButton1: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 103 OnClick = ToolButton1Click end object ToolButton2: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 107 OnClick = ToolButton2Click end end object cxGrid1: TcxGrid Left = 0 Top = 293 Width = 979 Height = 226 Align = alClient TabOrder = 3 object Tv1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = 'C_Code' Column = v1Column1 end> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsView.GroupByBox = False Styles.Header = DataLink_TradeManage.Default object v1Column1: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'C_CodeName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column1PropertiesButtonClick HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 101 end object v1PRTSpec: TcxGridDBColumn Caption = #35268#26684#22411#21495 DataBinding.FieldName = 'C_Spec' HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Header = DataLink_TradeManage.handBlack Width = 80 end object v1Column3: TcxGridDBColumn Caption = #38376#24133'(cm)' DataBinding.FieldName = 'MFQty' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 79 end object v1Column5: TcxGridDBColumn Caption = #20811#37325'(g/'#13217')' DataBinding.FieldName = 'KZQty' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 87 end object v1ClothQty: TcxGridDBColumn Caption = #24065#31181 DataBinding.FieldName = 'PriceUnit' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1ClothQtyPropertiesButtonClick Visible = False HeaderAlignmentHorz = taCenter Hidden = True Options.Sorting = False Styles.Header = DataLink_TradeManage.handBlack Width = 41 end object v1Column6: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'RollNum' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 65 end object v1ClothUnit: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1ClothUnitPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.handBlack Width = 71 end object v1Column2: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column2PropertiesButtonClick HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 82 end object v1Price: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1ClothUnitPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.handBlack Width = 69 end object v1Column7: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'Money' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 77 end object v1Column4: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'C_Note' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 170 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ADOTemp: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 384 Top = 5 end object ADOCmd: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 528 Top = 65533 end object DataSource1: TDataSource DataSet = Order_Sub Left = 344 Top = 376 end object Order_Sub: TClientDataSet Aggregates = <> Params = <> Left = 384 Top = 376 end object DataSource2: TDataSource DataSet = ADOZDY Left = 240 Top = 65532 end object ADOZDY: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 284 Top = 1 end object CDS_ZDY: TClientDataSet Aggregates = <> Params = <> Left = 212 Top = 65532 end object ADOQuery1: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 476 end end