object frmClothContractInPutPB: TfrmClothContractInPutPB Left = 192 Top = 67 Width = 1089 Height = 630 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 OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1081 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 = 1081 Height = 244 Align = alTop BevelInner = bvNone BevelOuter = bvNone Ctl3D = False ParentCtl3D = False TabOrder = 1 object Label1: TLabel Left = 24 Top = 14 Width = 65 Height = 12 Caption = #21512#21516#32534#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 546 Top = 46 Width = 65 Height = 12 Caption = #20132#36135#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 431 Top = 246 Width = 67 Height = 12 Caption = #20379' '#26041#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label2: TLabel Left = 24 Top = 46 Width = 65 Height = 12 Caption = #31614#35746#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 546 Top = 14 Width = 67 Height = 12 Caption = #38656' '#26041#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 295 Top = 14 Width = 65 Height = 12 Caption = #31614#35746#22320#28857#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 295 Top = 46 Width = 65 Height = 12 Caption = #20132#36135#22320#28857#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 24 Top = 78 Width = 65 Height = 36 Caption = #20379#36135#36136#37327#13#10' '#21450#13#10#25216#26415#26631#20934#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 546 Top = 78 Width = 65 Height = 36 Caption = #36816#36755#26041#24335#13#10' '#21450#13#10#36153#29992#25215#25285#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 24 Top = 138 Width = 65 Height = 12 Caption = #21253#35013#35201#27714#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 295 Top = 90 Width = 65 Height = 12 Caption = #32467#31639#26041#24335#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 = 24 Top = 178 Width = 195 Height = 12 Caption = #39564#25910#26631#20934#12289#26041#27861#21450#25552#20986#24322#35758#26399#38480#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 24 Top = 210 Width = 91 Height = 12 Caption = #20854#23427#32422#23450#20107#39033#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object ConNo: TEdit Left = 86 Top = 11 Width = 180 Height = 18 ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 0 OnKeyPress = ConNoKeyPress end object DeliveryDate: TDateTimePicker Left = 609 Top = 42 Width = 177 Height = 20 BevelInner = bvNone Date = 40916.000000000000000000 Format = 'yyyy-MM-dd' Time = 40916.000000000000000000 ShowCheckbox = True ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 1 end object FactoryNoName: TcxButtonEdit Tag = 45 Left = 495 Top = 242 Hint = 'FactoryNo' BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = FactoryNoNamePropertiesButtonClick Properties.OnChange = FactoryNoNamePropertiesChange TabOrder = 2 Visible = False OnKeyDown = PRTCodeNameKeyDown Width = 162 end object PanZDY: TPanel Left = 841 Top = 128 Width = 202 Height = 153 TabOrder = 3 Visible = False object CXGridZDY: TcxGrid Left = 3 Top = 4 Width = 197 Height = 113 TabOrder = 0 object TVZDY: TcxGridDBTableView OnKeyPress = TVZDYKeyPress NavigatorButtons.ConfirmDelete = False OnCellDblClick = TVZDYCellDblClick DataController.DataSource = DataSource2 DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsSelection.CellSelect = False OptionsView.GroupByBox = False object VHelpZDYName: TcxGridDBColumn DataBinding.FieldName = 'ZDYName' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.handBlack Width = 163 IsCaptionAssigned = True end end object CXGridZDYLevel1: TcxGridLevel GridView = TVZDY end end object Button1: TButton Left = 64 Top = 120 Width = 65 Height = 25 Caption = #20851#38381 TabOrder = 1 OnClick = Button1Click end end object QDTime: TDateTimePicker Left = 86 Top = 42 Width = 183 Height = 20 BevelInner = bvNone Date = 40916.000000000000000000 Format = 'yyyy-MM-dd' Time = 40916.000000000000000000 ShowCheckbox = True ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 4 end object CompanyName: TcxButtonEdit Left = 609 Top = 10 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = CompanyNamePropertiesButtonClick TabOrder = 5 OnKeyDown = PRTCodeNameKeyDown Width = 177 end object QDPalce: TEdit Left = 359 Top = 11 Width = 161 Height = 18 ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 6 end object JHPlace: TcxButtonEdit Left = 359 Top = 42 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = JHPlacePropertiesButtonClick TabOrder = 7 Width = 162 end object ConTK1: TcxButtonEdit Left = 86 Top = 86 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = ConTK1PropertiesButtonClick TabOrder = 8 Width = 183 end object ConTk2: TcxButtonEdit Left = 609 Top = 86 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = ConTk2PropertiesButtonClick TabOrder = 9 Width = 178 end object ConTK3: TcxButtonEdit Left = 86 Top = 134 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = ConTK3PropertiesButtonClick TabOrder = 10 Width = 702 end object ConTK4: TcxButtonEdit Left = 359 Top = 86 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = ConTK4PropertiesButtonClick TabOrder = 11 Width = 162 end object ConTK5: TcxButtonEdit Left = 216 Top = 174 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = ConTK5PropertiesButtonClick TabOrder = 12 Width = 572 end object ConTk6: TcxButtonEdit Left = 110 Top = 206 BeepOnEnter = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = ConTk6PropertiesButtonClick TabOrder = 13 Width = 679 end end object ToolBar2: TToolBar Left = 0 Top = 273 Width = 1081 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 = 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 = 302 Width = 1081 Height = 294 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 v1Column7: TcxGridDBColumn Tag = 99 Caption = #20379#26041 DataBinding.FieldName = 'FactoryNoName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column7PropertiesButtonClick HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 96 end 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 = 81 end object v1PRTSpec: TcxGridDBColumn Caption = #35268#26684#22411#21495 DataBinding.FieldName = 'C_Spec' HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Header = DataLink_TradeManage.handBlack Width = 67 end object v1Column3: TcxGridDBColumn Caption = #38376#24133'(cm)' DataBinding.FieldName = 'MFQty' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 64 end object v1Column5: TcxGridDBColumn Caption = #20811#37325'(g/'#13217')' DataBinding.FieldName = 'KZQty' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 74 end object v1Price: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.handBlack Width = 49 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 HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Header = DataLink_TradeManage.handBlack Width = 41 end object v1Column6: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'Qty1' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 50 end object v1ClothUnit: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'C_Qty' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.handBlack Width = 47 end object v1Column2: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'C_Unit' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( 'M' 'Kg') HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 67 end object v1Column8: TcxGridDBColumn Caption = #35746#21333#25968#37327 DataBinding.FieldName = 'Sdefstr1' HeaderAlignmentHorz = taCenter Width = 67 end object v1Column9: TcxGridDBColumn Caption = #35745#21010#32553#29575'(%)' DataBinding.FieldName = 'Qty2' HeaderAlignmentHorz = taCenter Width = 85 end object v1Column10: TcxGridDBColumn Caption = #26579#21378 DataBinding.FieldName = 'Sdefstr2' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column10PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 81 end object v1Column11: TcxGridDBColumn Caption = #26579#21378#24037#33402 DataBinding.FieldName = 'Sdefstr3' HeaderAlignmentHorz = taCenter Width = 70 end object v1Column12: TcxGridDBColumn Caption = #26579#21378#20215#26684 DataBinding.FieldName = 'Sdefstr4' HeaderAlignmentHorz = taCenter Width = 60 end object v1Column13: TcxGridDBColumn Caption = #25351#31034#21333#21495 DataBinding.FieldName = 'Sdefstr5' HeaderAlignmentHorz = taCenter Width = 80 end object v1Column14: TcxGridDBColumn Caption = #24037#21378#32534#21495 DataBinding.FieldName = 'Sdefstr6' HeaderAlignmentHorz = taCenter Width = 80 end object v1Column4: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'C_Note' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_TradeManage.Default Width = 118 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ADOTemp: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 384 Top = 13 end object ADOCmd: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 520 Top = 5 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 = 8 end object ADOZDY: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 280 Top = 5 end object CDS_ZDY: TClientDataSet Aggregates = <> Params = <> Left = 208 Top = 16 end object ADOQuery1: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 456 Top = 13 end end