D7myYunxiang/云翔生产管理(MYSC.dll)/U_MCGRKList_HBKC.dfm

639 lines
17 KiB
Plaintext
Raw Normal View History

2025-01-20 13:04:03 +08:00
object frmMCGRKList_HBKC: TfrmMCGRKList_HBKC
2025-07-08 09:22:54 +08:00
Left = 470
Top = 204
2025-01-20 13:04:03 +08:00
Width = 1214
Height = 686
Caption = #20179#24211#24211#23384#27719#24635#26597#35810
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -12
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
2025-07-08 09:22:54 +08:00
PixelsPerInch = 96
TextHeight = 12
2025-01-20 13:04:03 +08:00
object ToolBar1: TToolBar
Left = 0
Top = 0
2025-07-08 09:22:54 +08:00
Width = 1206
2025-01-20 13:04:03 +08:00
AutoSize = True
ButtonHeight = 30
ButtonWidth = 65
Caption = 'ToolBar1'
Color = clSkyBlue
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_MYSC.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 0
OnClick = TBRafreshClick
end
object TBFind: TToolButton
Left = 69
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 20
OnClick = TBFindClick
end
object ToolButton4: TToolButton
Left = 138
Top = 0
AutoSize = True
Caption = #25171#21360
ImageIndex = 4
Visible = False
OnClick = ToolButton4Click
end
object TBExport: TToolButton
Left = 207
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 97
OnClick = TBExportClick
end
object TBClose: TToolButton
Left = 276
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
object labMYType: TLabel
Left = 345
Top = 0
Width = 376
Height = 30
Caption = ' '#24211#23384#27719#24635' '
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -29
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object ToolButton1: TToolButton
Left = 721
Top = 0
AutoSize = True
Caption = #26597#30475
ImageIndex = 55
Visible = False
OnClick = ToolButton1Click
end
end
object Panel1: TPanel
Left = 0
Top = 32
2025-07-08 09:22:54 +08:00
Width = 1206
Height = 41
2025-01-20 13:04:03 +08:00
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label2: TLabel
2025-07-08 09:22:54 +08:00
Left = 173
Top = 13
Width = 32
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #21697#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
2025-07-08 09:22:54 +08:00
Left = 33
Top = 13
Width = 32
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
2025-07-08 09:22:54 +08:00
Left = 665
Top = 13
Width = 64
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #20179#24211#31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label3: TLabel
2025-07-08 09:22:54 +08:00
Left = 443
Top = 13
Width = 32
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #24211#20301
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object MYName: TEdit
Tag = 2
2025-07-08 09:22:54 +08:00
Left = 208
Top = 9
Width = 220
2025-01-20 13:04:03 +08:00
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnChange = MYCodeChange
end
object MYCode: TEdit
Tag = 2
2025-07-08 09:22:54 +08:00
Left = 68
Top = 9
Width = 71
2025-01-20 13:04:03 +08:00
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnChange = MYCodeChange
end
object MYType: TEdit
Tag = 2
2025-07-08 09:22:54 +08:00
Left = 731
Top = 9
Width = 71
2025-01-20 13:04:03 +08:00
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Visible = False
OnChange = MYCodeChange
end
object Button2: TButton
2025-07-08 09:22:54 +08:00
Left = 804
Top = 8
Width = 27
Height = 24
2025-01-20 13:04:03 +08:00
Caption = '...'
TabOrder = 3
Visible = False
OnClick = Button2Click
end
object KUwei: TEdit
Tag = 2
2025-07-08 09:22:54 +08:00
Left = 478
Top = 9
Width = 167
2025-01-20 13:04:03 +08:00
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnChange = MYCodeChange
end
end
object cxGrid2: TcxGrid
Left = 0
2025-07-08 09:22:54 +08:00
Top = 98
Width = 1206
Height = 557
2025-01-20 13:04:03 +08:00
Align = alClient
TabOrder = 2
object TV2: TcxGridDBTableView
OnDblClick = TV2DblClick
2025-07-08 09:22:54 +08:00
Navigator.Buttons.CustomButtons = <>
2025-01-20 13:04:03 +08:00
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Column = V2PS
end
item
Kind = skSum
Column = V2Qty
end
item
Kind = skSum
Column = V2KgQty
end
item
Kind = skSum
Position = spFooter
Column = V2PS
end
item
Kind = skSum
Position = spFooter
Column = V2Qty
end
item
Kind = skSum
Position = spFooter
Column = V2KgQty
end>
DataController.Summary.FooterSummaryItems = <
item
Format = '0'
Kind = skSum
Column = V2PS
end
item
Kind = skSum
Column = V2Qty
end
item
Kind = skSum
Column = V2KgQty
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle2
object V2MYCode: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'MYCode'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 77
end
object V2MYName: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'MYName'
HeaderAlignmentHorz = taCenter
Width = 157
end
object V2KUwei: TcxGridDBColumn
Caption = #24211#20301
DataBinding.FieldName = 'KUwei'
HeaderAlignmentHorz = taCenter
Width = 70
end
object V2CkType: TcxGridDBColumn
Caption = #20179#24211#31867#22411
DataBinding.FieldName = 'CkType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object V2PS: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'PS'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 73
end
object V2KgQty: TcxGridDBColumn
Caption = #20844#26020
DataBinding.FieldName = 'KgQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 82
end
object V2Qty: TcxGridDBColumn
Caption = #31859#25968
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 85
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV2
end
end
object Panel2: TPanel
2025-07-08 09:22:54 +08:00
Left = 369
Top = 132
Width = 276
Height = 234
2025-01-20 13:04:03 +08:00
Color = clSkyBlue
TabOrder = 3
Visible = False
object SpeedButton1: TSpeedButton
2025-07-08 09:22:54 +08:00
Left = 30
Top = 23
Width = 95
Height = 55
2025-01-20 13:04:03 +08:00
Caption = #22383#24067
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -21
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton1Click
end
object Image2: TImage
2025-07-08 09:22:54 +08:00
Left = 252
2025-01-20 13:04:03 +08:00
Top = 3
2025-07-08 09:22:54 +08:00
Width = 22
Height = 16
2025-01-20 13:04:03 +08:00
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
object SpeedButton2: TSpeedButton
2025-07-08 09:22:54 +08:00
Left = 155
Top = 23
Width = 94
Height = 55
2025-01-20 13:04:03 +08:00
Caption = #38754#26009
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -21
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
2025-07-08 09:22:54 +08:00
Left = 155
Top = 95
Width = 94
Height = 55
2025-01-20 13:04:03 +08:00
Caption = #26825
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -21
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
2025-07-08 09:22:54 +08:00
Left = 30
Top = 93
Width = 95
Height = 56
2025-01-20 13:04:03 +08:00
Caption = #32447
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -21
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton4Click
end
object SpeedButton5: TSpeedButton
2025-07-08 09:22:54 +08:00
Left = 67
Top = 163
Width = 147
Height = 59
2025-01-20 13:04:03 +08:00
Caption = #26080#32442#24067
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -21
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton5Click
end
end
object cxTabControl1: TcxTabControl
Left = 0
2025-07-08 09:22:54 +08:00
Top = 73
Width = 1206
Height = 25
2025-01-20 13:04:03 +08:00
Align = alTop
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-08 09:22:54 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 4
2025-07-08 09:22:54 +08:00
Properties.CustomButtons.Buttons = <>
Properties.Style = 8
Properties.TabIndex = 0
Properties.Tabs.Strings = (
2025-01-20 13:04:03 +08:00
' '#38754#26009' '
#32452#21512#38754#26009
' '#22383#24067' '
' '#32447' '
' '#26825' '
' '#26080#32442#24067' '
' '#20840#37096' ')
OnChange = cxTabControl1Change
2025-07-08 09:22:54 +08:00
ClientRectBottom = 26
ClientRectRight = 1206
ClientRectTop = 26
2025-01-20 13:04:03 +08:00
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 165
Top = 148
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 202
Top = 210
end
object ADOQueryMain: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 202
Top = 179
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 203
Top = 149
end
object DataSource1: TDataSource
DataSet = Order_Main
Left = 164
Top = 210
end
object Order_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 165
Top = 179
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 = 1048
Top = 8
ReportData = {}
end
object RMDBMain: TRMDBDataSet
Visible = True
DataSet = CDS_PRT
Left = 1016
Top = 8
end
object RMXLSExport2: TRMXLSExport
ShowAfterExport = False
ExportPrecision = 1
PagesOfSheet = 1
ExportImages = True
ExportFrames = True
ExportImageFormat = ifBMP
JPEGQuality = 0
ScaleX = 1.000000000000000000
ScaleY = 1.000000000000000000
CompressFile = False
Left = 1108
Top = 8
end
object CDS_PRT: TClientDataSet
Aggregates = <>
Params = <>
Left = 1080
Top = 8
end
object cxGridPopupMenu2: TcxGridPopupMenu
PopupMenus = <>
Left = 1009
Top = 331
end
object DataSource2: TDataSource
DataSet = PB_MX
Left = 977
Top = 348
end
object PB_MX: TClientDataSet
Aggregates = <>
Params = <>
Left = 978
Top = 317
end
object PopupMenu1: TPopupMenu
Left = 948
Top = 329
object N1: TMenuItem
Caption = #28857#33394
OnClick = N1Click
end
end
object cxStyleRepository1: TcxStyleRepository
2025-07-08 09:22:54 +08:00
PixelsPerInch = 96
2025-01-20 13:04:03 +08:00
object cxStyle1: TcxStyle
AssignedValues = [svColor, svFont]
Color = clScrollBar
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object cxStyle2: TcxStyle
AssignedValues = [svFont]
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
end
end
end