object frmCostInput: TfrmCostInput Left = 261 Top = 170 Width = 993 Height = 569 Caption = #36153#29992#24405#20837 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poDesktopCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 977 Height = 31 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' DisabledImages = DataLink_YSYF.ThreeImgList Flat = True Images = DataLink_YSYF.ThreeImgList List = True ShowCaptions = True TabOrder = 0 object TSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 14 OnClick = TSaveClick end object TBClose: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object ToolBar2: TToolBar Left = 0 Top = 258 Width = 977 Height = 29 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar2' DisabledImages = DataLink_YSYF.ThreeImgList Flat = True Images = DataLink_YSYF.ThreeImgList List = True ShowCaptions = True TabOrder = 2 object TADD: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 103 OnClick = TADDClick end object TDEl: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 107 OnClick = TDElClick end end object Panel1: TPanel Left = 0 Top = 31 Width = 977 Height = 227 Align = alTop BevelOuter = bvLowered TabOrder = 1 OnClick = Panel1Click object Label1: TLabel Left = 752 Top = 179 Width = 52 Height = 12 Caption = #24212#20184#21495#30721 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label2: TLabel Left = 296 Top = 48 Width = 54 Height = 12 Caption = #26085' '#26399 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 296 Top = 22 Width = 52 Height = 12 Caption = #20184#27454#26041#24335 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 38 Top = 23 Width = 52 Height = 12 Caption = #23545#26041#21333#20301 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 25 Top = 76 Width = 65 Height = 12 Caption = #39033#30446#21450#25688#35201 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 38 Top = 50 Width = 52 Height = 12 Caption = #20844#21496#25260#22836 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 794 Top = 75 Width = 52 Height = 12 Caption = #21407#24065#37329#39069 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label10: TLabel Left = 925 Top = 115 Width = 26 Height = 12 Caption = #27719#29575 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label11: TLabel Left = 815 Top = 115 Width = 26 Height = 12 Caption = #24065#31181 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label7: TLabel Left = 64 Top = 113 Width = 26 Height = 12 Caption = #22791#27880 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 40 Top = 195 Width = 53 Height = 12 Caption = #24635' '#37329' '#39069 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 799 Top = 35 Width = 52 Height = 12 Caption = #26159#21542#21547#31246 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object YFID: TEdit Left = 810 Top = 175 Width = 140 Height = 20 Enabled = False TabOrder = 9 Visible = False end object CRTime: TDateTimePicker Left = 353 Top = 44 Width = 140 Height = 20 Date = 42263.599160520830000000 Time = 42263.599160520830000000 TabOrder = 3 end object Note: TMemo Left = 95 Top = 107 Width = 553 Height = 69 ScrollBars = ssVertical TabOrder = 6 end object PayMent: TBtnEditA Left = 353 Top = 20 Width = 140 Height = 20 ReadOnly = True TabOrder = 1 OnBtnClick = PayMentBtnClick end object FactoryName: TBtnEditA Left = 95 Top = 19 Width = 140 Height = 20 TabOrder = 0 OnBtnClick = FactoryNameBtnClick end object SYRName: TBtnEditA Left = 95 Top = 47 Width = 140 Height = 20 TabOrder = 4 OnBtnClick = SYRNameBtnClick end object Money: TEdit Left = 851 Top = 71 Width = 140 Height = 20 Enabled = False TabOrder = 5 Visible = False end object HuiLv: TEdit Left = 954 Top = 111 Width = 61 Height = 20 TabOrder = 8 Visible = False OnExit = HuiLvExit OnKeyPress = HuiLvKeyPress end object BZType: TComboBox Left = 843 Top = 111 Width = 66 Height = 20 Style = csDropDownList ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 ItemHeight = 12 ItemIndex = 0 TabOrder = 7 Text = 'RMB' Visible = False Items.Strings = ( 'RMB' 'USD' 'EUR') end object BBMoney: TEdit Left = 95 Top = 191 Width = 140 Height = 20 Enabled = False TabOrder = 10 end object ishs: TComboBox Left = 851 Top = 31 Width = 66 Height = 20 Style = csDropDownList ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 ItemHeight = 12 TabOrder = 2 Visible = False Items.Strings = ( #21547#31246 #19981#21547#31246 '') end object YFName: TBtnEditA Left = 95 Top = 73 Width = 398 Height = 20 ReadOnly = True TabOrder = 11 OnBtnClick = YFNameBtnClick end end object cxGrid1: TcxGrid Left = 0 Top = 287 Width = 977 Height = 243 Align = alClient TabOrder = 3 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1Qty end item Kind = skSum Column = v1Money end item Kind = skSum end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Header = DataLink_YSYF.FonePurple object v1P_Spec: TcxGridDBColumn Caption = #27454#39033#31867#22411 DataBinding.FieldName = 'KXType' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1P_SpecPropertiesButtonClick HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 103 end object v1Column3: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'CPCode' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column3PropertiesButtonClick HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 end object v1Column1: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'CPName' HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 end object v1Column2: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'CPSpec' HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 end object v1Qty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 83 end object v1QtyUnit: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1QtyUnitPropertiesButtonClick HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 90 end object v1Price: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 93 end object v1Money: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'MxMoney' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1MoneyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 81 end object v1note: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'MxNote' HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 145 end end object cxGridLevel1: TcxGridLevel GridView = Tv1 end end object DataSource1: TDataSource DataSet = YFSub Left = 354 Top = 322 end object YFSub: TClientDataSet Aggregates = <> Params = <> Left = 264 Top = 320 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 236 Top = 321 end object ADOQueryTmp: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 304 Top = 321 end object ADOQueryCmd: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 203 Top = 319 end object cxStyleRepository1: TcxStyleRepository PixelsPerInch = 96 object cxStyle1: TcxStyle AssignedValues = [svFont] Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] end end end