534 lines
		
	
	
		
			14 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			534 lines
		
	
	
		
			14 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| object frmMLCk: TfrmMLCk
 | |
|   Left = 325
 | |
|   Top = 159
 | |
|   Width = 1230
 | |
|   Height = 638
 | |
|   BorderIcons = [biSystemMenu]
 | |
|   Caption = #20986#24211#21015#34920
 | |
|   Color = clBtnFace
 | |
|   Font.Charset = GB2312_CHARSET
 | |
|   Font.Color = clWindowText
 | |
|   Font.Height = -12
 | |
|   Font.Name = #23435#20307
 | |
|   Font.Style = []
 | |
|   OldCreateOrder = False
 | |
|   Position = poScreenCenter
 | |
|   OnClose = FormClose
 | |
|   OnCreate = FormCreate
 | |
|   OnDestroy = FormDestroy
 | |
|   OnShow = FormShow
 | |
|   PixelsPerInch = 96
 | |
|   TextHeight = 12
 | |
|   object ToolBar1: TToolBar
 | |
|     Left = 0
 | |
|     Top = 0
 | |
|     Width = 1214
 | |
|     Height = 29
 | |
|     ButtonHeight = 30
 | |
|     ButtonWidth = 59
 | |
|     Caption = 'ToolBar1'
 | |
|     Color = clSkyBlue
 | |
|     EdgeInner = esNone
 | |
|     EdgeOuter = esNone
 | |
|     Flat = True
 | |
|     Font.Charset = GB2312_CHARSET
 | |
|     Font.Color = clWindowText
 | |
|     Font.Height = -12
 | |
|     Font.Name = #23435#20307
 | |
|     Font.Style = []
 | |
|     Images = DataLink_Repertory.ThreeImgList
 | |
|     List = True
 | |
|     ParentColor = False
 | |
|     ParentFont = False
 | |
|     ShowCaptions = True
 | |
|     TabOrder = 0
 | |
|     object TBSave: TToolButton
 | |
|       Left = 0
 | |
|       Top = 0
 | |
|       AutoSize = True
 | |
|       Caption = #20445#23384
 | |
|       ImageIndex = 15
 | |
|       OnClick = TBSaveClick
 | |
|     end
 | |
|     object TBClose: TToolButton
 | |
|       Left = 63
 | |
|       Top = 0
 | |
|       AutoSize = True
 | |
|       Caption = #20851#38381
 | |
|       ImageIndex = 21
 | |
|       OnClick = TBCloseClick
 | |
|     end
 | |
|   end
 | |
|   object Panel1: TPanel
 | |
|     Left = 0
 | |
|     Top = 29
 | |
|     Width = 1214
 | |
|     Height = 92
 | |
|     Align = alTop
 | |
|     BevelInner = bvRaised
 | |
|     BevelOuter = bvLowered
 | |
|     Color = clSkyBlue
 | |
|     TabOrder = 1
 | |
|     object Label1: TLabel
 | |
|       Left = 38
 | |
|       Top = 17
 | |
|       Width = 52
 | |
|       Height = 12
 | |
|       Caption = #20986#24211#26085#26399
 | |
|       Font.Charset = GB2312_CHARSET
 | |
|       Font.Color = clWindowText
 | |
|       Font.Height = -12
 | |
|       Font.Name = #23435#20307
 | |
|       Font.Style = [fsBold]
 | |
|       ParentFont = False
 | |
|     end
 | |
|     object Label2: TLabel
 | |
|       Left = 224
 | |
|       Top = 17
 | |
|       Width = 52
 | |
|       Height = 12
 | |
|       Caption = #20986#24211#31867#22411
 | |
|       Font.Charset = GB2312_CHARSET
 | |
|       Font.Color = clWindowText
 | |
|       Font.Height = -12
 | |
|       Font.Name = #23435#20307
 | |
|       Font.Style = [fsBold]
 | |
|       ParentFont = False
 | |
|     end
 | |
|     object Label8: TLabel
 | |
|       Left = 38
 | |
|       Top = 43
 | |
|       Width = 52
 | |
|       Height = 12
 | |
|       Caption = #20986#24211#21333#21495
 | |
|       Font.Charset = GB2312_CHARSET
 | |
|       Font.Color = clWindowText
 | |
|       Font.Height = -12
 | |
|       Font.Name = #23435#20307
 | |
|       Font.Style = [fsBold]
 | |
|       ParentFont = False
 | |
|     end
 | |
|     object Label9: TLabel
 | |
|       Left = 224
 | |
|       Top = 43
 | |
|       Width = 52
 | |
|       Height = 12
 | |
|       Caption = #20986#24211#21333#20301
 | |
|       Font.Charset = GB2312_CHARSET
 | |
|       Font.Color = clWindowText
 | |
|       Font.Height = -12
 | |
|       Font.Name = #23435#20307
 | |
|       Font.Style = [fsBold]
 | |
|       ParentFont = False
 | |
|     end
 | |
|     object Label26: TLabel
 | |
|       Left = 415
 | |
|       Top = 19
 | |
|       Width = 47
 | |
|       Height = 12
 | |
|       Caption = #24065'   '#31181
 | |
|       Font.Charset = GB2312_CHARSET
 | |
|       Font.Color = clWindowText
 | |
|       Font.Height = -12
 | |
|       Font.Name = #23435#20307
 | |
|       Font.Style = [fsBold]
 | |
|       ParentFont = False
 | |
|       Visible = False
 | |
|     end
 | |
|     object CRTime: TDateTimePicker
 | |
|       Left = 90
 | |
|       Top = 13
 | |
|       Width = 100
 | |
|       Height = 20
 | |
|       Date = 41509.970132187500000000
 | |
|       Format = 'yyyy-MM-dd'
 | |
|       Time = 41509.970132187500000000
 | |
|       TabOrder = 1
 | |
|     end
 | |
|     object CRType: TComboBox
 | |
|       Left = 280
 | |
|       Top = 12
 | |
|       Width = 100
 | |
|       Height = 20
 | |
|       Style = csDropDownList
 | |
|       ItemHeight = 12
 | |
|       TabOrder = 0
 | |
|       Items.Strings = (
 | |
|         #29983#20135#20986#24211
 | |
|         #21152#24037#20986#24211
 | |
|         #38144#21806#20986#24211
 | |
|         #25439#32791#20986#24211
 | |
|         #36864#36135#20986#24211)
 | |
|     end
 | |
|     object InoutNo: TEdit
 | |
|       Left = 90
 | |
|       Top = 39
 | |
|       Width = 100
 | |
|       Height = 20
 | |
|       TabOrder = 3
 | |
|     end
 | |
|     object FactoryName: TBtnEditA
 | |
|       Left = 280
 | |
|       Top = 39
 | |
|       Width = 101
 | |
|       Height = 20
 | |
|       ReadOnly = True
 | |
|       TabOrder = 4
 | |
|       OnBtnClick = FactoryNameBtnClick
 | |
|     end
 | |
|     object BZType: TComboBox
 | |
|       Left = 471
 | |
|       Top = 15
 | |
|       Width = 100
 | |
|       Height = 20
 | |
|       Style = csDropDownList
 | |
|       ItemHeight = 12
 | |
|       ItemIndex = 0
 | |
|       TabOrder = 2
 | |
|       Text = 'RMB'
 | |
|       Visible = False
 | |
|       Items.Strings = (
 | |
|         'RMB'
 | |
|         'USD'
 | |
|         'EUR')
 | |
|     end
 | |
|   end
 | |
|   object ToolBar2: TToolBar
 | |
|     Left = 0
 | |
|     Top = 121
 | |
|     Width = 1214
 | |
|     Height = 30
 | |
|     AutoSize = True
 | |
|     ButtonHeight = 30
 | |
|     ButtonWidth = 59
 | |
|     Caption = 'ToolBar1'
 | |
|     Color = clSkyBlue
 | |
|     EdgeInner = esNone
 | |
|     EdgeOuter = esNone
 | |
|     Flat = True
 | |
|     Font.Charset = GB2312_CHARSET
 | |
|     Font.Color = clWindowText
 | |
|     Font.Height = -12
 | |
|     Font.Name = #23435#20307
 | |
|     Font.Style = []
 | |
|     Images = DataLink_Repertory.ThreeImgList
 | |
|     List = True
 | |
|     ParentColor = False
 | |
|     ParentFont = False
 | |
|     ShowCaptions = True
 | |
|     TabOrder = 2
 | |
|     object ToolButton1: TToolButton
 | |
|       Left = 0
 | |
|       Top = 0
 | |
|       AutoSize = True
 | |
|       Caption = #22686#34892
 | |
|       ImageIndex = 57
 | |
|       OnClick = ToolButton1Click
 | |
|     end
 | |
|     object ToolButton2: TToolButton
 | |
|       Left = 63
 | |
|       Top = 0
 | |
|       AutoSize = True
 | |
|       Caption = #21024#34892
 | |
|       ImageIndex = 113
 | |
|       OnClick = ToolButton2Click
 | |
|     end
 | |
|   end
 | |
|   object Panel3: TPanel
 | |
|     Left = 0
 | |
|     Top = 151
 | |
|     Width = 1214
 | |
|     Height = 449
 | |
|     Align = alClient
 | |
|     Caption = 'Panel3'
 | |
|     TabOrder = 3
 | |
|     object cxGrid1: TcxGrid
 | |
|       Left = 1
 | |
|       Top = 1
 | |
|       Width = 1212
 | |
|       Height = 447
 | |
|       Align = alClient
 | |
|       PopupMenu = PopupMenu1
 | |
|       TabOrder = 0
 | |
|       object Tv1: TcxGridDBTableView
 | |
|         NavigatorButtons.ConfirmDelete = False
 | |
|         DataController.DataSource = DataSource1
 | |
|         DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
 | |
|         DataController.Summary.DefaultGroupSummaryItems = <
 | |
|           item
 | |
|             Format = 'C_Code'
 | |
|             Column = v1P_CodeName
 | |
|           end>
 | |
|         DataController.Summary.FooterSummaryItems = <
 | |
|           item
 | |
|             Kind = skSum
 | |
|           end
 | |
|           item
 | |
|             Kind = skSum
 | |
|             Column = v1Qty
 | |
|           end
 | |
|           item
 | |
|             Kind = skSum
 | |
|             Column = v1Money
 | |
|           end
 | |
|           item
 | |
|             Kind = skCount
 | |
|             Column = v1MJID
 | |
|           end>
 | |
|         DataController.Summary.SummaryGroups = <>
 | |
|         OptionsBehavior.FocusCellOnTab = True
 | |
|         OptionsBehavior.GoToNextCellOnEnter = True
 | |
|         OptionsBehavior.FocusCellOnCycle = True
 | |
|         OptionsCustomize.ColumnFiltering = False
 | |
|         OptionsView.Footer = True
 | |
|         OptionsView.GroupByBox = False
 | |
|         OptionsView.Indicator = True
 | |
|         Styles.Header = DataLink_Repertory.Default
 | |
|         object v1Column3: TcxGridDBColumn
 | |
|           Caption = #25351#31034#21333#21495
 | |
|           DataBinding.FieldName = 'OrderNo'
 | |
|           PropertiesClassName = 'TcxButtonEditProperties'
 | |
|           Properties.Buttons = <
 | |
|             item
 | |
|               Default = True
 | |
|               Kind = bkEllipsis
 | |
|             end>
 | |
|           Properties.ReadOnly = True
 | |
|           Properties.OnButtonClick = v1Column3PropertiesButtonClick
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Editing = False
 | |
|           Width = 93
 | |
|         end
 | |
|         object v1MJXH: TcxGridDBColumn
 | |
|           Caption = #21367#21495
 | |
|           DataBinding.FieldName = 'MJXH'
 | |
|           Visible = False
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Hidden = True
 | |
|           Options.Editing = False
 | |
|           Options.Sorting = False
 | |
|           Width = 60
 | |
|         end
 | |
|         object v1P_Code: TcxGridDBColumn
 | |
|           Caption = #20135#21697#32534#21495
 | |
|           DataBinding.FieldName = 'P_Code'
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Editing = False
 | |
|           Options.Sorting = False
 | |
|           Width = 73
 | |
|         end
 | |
|         object v1P_CodeName: TcxGridDBColumn
 | |
|           Caption = #20135#21697#21517#31216
 | |
|           DataBinding.FieldName = 'P_CodeName'
 | |
|           PropertiesClassName = 'TcxButtonEditProperties'
 | |
|           Properties.Buttons = <
 | |
|             item
 | |
|               Default = True
 | |
|               Kind = bkEllipsis
 | |
|             end>
 | |
|           Properties.OnButtonClick = v1P_CodeNamePropertiesButtonClick
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Editing = False
 | |
|           Options.Sorting = False
 | |
|           Width = 86
 | |
|         end
 | |
|         object v1P_SPEC: TcxGridDBColumn
 | |
|           Caption = #35268#26684
 | |
|           DataBinding.FieldName = 'P_SPEC'
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Editing = False
 | |
|           Options.Sorting = False
 | |
|           Width = 73
 | |
|         end
 | |
|         object v1P_Color: TcxGridDBColumn
 | |
|           Caption = #39068#33394
 | |
|           DataBinding.FieldName = 'P_Color'
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Editing = False
 | |
|           Options.Sorting = False
 | |
|           Width = 60
 | |
|         end
 | |
|         object v1P_MF: TcxGridDBColumn
 | |
|           Caption = #38376#24133'(cm)'
 | |
|           DataBinding.FieldName = 'P_MF'
 | |
|           Visible = False
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Hidden = True
 | |
|           Options.Editing = False
 | |
|           Options.Sorting = False
 | |
|           Width = 90
 | |
|         end
 | |
|         object v1P_KZ: TcxGridDBColumn
 | |
|           Caption = #20811#37325'(g/'#13217')'
 | |
|           DataBinding.FieldName = 'P_KZ'
 | |
|           Visible = False
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Hidden = True
 | |
|           Options.Editing = False
 | |
|           Options.Sorting = False
 | |
|           Width = 90
 | |
|         end
 | |
|         object v1MJID: TcxGridDBColumn
 | |
|           Caption = #21305#25968
 | |
|           DataBinding.FieldName = 'Rollnum'
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Sorting = False
 | |
|           Width = 75
 | |
|         end
 | |
|         object v1Qty: TcxGridDBColumn
 | |
|           Caption = #25968#37327
 | |
|           DataBinding.FieldName = 'Qty'
 | |
|           PropertiesClassName = 'TcxTextEditProperties'
 | |
|           Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Sorting = False
 | |
|           Styles.Content = DataLink_Repertory.FontBlue
 | |
|           Styles.Footer = DataLink_Repertory.FontBlue
 | |
|           Styles.Header = DataLink_Repertory.FontBlue
 | |
|           Width = 60
 | |
|         end
 | |
|         object v1QtyUnit: TcxGridDBColumn
 | |
|           Caption = #25968#37327#21333#20301
 | |
|           DataBinding.FieldName = 'QtyUnit'
 | |
|           PropertiesClassName = 'TcxComboBoxProperties'
 | |
|           Properties.DropDownListStyle = lsFixedList
 | |
|           Properties.Items.Strings = (
 | |
|             'M'
 | |
|             'Kg')
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Editing = False
 | |
|           Options.Sorting = False
 | |
|           Width = 65
 | |
|         end
 | |
|         object v1Price: TcxGridDBColumn
 | |
|           Caption = #21333#20215
 | |
|           DataBinding.FieldName = 'Price'
 | |
|           PropertiesClassName = 'TcxTextEditProperties'
 | |
|           Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Sorting = False
 | |
|           Width = 73
 | |
|         end
 | |
|         object v1Money: TcxGridDBColumn
 | |
|           Caption = #37329#39069
 | |
|           DataBinding.FieldName = 'Money'
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Editing = False
 | |
|           Options.Sorting = False
 | |
|           Width = 64
 | |
|         end
 | |
|         object v1Column1: TcxGridDBColumn
 | |
|           Caption = #24211#20301
 | |
|           DataBinding.FieldName = 'kuwei'
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Width = 70
 | |
|         end
 | |
|         object v1Note: TcxGridDBColumn
 | |
|           Caption = #22791#27880
 | |
|           DataBinding.FieldName = 'Note'
 | |
|           HeaderAlignmentHorz = taCenter
 | |
|           Options.Sorting = False
 | |
|           Width = 132
 | |
|         end
 | |
|       end
 | |
|       object cxGrid1Level1: TcxGridLevel
 | |
|         GridView = Tv1
 | |
|       end
 | |
|     end
 | |
|   end
 | |
|   object ADOQueryCmd: TADOQuery
 | |
|     Connection = DataLink_Repertory.ADOLink
 | |
|     Parameters = <>
 | |
|     Left = 372
 | |
|     Top = 234
 | |
|   end
 | |
|   object ADOQueryTmp: TADOQuery
 | |
|     Connection = DataLink_Repertory.ADOLink
 | |
|     Parameters = <>
 | |
|     Left = 411
 | |
|     Top = 234
 | |
|   end
 | |
|   object DataSource1: TDataSource
 | |
|     DataSet = CDS_Main
 | |
|     Left = 663
 | |
|     Top = 391
 | |
|   end
 | |
|   object CDS_Main: TClientDataSet
 | |
|     Aggregates = <>
 | |
|     Params = <>
 | |
|     Left = 592
 | |
|     Top = 393
 | |
|   end
 | |
|   object cxGridPopupMenu1: TcxGridPopupMenu
 | |
|     Grid = cxGrid1
 | |
|     PopupMenus = <>
 | |
|     Left = 192
 | |
|     Top = 257
 | |
|   end
 | |
|   object ADOQueryMain: TADOQuery
 | |
|     Connection = DataLink_Repertory.ADOLink
 | |
|     Parameters = <>
 | |
|     Left = 447
 | |
|     Top = 235
 | |
|   end
 | |
|   object PopupMenu1: TPopupMenu
 | |
|     Left = 162
 | |
|     Top = 258
 | |
|     object N1: TMenuItem
 | |
|       Caption = #20840#36873
 | |
|       OnClick = N1Click
 | |
|     end
 | |
|     object N2: TMenuItem
 | |
|       Caption = #20840#24323
 | |
|       OnClick = N2Click
 | |
|     end
 | |
|   end
 | |
|   object ADOQueryPrint: TADOQuery
 | |
|     Connection = DataLink_Repertory.ADOLink
 | |
|     Parameters = <>
 | |
|     Left = 401
 | |
|     Top = 282
 | |
|   end
 | |
|   object RM1: TRMGridReport
 | |
|     ThreadPrepareReport = True
 | |
|     InitialZoom = pzDefault
 | |
|     PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
 | |
|     DefaultCollate = False
 | |
|     ShowPrintDialog = False
 | |
|     SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
 | |
|     PreviewOptions.RulerUnit = rmutScreenPixels
 | |
|     PreviewOptions.RulerVisible = False
 | |
|     PreviewOptions.DrawBorder = False
 | |
|     PreviewOptions.BorderPen.Color = clGray
 | |
|     PreviewOptions.BorderPen.Style = psDash
 | |
|     Dataset = RMDB_Main
 | |
|     CompressLevel = rmzcFastest
 | |
|     CompressThread = False
 | |
|     LaterBuildEvents = True
 | |
|     OnlyOwnerDataSet = False
 | |
|     Left = 478
 | |
|     Top = 278
 | |
|     ReportData = {}
 | |
|   end
 | |
|   object RMDB_Main: TRMDBDataSet
 | |
|     Visible = True
 | |
|     DataSet = ADOQueryPrint
 | |
|     Left = 443
 | |
|     Top = 278
 | |
|   end
 | |
|   object RMXLSExport1: TRMXLSExport
 | |
|     ShowAfterExport = True
 | |
|     ExportPrecision = 1
 | |
|     PagesOfSheet = 1
 | |
|     ExportImages = True
 | |
|     ExportFrames = True
 | |
|     ExportImageFormat = ifBMP
 | |
|     JPEGQuality = 0
 | |
|     ScaleX = 1.000000000000000000
 | |
|     ScaleY = 1.000000000000000000
 | |
|     CompressFile = False
 | |
|     Left = 514
 | |
|     Top = 279
 | |
|   end
 | |
| end
 | 
