object frmPayableInput: TfrmPayableInput Left = 261 Top = 149 Caption = #24212#20184#27454#30331#35760 ClientHeight = 362 ClientWidth = 919 Color = clWhite Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Tag = 1 Left = 0 Top = 0 Width = 919 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 75 Caption = 'ToolBar1' Color = clWhite DisabledImages = DataLink_Financial.ImageList_new32 Images = DataLink_Financial.ImageList_new32 List = True ParentColor = False ShowCaptions = True TabOrder = 0 object ToolButton3: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 16 OnClick = ToolButton3Click end object TBClose: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object ScrollBox1: TScrollBox Left = 0 Top = 38 Width = 919 Height = 324 Align = alClient BevelInner = bvNone BevelOuter = bvNone BorderStyle = bsNone Color = clWhite Ctl3D = False Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentColor = False ParentCtl3D = False ParentFont = False TabOrder = 1 OnClick = ScrollBox1Click object Label2: TLabel Left = 245 Top = 20 Width = 52 Height = 15 Caption = #23545#26041#21333#20301 Font.Charset = ANSI_CHARSET Font.Color = clMaroon Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 28 Top = 79 Width = 50 Height = 15 Caption = #32534' '#21495 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 28 Top = 204 Width = 50 Height = 15 Caption = #22791' '#27880 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 245 Top = 79 Width = 50 Height = 15 Caption = #21697' '#21517 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 674 Top = 49 Width = 52 Height = 15 Caption = #20184#27454#26041#24335 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 28 Top = 20 Width = 52 Height = 15 Caption = #25105#26041#21333#20301 Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 455 Top = 20 Width = 52 Height = 15 Caption = #19978#32423#21333#20301 Font.Charset = ANSI_CHARSET Font.Color = clMaroon Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 245 Top = 172 Width = 50 Height = 15 Caption = #37329' '#39069 Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 28 Top = 136 Width = 50 Height = 15 Caption = #21305' '#25968 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 245 Top = 136 Width = 50 Height = 15 Caption = #25968' '#37327 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 455 Top = 136 Width = 50 Height = 15 Caption = #21333' '#20215 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 28 Top = 105 Width = 50 Height = 15 Caption = #38376' '#24133 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 245 Top = 105 Width = 50 Height = 15 Caption = #20811' '#37325 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label15: TLabel Left = 455 Top = 79 Width = 50 Height = 15 Caption = #33457' '#22411 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label16: TLabel Left = 674 Top = 79 Width = 50 Height = 15 Caption = #39068' '#33394 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label17: TLabel Left = 455 Top = 105 Width = 50 Height = 15 Caption = #33394' '#21495 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 674 Top = 136 Width = 51 Height = 15 Caption = #20854' '#20182' '#36153 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label20: TLabel Left = 674 Top = 20 Width = 50 Height = 15 Caption = #26085' '#26399 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label21: TLabel Left = 28 Top = 172 Width = 50 Height = 15 Caption = #20943' '#20813 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label22: TLabel Left = 244 Top = 49 Width = 52 Height = 15 Caption = #35745#21010#21333#21495 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label23: TLabel Left = 27 Top = 49 Width = 51 Height = 15 Caption = #21512' '#21516' '#21495 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label24: TLabel Left = 455 Top = 49 Width = 53 Height = 15 Caption = #25688' '#35201 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label18: TLabel Left = 458 Top = 172 Width = 52 Height = 15 Caption = #26159#21542#21547#31246 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object F_Code: TEdit Left = 82 Top = 77 Width = 140 Height = 18 TabOrder = 0 end object Note: TMemo Left = 82 Top = 204 Width = 797 Height = 57 ScrollBars = ssVertical TabOrder = 2 end object F_Name: TEdit Left = 299 Top = 77 Width = 140 Height = 18 TabOrder = 1 end object Currency: TComboBox Left = 393 Top = 169 Width = 45 Height = 20 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -10 Font.Name = 'Times New Roman' Font.Style = [] ItemIndex = 0 ParentFont = False TabOrder = 3 Text = 'CNY' Items.Strings = ( 'CNY' 'USD' 'EUR') end object PayMent: TBtnEditC Left = 728 Top = 47 Width = 140 Height = 20 Hint = 'PayMent/'#20184#27454#26041#24335 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 4 OnBtnUpClick = PayMentBtnUpClick OnBtnDnClick = PayMentBtnDnClick end object OppCoName: TBtnEditC Left = 299 Top = 17 Width = 140 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 5 OnBtnUpClick = OppCoNameBtnUpClick OnBtnDnClick = PayMentBtnDnClick end object OurCoName: TBtnEditC Left = 82 Top = 17 Width = 140 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 6 OnBtnUpClick = OurCoNameBtnUpClick OnBtnDnClick = PayMentBtnDnClick end object OppParentCoName: TBtnEditC Left = 513 Top = 17 Width = 140 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 7 OnBtnUpClick = OppParentCoNameBtnUpClick OnBtnDnClick = PayMentBtnDnClick end object Amount: TcxCurrencyEdit Left = 299 Top = 169 Properties.AssignedValues.DisplayFormat = True TabOrder = 8 OnExit = QtyExit Width = 93 end object Price: TcxCurrencyEdit Left = 513 Top = 133 Properties.AssignedValues.DisplayFormat = True TabOrder = 9 OnExit = QtyExit Width = 140 end object Qty: TcxCurrencyEdit Left = 299 Top = 133 Properties.AssignedValues.DisplayFormat = True TabOrder = 10 OnExit = QtyExit Width = 101 end object Piece: TcxCurrencyEdit Left = 84 Top = 133 Properties.AssignedValues.DisplayFormat = True TabOrder = 11 Width = 140 end object QtyUnit: TComboBox Left = 401 Top = 133 Width = 37 Height = 20 Style = csDropDownList ItemIndex = 0 TabOrder = 12 Text = 'Kg' Items.Strings = ( 'Kg' 'M' 'Y' #20010 #20214) end object F_Width: TEdit Left = 82 Top = 103 Width = 140 Height = 18 TabOrder = 13 end object F_GramWeight: TEdit Left = 299 Top = 103 Width = 140 Height = 18 TabOrder = 14 end object F_Pattern: TEdit Left = 513 Top = 77 Width = 140 Height = 18 TabOrder = 15 end object F_Color: TEdit Left = 728 Top = 77 Width = 140 Height = 18 TabOrder = 16 end object F_ColorNo: TEdit Left = 513 Top = 103 Width = 140 Height = 18 TabOrder = 17 end object OtherFee: TcxCurrencyEdit Left = 728 Top = 133 Properties.AssignedValues.DisplayFormat = True TabOrder = 18 OnExit = QtyExit Width = 140 end object FFTime: TDateTimePicker Left = 728 Top = 17 Width = 140 Height = 20 BevelInner = bvNone Date = 40916.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.670856296288548000 TabOrder = 19 end object Deduction: TcxCurrencyEdit Left = 82 Top = 169 Properties.AssignedValues.DisplayFormat = True TabOrder = 20 OnExit = QtyExit Width = 140 end object OrderNo: TBtnEditC Left = 299 Top = 47 Width = 140 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 21 OnBtnUpClick = OrderNoBtnUpClick OnBtnDnClick = PayMentBtnDnClick end object ConNo: TBtnEditC Left = 81 Top = 47 Width = 140 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 22 OnBtnUpClick = ConNoBtnUpClick OnBtnDnClick = PayMentBtnDnClick end object FFAbstract: TBtnEditC Left = 513 Top = 47 Width = 140 Height = 20 Hint = 'FFAbstract/'#25688#35201 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 23 OnBtnUpClick = PayMentBtnUpClick OnBtnDnClick = PayMentBtnDnClick end object IsInvoice: TComboBox Left = 513 Top = 169 Width = 137 Height = 20 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 24 Items.Strings = ( #21547#31246 #19981#21547#31246) end end object ADOQueryTemp: TADOQuery Connection = DataLink_Financial.ADOLink LockType = ltReadOnly Parameters = <> Left = 547 Top = 336 end object ADOQueryCmd: TADOQuery Connection = DataLink_Financial.ADOLink Parameters = <> Left = 438 Top = 336 end object ADOQueryMain: TADOQuery Connection = DataLink_Financial.ADOLink LockType = ltReadOnly Parameters = <> Left = 325 Top = 345 end end