object frmGYSRFInPut: TfrmGYSRFInPut Left = 233 Top = 141 Width = 637 Height = 416 Caption = #26579#36153#30331#35760 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 15 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 621 Height = 31 ButtonHeight = 30 ButtonWidth = 65 Caption = 'ToolBar1' Color = clSkyBlue DisabledImages = DataLink_Money.ThreeImgList Flat = True Images = DataLink_Money.ThreeImgList List = True ParentColor = False ShowCaptions = True TabOrder = 0 object ToolButton4: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 14 OnClick = ToolButton4Click end object TBClose: TToolButton Left = 69 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 31 Width = 621 Height = 347 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 1 object Label4: TLabel Left = 30 Top = 294 Width = 68 Height = 15 Caption = #22791' '#27880 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 145 Top = 238 Width = 99 Height = 33 Caption = #24635#37329#39069 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 382 Top = 23 Width = 64 Height = 15 Caption = #30331#35760#26085#26399 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 30 Top = 22 Width = 66 Height = 15 Caption = #20379' '#24212' '#21830 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 30 Top = 62 Width = 68 Height = 15 Caption = #21697' '#21517 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 30 Top = 102 Width = 68 Height = 15 Caption = #39068' '#33394 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 331 Top = 102 Width = 50 Height = 15 Caption = #24037' '#33402 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 30 Top = 150 Width = 80 Height = 15 Caption = #38468#21152#36153#21517#31216 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 331 Top = 150 Width = 48 Height = 15 Caption = #38468#21152#36153 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 30 Top = 190 Width = 68 Height = 15 Caption = #21305' '#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 186 Top = 190 Width = 32 Height = 15 Caption = #25968#37327 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 434 Top = 190 Width = 32 Height = 15 Caption = #21333#20215 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 322 Top = 190 Width = 32 Height = 15 Caption = #21333#20301 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Note: TEdit Tag = 2 Left = 102 Top = 290 Width = 464 Height = 23 TabOrder = 0 end object JSMoney: TEdit Tag = 2 Left = 255 Top = 233 Width = 222 Height = 43 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -27 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False TabOrder = 1 end object CRTime: TDateTimePicker Tag = 2 Left = 454 Top = 19 Width = 110 Height = 23 Date = 43953.000000000000000000 Format = 'yyyy-MM-dd' Time = 43953.000000000000000000 TabOrder = 2 end object FactoryName: TBtnEditC Tag = 2 Left = 102 Top = 18 Width = 267 Height = 23 Hint = 'FactoryNo' Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 3 OnBtnUpClick = FactoryNameBtnUpClick OnBtnDnClick = FactoryNameBtnDnClick end object P_CodeName: TEdit Tag = 2 Left = 102 Top = 58 Width = 463 Height = 23 TabOrder = 4 end object P_Color: TEdit Tag = 2 Left = 102 Top = 98 Width = 187 Height = 23 TabOrder = 5 end object P_GY: TEdit Tag = 2 Left = 382 Top = 98 Width = 185 Height = 23 TabOrder = 6 end object HZFeeName: TBtnEditC Tag = 2 Left = 112 Top = 145 Width = 175 Height = 23 TabOrder = 7 OnBtnUpClick = HZFeeNameBtnUpClick OnBtnDnClick = HZFeeNameBtnDnClick end object HZFee: TEdit Tag = 2 Left = 382 Top = 146 Width = 186 Height = 23 TabOrder = 8 OnChange = HZFeeChange end object PS: TEdit Tag = 2 Left = 102 Top = 186 Width = 67 Height = 23 TabOrder = 9 end object Qty: TEdit Tag = 2 Left = 220 Top = 186 Width = 91 Height = 23 TabOrder = 10 OnChange = HZFeeChange end object Price: TEdit Tag = 2 Left = 466 Top = 186 Width = 91 Height = 23 TabOrder = 11 OnChange = HZFeeChange end object QtyUnit: TComboBox Tag = 2 Left = 357 Top = 186 Width = 59 Height = 23 Style = csDropDownList ItemHeight = 15 ItemIndex = 0 TabOrder = 12 Text = 'M' Items.Strings = ( 'M' 'Kg') end end object ADOQueryTemp: TADOQuery Connection = DataLink_Money.ADOLink LockType = ltReadOnly Parameters = <> Left = 405 Top = 9 end object ADOQueryCmd: TADOQuery Connection = DataLink_Money.ADOLink Parameters = <> Left = 365 Top = 9 end object ADOQueryMain: TADOQuery Connection = DataLink_Money.ADOLink LockType = ltReadOnly Parameters = <> Left = 765 Top = 209 end end