object frmTJHXMX: TfrmTJHXMX Left = 200 Top = 124 Width = 967 Height = 645 Caption = #28907#37329#33457#22411#20449#24687#24405#20837 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 107 TextHeight = 13 object Panel2: TPanel Left = 0 Top = 0 Width = 951 Height = 605 Align = alClient TabOrder = 0 object Panel1: TPanel Left = 1 Top = 1 Width = 561 Height = 603 Align = alClient BevelOuter = bvNone Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 object Label3: TLabel Left = 11 Top = 432 Width = 69 Height = 16 Caption = #33457' '#22411' '#21495 end object YW: TLabel Left = 11 Top = 398 Width = 69 Height = 16 Caption = #21152' '#24037' '#21378 end object Label4: TLabel Left = 11 Top = 467 Width = 61 Height = 16 Caption = #33394' '#22871 end object Label5: TLabel Left = 11 Top = 570 Width = 61 Height = 16 Caption = #21333' '#20215 end object Label2: TLabel Left = 11 Top = 605 Width = 61 Height = 16 Caption = #22791' '#27880 end object Label7: TLabel Left = 11 Top = 501 Width = 61 Height = 16 Caption = #24213' '#33394 end object Label18: TLabel Left = 11 Top = 535 Width = 68 Height = 16 Caption = #28504#36890#33394#21495 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object HXNO: TEdit Tag = 2 Left = 93 Top = 428 Width = 144 Height = 24 TabOrder = 0 OnKeyPress = HXNOKeyPress end object SeTao: TEdit Tag = 2 Left = 93 Top = 463 Width = 144 Height = 24 TabOrder = 1 OnKeyPress = SeTaoKeyPress end object TJPrice: TEdit Tag = 2 Left = 93 Top = 566 Width = 144 Height = 24 TabOrder = 2 OnKeyPress = TJPriceKeyPress end object Button1: TButton Left = 446 Top = 484 Width = 87 Height = 52 Caption = #26032#22686#20445#23384 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnClick = Button1Click end object Note: TEdit Tag = 2 Left = 93 Top = 600 Width = 324 Height = 24 TabOrder = 4 OnKeyPress = NoteKeyPress end object cxGrid1: TcxGrid Left = 0 Top = 270 Width = 561 Height = 108 Align = alTop PopupMenu = PopupMenu1 TabOrder = 5 object TV1: TcxGridDBTableView OnMouseDown = TV1MouseDown NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource2 DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsData.Editing = False OptionsSelection.CellSelect = False OptionsView.GroupByBox = False Styles.Content = cxStyle2 Styles.Inactive = cxStyle3 Styles.IncSearch = cxStyle3 Styles.Selection = cxStyle3 Styles.Header = cxStyle2 object V1ZCType: TcxGridDBColumn Caption = #20027#27425 DataBinding.FieldName = 'ZCType' Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False SortIndex = 0 SortOrder = soDescending Width = 32 end object V1MXJGFactoryName: TcxGridDBColumn Tag = 3 Caption = #21152#24037#21378 DataBinding.FieldName = 'GYS' OnCustomDrawCell = V1MXTJNoteCustomDrawCell HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 110 end object V1MXJGFactoryNameHX: TcxGridDBColumn Tag = 3 Caption = #21152#24037#21378#33457#22411#21495 DataBinding.FieldName = 'HXNO' PropertiesClassName = 'TcxTextEditProperties' OnCustomDrawCell = V1MXTJNoteCustomDrawCell HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 107 end object V1MXSeHao: TcxGridDBColumn Tag = 3 Caption = #33394#22871 DataBinding.FieldName = 'SeHao' PropertiesClassName = 'TcxTextEditProperties' OnCustomDrawCell = V1MXTJNoteCustomDrawCell HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 58 end object V1MXTJPrice: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'TJPrice' OnCustomDrawCell = V1MXTJNoteCustomDrawCell HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 61 end object V1MXTJNote: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' OnCustomDrawCell = V1MXTJNoteCustomDrawCell HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 187 end object V1Column1: TcxGridDBColumn DataBinding.FieldName = 'TIType' Visible = False Hidden = True Options.Sorting = False end end object cxGrid1Level1: TcxGridLevel GridView = TV1 end end object Panel3: TPanel Left = 0 Top = 0 Width = 561 Height = 270 Align = alTop BevelInner = bvLowered Color = clSkyBlue TabOrder = 6 object Label1: TLabel Left = 12 Top = 124 Width = 34 Height = 16 Caption = #21697#21517 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 12 Top = 179 Width = 34 Height = 16 Caption = #39068#33394 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 12 Top = 237 Width = 34 Height = 16 Caption = #22791#27880 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label16: TLabel Left = 12 Top = 90 Width = 119 Height = 16 Caption = #38754#26009#20449#24687#34917#20805#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label17: TLabel Left = 153 Top = 179 Width = 68 Height = 16 Caption = #28504#36890#33394#21495 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Button2: TButton Left = 574 Top = 8 Width = 58 Height = 26 Caption = #26032#22686 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 Visible = False OnClick = Button2Click end object ImageNameKH: TBtnEditA Left = 52 Top = 119 Width = 319 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnExit = ImageNameKHExit OnBtnClick = ImageNameKHBtnClick end object IMColor: TBtnEditA Left = 52 Top = 174 Width = 89 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnExit = IMColorExit OnBtnClick = IMColorBtnClick end object IMNote: TMemo Left = 52 Top = 230 Width = 319 Height = 31 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnExit = IMNoteExit end object Panel4: TPanel Left = 381 Top = 118 Width = 175 Height = 144 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 4 object Label13: TLabel Left = 5 Top = 20 Width = 9 Height = 16 end object Label14: TLabel Left = 5 Top = 47 Width = 9 Height = 16 end end object IMPTID: TEdit Left = 224 Top = 174 Width = 144 Height = 24 Color = clMenu ReadOnly = True TabOrder = 5 end object Panel6: TPanel Left = 2 Top = 2 Width = 557 Height = 38 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 6 object Label9: TLabel Left = 168 Top = 8 Width = 46 Height = 22 Caption = #31867#22411 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -22 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 298 Top = 8 Width = 46 Height = 22 Caption = #32534#21495 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -22 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object LXCode: TLabel Left = 283 Top = 8 Width = 12 Height = 22 Caption = 'L' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -22 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end end object Panel7: TPanel Left = 2 Top = 40 Width = 557 Height = 38 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 7 object Label15: TLabel Left = 10 Top = 10 Width = 77 Height = 16 Caption = #21407#22270#35828#26126':' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object ImageName: TEdit Left = 89 Top = 7 Width = 462 Height = 22 Color = clMenu Ctl3D = False ParentCtl3D = False TabOrder = 0 end end end object Panel5: TPanel Left = 248 Top = 428 Width = 171 Height = 162 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 7 object Label11: TLabel Left = 5 Top = 20 Width = 9 Height = 16 end object Label12: TLabel Left = 5 Top = 47 Width = 9 Height = 16 end end object Color: TBtnEditA Tag = 2 Left = 93 Top = 496 Width = 144 Height = 25 TabOrder = 8 OnKeyPress = ColorKeyPress OnBtnClick = ColorBtnClick end object GYS: TBtnEditA Tag = 2 Left = 93 Top = 393 Width = 328 Height = 25 Hint = 'GYSNO' TabOrder = 9 OnBtnClick = GYSBtnClick end object PTID: TEdit Tag = 2 Left = 93 Top = 531 Width = 144 Height = 24 Color = clMenu ReadOnly = True TabOrder = 10 end end object cxImage1: TcxImage Left = 562 Top = 1 Align = alRight Properties.PopupMenuLayout.MenuItems = [pmiCut, pmiCopy, pmiPaste, pmiLoad, pmiSave] Properties.ReadOnly = True Properties.Stretch = True Style.BorderStyle = ebsOffice11 StyleHot.TextStyle = [] TabOrder = 1 OnDblClick = cxImage1DblClick Height = 603 Width = 388 end end object Panel16: TPanel Left = 681 Top = 284 Width = 253 Height = 56 BevelInner = bvRaised Caption = #27491#22312#19979#36733','#35831#31245#31561#12290#12290#12290 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 Visible = False end object DataSource1: TDataSource DataSet = Ord_TJHX Left = 389 Top = 627 end object ADOQueryTemp: TADOQuery Connection = DataLink_YPGLBOM.ADOLink LockType = ltReadOnly Parameters = <> Left = 710 Top = 132 end object ADOQueryCmd: TADOQuery Connection = DataLink_YPGLBOM.ADOLink Parameters = <> Left = 647 Top = 134 end object cxStyleRepository1: TcxStyleRepository Left = 640 Top = 8 object cxStyle1: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = clOlive Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clBlack end object cxStyle2: TcxStyle AssignedValues = [svColor, svFont] Color = clMenu Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle3: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = clSkyBlue Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clNone end end object SaveDialog1: TSaveDialog Left = 607 Top = 56 end object ODPat: TOpenDialog Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing] Left = 546 Top = 35 end object IdFTP1: TIdFTP MaxLineAction = maException ReadTimeout = 0 ProxySettings.ProxyType = fpcmNone ProxySettings.Port = 0 Left = 575 Top = 54 end object DataSource2: TDataSource DataSet = Ord_TJHX Left = 665 Top = 9 end object Ord_TJHX: TClientDataSet Aggregates = <> Params = <> Left = 554 Top = 1 end object PopupMenu1: TPopupMenu Left = 580 Top = 8 object N1: TMenuItem Caption = #35774#20026#20027#20449#24687 OnClick = N1Click end object N3: TMenuItem Caption = #26032#22686 OnClick = N3Click end object N2: TMenuItem Caption = #21024#38500 OnClick = N2Click end end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 654 Top = 195 end end