object FrmInvoice_Sub_X: TFrmInvoice_Sub_X Left = 303 Top = 164 Width = 1001 Height = 568 Caption = #20449#24687#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 = 985 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 = 225 Width = 985 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 = 985 Height = 194 Align = alTop BevelOuter = bvLowered TabOrder = 1 object Label1: TLabel Left = 36 Top = 21 Width = 52 Height = 12 Caption = #21457#31080#21495#30721 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 524 Top = 21 Width = 52 Height = 12 Caption = #21457#31080#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 = 288 Top = 21 Width = 52 Height = 12 Caption = #21457#31080#31867#22411 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 36 Top = 48 Width = 52 Height = 12 Caption = #24320#31080#21333#20301 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 288 Top = 48 Width = 52 Height = 12 Caption = #23458#25143#21517#31216 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 36 Top = 108 Width = 54 Height = 12 Caption = #25551' '#36848 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 244 Top = 297 Width = 53 Height = 12 Caption = #25805' '#20316' '#21592 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 524 Top = 48 Width = 52 Height = 12 Caption = #25105#26041#21333#20301 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 36 Top = 75 Width = 52 Height = 12 Caption = #24212#25910#31867#21035 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object InvoiceNo: TEdit Left = 96 Top = 17 Width = 140 Height = 20 TabOrder = 0 end object InvoiceDate: TDateTimePicker Left = 580 Top = 17 Width = 140 Height = 20 Date = 42263.599160520830000000 Time = 42263.599160520830000000 ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 2 end object Note: TMemo Left = 96 Top = 104 Width = 625 Height = 69 ScrollBars = ssVertical TabOrder = 6 end object InvoiceType: TBtnEditA Left = 344 Top = 17 Width = 140 Height = 20 ReadOnly = True TabOrder = 1 OnBtnClick = InvoiceTypeBtnClick end object ToFactoryName: TBtnEditA Left = 96 Top = 44 Width = 140 Height = 20 ReadOnly = True TabOrder = 4 OnBtnClick = ToFactoryNameBtnClick end object FactoryName: TBtnEditA Left = 344 Top = 45 Width = 140 Height = 20 ReadOnly = True TabOrder = 3 OnBtnClick = FactoryNameBtnClick end object Filler: TEdit Left = 316 Top = 317 Width = 121 Height = 20 Enabled = False TabOrder = 7 end object SYRName: TBtnEditA Left = 580 Top = 44 Width = 140 Height = 20 TabOrder = 5 OnBtnClick = SYRNameBtnClick end object YFGSType: TBtnEditA Left = 96 Top = 72 Width = 140 Height = 20 ReadOnly = True TabOrder = 8 OnBtnClick = YFGSTypeBtnClick end end object cxGrid1: TcxGrid Left = 0 Top = 254 Width = 985 Height = 275 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 Column = v1Column6 end item Kind = skSum Column = v1Column3 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 v1Column1: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'P_Code' HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 80 end object v1P_CodeName: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'P_CodeName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1P_CodeNamePropertiesButtonClick HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 119 end object v1P_Spec: TcxGridDBColumn Caption = #25104#21697#35268#26684 DataBinding.FieldName = 'P_Spec' HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 103 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 v1Price: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 55 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 v1Money: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'Money' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 81 end object v1Column2: TcxGridDBColumn Caption = #24065#31181 DataBinding.FieldName = 'priceUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( 'RMB' 'USD') HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 69 end object v1Column4: TcxGridDBColumn Caption = #31246#29575'(%)' DataBinding.FieldName = 'tax' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 70 end object v1Column3: TcxGridDBColumn Tag = 3 Caption = #31246#39069 DataBinding.FieldName = 'shuie' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 63 end object v1Column6: TcxGridDBColumn Caption = #21547#31246#37329#39069 DataBinding.FieldName = 'taxMoney' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 70 end object v1note: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'P_Note' HeaderAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 145 end end object cxGridLevel1: TcxGridLevel GridView = Tv1 end end object DataSource1: TDataSource DataSet = FP_Sub Left = 412 Top = 100 end object FP_Sub: TClientDataSet Aggregates = <> Params = <> Left = 244 Top = 100 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 484 Top = 100 end object ADOQueryTmp: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 336 Top = 100 end object ADOQueryCmd: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 540 Top = 100 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