D7myYunxiang/生产计划单(DyeingFinishingPlan.dll)我/U_OrderList.dfm
DESKTOP-E401PHE\Administrator 1011cb7292 1
2025-01-20 13:04:03 +08:00

600 lines
16 KiB
Plaintext

object frmOrderList: TfrmOrderList
Left = 39
Top = 28
Width = 1605
Height = 816
Caption = #25351#31034#21333#26597#35810
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 120
TextHeight = 15
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1587
AutoSize = True
ButtonHeight = 30
ButtonWidth = 75
Caption = 'ToolBar1'
Color = clSkyBlue
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
Images = DataLink_DyeingFinishingPlan.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 24
OnClick = TBRafreshClick
end
object TBExport: TToolButton
Left = 79
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 40
OnClick = TBExportClick
end
object ToolButton1: TToolButton
Left = 158
Top = 0
Caption = #25171#21360
ImageIndex = 14
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 233
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object Panel4: TPanel
Left = 93
Top = 249
Width = 367
Height = 266
TabOrder = 1
Visible = False
object Label11: TLabel
Left = 60
Top = 110
Width = 8
Height = 15
end
object Panel10: TPanel
Left = 1
Top = 1
Width = 365
Height = 29
Align = alTop
Alignment = taLeftJustify
BevelOuter = bvNone
Caption = #20107#20214#35828#26126
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnMouseMove = Panel10MouseMove
object Image2: TImage
Left = 336
Top = 4
Width = 28
Height = 20
ParentShowHint = False
Picture.Data = {
07544269746D617076040000424D760400000000000036000000280000001500
0000110000000100180000000000400400000000000000000000000000000000
0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FF00FFFFFFFFFFFFF0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6
F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFF404040404040404040404040404040404040404040404040
404040404040404040404040404040404040404040404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFF808080808080808080808080808080808080808080
808080808080808080808080808080808080808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000
000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FF00}
ShowHint = True
Transparent = True
OnClick = Image2Click
end
end
object RichEdit1: TRichEdit
Left = 1
Top = 30
Width = 365
Height = 235
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
end
object MovePanel2: TMovePanel
Left = 680
Top = 295
Width = 361
Height = 61
BevelInner = bvLowered
Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Visible = False
end
object Cxgrid1: TcxGrid
Left = 0
Top = 120
Width = 1587
Height = 649
Align = alClient
TabOrder = 3
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
OnCellDblClick = Tv1CellDblClick
DataController.DataSource = DataSource1
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1Column2
end
item
Kind = skCount
Column = v1OrdDate
end>
DataController.Summary.SummaryGroups = <>
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
Styles.Content = DataLink_DyeingFinishingPlan.Default
Styles.Header = DataLink_DyeingFinishingPlan.Default
object v1OrdDate: TcxGridDBColumn
Caption = #19979#21333#26085#26399
DataBinding.FieldName = 'OrdDate'
PropertiesClassName = 'TcxDateEditProperties'
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
SortIndex = 0
SortOrder = soAscending
Width = 144
end
object v1MLOrderNo: TcxGridDBColumn
Caption = #25351#31034#21333#21495
DataBinding.FieldName = 'MLOrderNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 151
end
object v1Column3: TcxGridDBColumn
Caption = #19994#21153#21592
DataBinding.FieldName = 'YWY'
HeaderAlignmentHorz = taCenter
Width = 106
end
object v1MLConNo: TcxGridDBColumn
Caption = #21512#21516#21495
DataBinding.FieldName = 'MLConNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 138
end
object v1Column1: TcxGridDBColumn
Caption = #23458#25143#21512#21516#21495
DataBinding.FieldName = 'KHConNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 175
end
object v1MLCodeName: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'MLCodeName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 219
end
object v1KHName: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'KHNameJC'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 162
end
object v1Column2: TcxGridDBColumn
Caption = #24635#25968#37327
DataBinding.FieldName = 'ZQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 114
end
end
object Cxgrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object Panel1: TPanel
Left = 0
Top = 32
Width = 1587
Height = 88
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 4
object Label1: TLabel
Left = 31
Top = 18
Width = 92
Height = 22
Caption = #19979#21333#26085#26399
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 591
Top = 51
Width = 92
Height = 22
Caption = #25351#31034#21333#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 299
Top = 18
Width = 94
Height = 22
Caption = #23458' '#25143
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 591
Top = 18
Width = 93
Height = 22
Caption = #21512' '#21516' '#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 766
Top = 149
Width = 32
Height = 15
Caption = #20811#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 299
Top = 51
Width = 92
Height = 22
Caption = #20135#21697#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 656
Top = 110
Width = 64
Height = 15
Caption = #23457#26680#29366#24577
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label2: TLabel
Left = 858
Top = 51
Width = 69
Height = 22
Caption = #19994#21153#21592
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BegDate: TDateTimePicker
Left = 125
Top = 13
Width = 154
Height = 30
Date = 40675.464742650460000000
Format = 'yyyy-MM-dd'
Time = 40675.464742650460000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnChange = BegDateChange
end
object EndDate: TDateTimePicker
Left = 125
Top = 46
Width = 154
Height = 30
Date = 40675.464761099540000000
Format = 'yyyy-MM-dd'
Time = 40675.464761099540000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnChange = EndDateChange
end
object MLOrderNo: TEdit
Tag = 2
Left = 690
Top = 46
Width = 150
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnChange = KHNameHZChange
OnKeyPress = MLOrderNoKeyPress
end
object KHNameHZ: TEdit
Tag = 2
Left = 396
Top = 13
Width = 175
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnChange = KHNameHZChange
end
object MLConNo: TEdit
Tag = 2
Left = 690
Top = 13
Width = 150
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnChange = KHNameHZChange
OnKeyPress = MLConNoKeyPress
end
object MPRTKZ: TEdit
Tag = 2
Left = 818
Top = 124
Width = 70
Height = 20
TabOrder = 5
end
object MLCodeName: TEdit
Tag = 2
Left = 396
Top = 46
Width = 174
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnChange = KHNameHZChange
end
object status: TComboBox
Tag = 2
Left = 726
Top = 109
Width = 129
Height = 23
ItemHeight = 15
TabOrder = 7
Visible = False
Items.Strings = (
#26410#23457#26680
#24050#23457#26680
#24050#23436#25104
'')
end
object YWY: TEdit
Tag = 2
Left = 926
Top = 46
Width = 150
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnChange = KHNameHZChange
OnKeyPress = MLOrderNoKeyPress
end
end
object cxGridPopupMenu1: TcxGridPopupMenu
PopupMenus = <>
Left = 561
Top = 201
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_DyeingFinishingPlan.ADOLink
Parameters = <>
Left = 464
Top = 200
end
object ADOQueryMain: TADOQuery
Connection = DataLink_DyeingFinishingPlan.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 496
Top = 200
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_DyeingFinishingPlan.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 528
Top = 200
end
object DataSource1: TDataSource
DataSet = Order_Main
Left = 432
Top = 201
end
object Order_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 410
Top = 272
end
object RMDBMain: TRMDBDataSet
Visible = True
DataSet = ADOQueryPrint
Left = 270
Top = 296
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
DefaultCollate = False
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
PreviewOptions.RulerUnit = rmutScreenPixels
PreviewOptions.RulerVisible = False
PreviewOptions.DrawBorder = False
PreviewOptions.BorderPen.Color = clGray
PreviewOptions.BorderPen.Style = psDash
Dataset = RMDBMain
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 331
Top = 287
ReportData = {}
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_DyeingFinishingPlan.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 343
Top = 212
end
end