object FrmInvoice_Sub_S: TFrmInvoice_Sub_S Left = 137 Top = 191 Width = 1080 Height = 455 Caption = #24320#31080#30003#35831#24405#20837 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1064 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 = 177 Width = 1064 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 = 1064 Height = 146 Align = alTop BevelOuter = bvLowered TabOrder = 1 object Label1: TLabel Left = 40 Top = 201 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 = 36 Top = 17 Width = 52 Height = 12 Caption = #24320#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 = 292 Top = 201 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 = 380 Top = 16 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 = 600 Top = 16 Width = 52 Height = 12 Caption = #23545#26041#21333#20301 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 = 68 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 = 36 Top = 40 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 = 208 Top = 16 Width = 53 Height = 12 Caption = #19994' '#21153' '#21592 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object InvoiceNo: TEdit Left = 100 Top = 197 Width = 140 Height = 20 TabOrder = 6 end object InvoiceDate: TDateTimePicker Left = 96 Top = 13 Width = 100 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 = 68 Width = 693 Height = 69 ScrollBars = ssVertical TabOrder = 5 end object InvoiceType: TBtnEditA Left = 348 Top = 197 Width = 140 Height = 20 ReadOnly = True TabOrder = 7 OnBtnClick = InvoiceTypeBtnClick end object ToFactoryName: TBtnEditA Left = 652 Top = 12 Width = 140 Height = 20 ReadOnly = True TabOrder = 1 OnBtnClick = ToFactoryNameBtnClick end object FactoryName: TBtnEditA Left = 440 Top = 12 Width = 140 Height = 20 ReadOnly = True TabOrder = 0 OnBtnClick = FactoryNameBtnClick end object Filler: TEdit Left = 316 Top = 317 Width = 121 Height = 20 Enabled = False TabOrder = 8 end object SYRName: TBtnEditA Left = 96 Top = 36 Width = 269 Height = 20 TabOrder = 4 OnBtnClick = SYRNameBtnClick end object ywy: TEdit Left = 264 Top = 13 Width = 100 Height = 20 TabOrder = 3 end end object cxGrid1: TcxGrid Left = 0 Top = 206 Width = 1064 Height = 211 Align = alClient TabOrder = 3 object Tv1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False NavigatorButtons.Delete.Enabled = False NavigatorButtons.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> 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 v1Column3: TcxGridDBColumn Tag = 1 Caption = #35746#21333#21495 DataBinding.FieldName = 'OrderNo' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column3PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 80 end object v1Column5: TcxGridDBColumn Tag = 1 Caption = 'PO#' DataBinding.FieldName = 'KHConNo' HeaderAlignmentHorz = taCenter Width = 80 end object v1Column1: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'P_Code' HeaderAlignmentHorz = taCenter Width = 80 end object v1P_CodeName: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'P_CodeName' HeaderAlignmentHorz = taCenter Width = 119 end object v1P_Spec: TcxGridDBColumn Caption = #25104#21697#35268#26684 DataBinding.FieldName = 'P_Spec' HeaderAlignmentHorz = taCenter Width = 103 end object v1Qty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 83 end object v1Price: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 93 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 Width = 90 end object v1Money: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'Money' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1MoneyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 81 end object v1Column2: TcxGridDBColumn Caption = #24065#31181 DataBinding.FieldName = 'priceUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( 'RMB' 'USD') HeaderAlignmentHorz = taCenter Width = 69 end object v1note: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'P_Note' HeaderAlignmentHorz = taCenter Width = 145 end end object cxGridLevel1: TcxGridLevel GridView = Tv1 end end object DataSource1: TDataSource DataSet = FP_Sub Left = 920 Top = 20 end object FP_Sub: TClientDataSet Aggregates = <> Params = <> Left = 852 Top = 108 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 752 Top = 64 end object ADOQueryTmp: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 828 Top = 52 end object ADOQueryCmd: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 792 Top = 68 end end