object frmLLCKInPut: TfrmLLCKInPut Left = 531 Top = 184 Width = 1172 Height = 835 Caption = #21152#24037#20986#24211 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 15 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1164 Height = 30 ButtonHeight = 30 ButtonWidth = 123 Caption = 'ToolBar1' Color = clBtnFace EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] Images = DataLink_MYSC.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object Label26: TLabel Left = 0 Top = 0 Width = 36 Height = 30 Caption = ' ' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object TBSave: TToolButton Left = 36 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 5 OnClick = TBSaveClick end object ToolButton1: TToolButton Left = 119 Top = 0 Caption = #36873#25321#25968#25454 ImageIndex = 22 OnClick = ToolButton1Click end object Panel2: TPanel Left = 242 Top = 0 Width = 185 Height = 30 BevelOuter = bvNone TabOrder = 0 end object labMYType: TLabel Left = 427 Top = 0 Width = 240 Height = 30 Caption = ' ' Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -29 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Panel6: TPanel Left = 667 Top = 0 Width = 185 Height = 30 BevelOuter = bvNone TabOrder = 1 end object TBClose: TToolButton Left = 852 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel3: TPanel Left = 0 Top = 30 Width = 1164 Height = 774 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object Panel4: TPanel Left = 2 Top = 2 Width = 1160 Height = 246 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object Label13: TLabel Left = 412 Top = 15 Width = 74 Height = 17 Caption = #26085' '#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label33: TLabel Left = 35 Top = 15 Width = 92 Height = 17 Caption = #21152' '#24037' '#21378#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label22: TLabel Left = 33 Top = 57 Width = 94 Height = 17 Caption = #21697' '#21517#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 646 Top = 109 Width = 94 Height = 17 Caption = #20811' '#37325#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 412 Top = 109 Width = 74 Height = 17 Caption = #38376' '#24133#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label15: TLabel Left = 596 Top = 109 Width = 20 Height = 17 Caption = 'CM' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label16: TLabel Left = 836 Top = 109 Width = 38 Height = 17 Caption = 'g/'#13217 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 646 Top = 15 Width = 94 Height = 17 Caption = #33457' '#22411#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 412 Top = 57 Width = 74 Height = 17 Caption = #39068' '#33394#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 646 Top = 57 Width = 94 Height = 17 Caption = #33394' '#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 35 Top = 205 Width = 94 Height = 17 Caption = #22791' '#27880#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 414 Top = 205 Width = 90 Height = 17 Caption = #25910#36135#21333#20301#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 35 Top = 158 Width = 84 Height = 17 Caption = #23458' '#25143#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 412 Top = 160 Width = 72 Height = 17 Caption = #21512#21516#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 646 Top = 160 Width = 90 Height = 17 Caption = #25351#31034#21333#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label17: TLabel Left = 33 Top = 109 Width = 108 Height = 17 Caption = #22383#24067#32852#31995#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object CRTime: TDateTimePicker Tag = 2 Left = 473 Top = 12 Width = 144 Height = 25 Date = 42459.000000000000000000 Time = 42459.000000000000000000 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object GYSName: TBtnEditA Tag = 2 Left = 112 Top = 13 Width = 273 Height = 31 Hint = 'GYSNo' Color = clScrollBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 1 OnBtnClick = GYSNameBtnClick end object MYName: TEdit Tag = 2 Left = 113 Top = 57 Width = 268 Height = 30 Color = clScrollBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 2 end object MYKZ: TEdit Tag = 2 Left = 722 Top = 108 Width = 111 Height = 30 Color = clScrollBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 3 end object MYMF: TEdit Tag = 2 Left = 473 Top = 108 Width = 113 Height = 30 Color = clScrollBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 4 end object MYHX: TEdit Tag = 2 Left = 722 Top = 14 Width = 138 Height = 30 Color = clScrollBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 5 end object MYColor: TEdit Tag = 2 Left = 473 Top = 56 Width = 140 Height = 30 Color = clScrollBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 6 end object MYColorNo: TEdit Tag = 2 Left = 722 Top = 56 Width = 140 Height = 30 Color = clScrollBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 7 end object Note: TEdit Tag = 2 Left = 113 Top = 202 Width = 273 Height = 31 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 8 end object ToGYSName: TBtnEditA Tag = 2 Left = 491 Top = 201 Width = 372 Height = 31 Hint = 'ToGYSNo' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 9 OnBtnClick = ToGYSNameBtnClick end object KHNameJC: TBtnEditA Left = 112 Top = 156 Width = 273 Height = 31 Hint = 'ToGYSNo' Color = clScrollBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 10 OnBtnClick = KHNameJCBtnClick end object MLConNo: TEdit Left = 473 Top = 157 Width = 140 Height = 30 Color = clScrollBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 11 end object PBBatchNo: TEdit Tag = 2 Left = 136 Top = 107 Width = 245 Height = 30 Color = clScrollBar Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 12 end object MLOrderNo: TcxButtonEdit Left = 722 Top = 157 ParentFont = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = MLOrderNoPropertiesButtonClick Style.Color = clScrollBar Style.Font.Charset = GB2312_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -17 Style.Font.Name = #23435#20307 Style.Font.Style = [fsBold] Style.IsFontAssigned = True TabOrder = 13 Width = 141 end end object Panel5: TPanel Left = 2 Top = 248 Width = 1160 Height = 61 Align = alTop TabOrder = 1 object Label31: TLabel Left = 251 Top = 23 Width = 90 Height = 17 Caption = #20986#24211#24635#25968#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label32: TLabel Left = 380 Top = 23 Width = 18 Height = 17 Caption = #21305 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label23: TLabel Left = 225 Top = 381 Width = 48 Height = 15 Caption = #21333#20215#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label24: TLabel Left = 1094 Top = -16 Width = 48 Height = 15 Caption = #21333#20215#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label45: TLabel Left = 488 Top = 23 Width = 18 Height = 17 Caption = #31859 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label50: TLabel Left = 592 Top = 23 Width = 36 Height = 17 Caption = #20844#26020 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label43: TLabel Left = 36 Top = 23 Width = 82 Height = 17 Caption = #35745#20215#26041#24335':' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object PS: TEdit Tag = 2 Left = 325 Top = 22 Width = 50 Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object Qty: TEdit Tag = 2 Left = 410 Top = 22 Width = 74 Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object KgQty: TEdit Tag = 2 Left = 515 Top = 22 Width = 72 Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 end object Panel7: TPanel Left = 1218 Top = 201 Width = 99 Height = 181 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 3 Visible = False object Panel1: TPanel Left = 9 Top = 9 Width = 81 Height = 160 BevelInner = bvRaised TabOrder = 0 object Label20: TLabel Left = 27 Top = 17 Width = 22 Height = 126 Caption = #26126#13#10#32454#13#10#30721#13#10#21333#13#10#24405#13#10#20837 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end end end object PTID: TEdit Tag = 2 Left = 1301 Top = 259 Width = 72 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 5 Visible = False end object MYPrice: TEdit Tag = 2 Left = 267 Top = 379 Width = 42 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 4 Visible = False end object MDMFlag: TCheckBox Left = 114 Top = 18 Width = 51 Height = 26 Caption = #31859 Checked = True Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False State = cbChecked TabOrder = 6 OnClick = MDMFlagClick end object MDKGFlag: TCheckBox Left = 173 Top = 18 Width = 69 Height = 26 Caption = #20844#26020 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 7 OnClick = MDKGFlagClick end end object Panel8: TPanel Left = 2 Top = 309 Width = 1160 Height = 463 Align = alClient Caption = 'Panel8' TabOrder = 2 object Panel9: TPanel Left = 1 Top = 1 Width = 316 Height = 461 Align = alLeft TabOrder = 0 object Label18: TLabel Left = 25 Top = 19 Width = 189 Height = 20 Caption = #27880#65306#36755#20837#25968#37327#25970#22238#36710 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label19: TLabel Left = 25 Top = 76 Width = 105 Height = 20 Caption = #26126#32454#25968#37327#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Edit1: TEdit Left = 120 Top = 72 Width = 96 Height = 35 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnKeyPress = Edit1KeyPress end end object cxGrid1: TcxGrid Left = 317 Top = 1 Width = 842 Height = 461 Align = alClient TabOrder = 1 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> OnCellDblClick = Tv1CellDblClick DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Format = #20010#25968':##' Kind = skCount end item Kind = skSum end item Kind = skSum Column = v1Column11 end item Kind = skSum Column = Tv1Column1 end item Kind = skSum Column = Tv1Column2 end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Content = DataLink_MYSC.Default10 Styles.Footer = DataLink_MYSC.Default10 Styles.Header = DataLink_MYSC.Default10 object v1Column11: TcxGridDBColumn Caption = #26126#32454#25968#37327#65288#31859#65289 DataBinding.FieldName = 'MQty' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 247 end object Tv1Column1: TcxGridDBColumn Caption = #26126#32454#25968#37327#65288#20844#26020#65289 DataBinding.FieldName = 'KgQty' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 181 end object Tv1Column2: TcxGridDBColumn Caption = #26680#31639#25968#37327 DataBinding.FieldName = 'HSQty' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 161 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end end end object ADOTemp: TADOQuery Connection = DataLink_MYSC.ADOLink LockType = ltReadOnly Parameters = <> Left = 766 Top = 493 end object ADOCmd: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 726 Top = 487 end object ADOQuery1: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 730 Top = 532 end object DataSource1: TDataSource DataSet = ClientDataSet1 Left = 802 Top = 527 end object ClientDataSet1: TClientDataSet Aggregates = <> Params = <> Left = 839 Top = 493 end object PopupMenu2: TPopupMenu Left = 238 Top = 792 object MenuItem1: TMenuItem Caption = #19978#20256 end object N3: TMenuItem Caption = #21024#38500 end object MenuItem2: TMenuItem Caption = #37325#21629#21517 end object N4: TMenuItem Caption = #21478#23384#20026 end end object ImageList1: TImageList Height = 32 ShareImages = True Width = 32 Left = 170 Top = 799 end object ADOQueryCmd: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 285 Top = 793 end object ADOQueryTmp: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 110 Top = 784 end object ADOQuery2: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 765 Top = 532 end object ADOQueryTemp: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 810 Top = 492 end object cxStyleRepository1: TcxStyleRepository Left = 368 Top = 8 PixelsPerInch = 96 object cxStyle1: TcxStyle AssignedValues = [svFont] Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] end end end