D7wmguihua/坯布码单待检(PBMDDJ.dll)/U_KHGetCPManage.dfm
DESKTOP-E401PHE\Administrator b4b5840f18 1
2025-01-18 16:22:10 +08:00

796 lines
20 KiB
Plaintext

object frmKHGetCPManage: TfrmKHGetCPManage
Left = 162
Top = 71
Width = 1099
Height = 657
Caption = #25343#26679#21015#34920
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1083
Height = 31
ButtonHeight = 30
ButtonWidth = 107
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_DDMD.ThreeImgList
Flat = True
Images = DataLink_DDMD.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 0
OnClick = TBRafreshClick
end
object ToolButton2: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 20
OnClick = ToolButton2Click
end
object TBAdd: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #26032#22686
ImageIndex = 1
OnClick = TBAddClick
end
object ToolButton3: TToolButton
Left = 189
Top = 0
AutoSize = True
Caption = #20462#25913
ImageIndex = 11
OnClick = ToolButton3Click
end
object ToolButton9: TToolButton
Left = 252
Top = 0
AutoSize = True
Caption = #22797#21046
ImageIndex = 38
Visible = False
OnClick = ToolButton9Click
end
object TBDel: TToolButton
Left = 315
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 3
OnClick = TBDelClick
end
object ToolButton1: TToolButton
Left = 378
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 97
OnClick = ToolButton1Click
end
object ToolButton4: TToolButton
Left = 441
Top = 0
AutoSize = True
Caption = #26631#31614#25171#21360
ImageIndex = 4
OnClick = ToolButton4Click
end
object Panel4: TPanel
Left = 528
Top = 0
Width = 176
Height = 30
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label13: TLabel
Left = 3
Top = 9
Width = 52
Height = 12
Caption = #26631#31614#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object LabName: TBtnEditA
Left = 61
Top = 5
Width = 108
Height = 20
TabOrder = 0
OnBtnClick = LabNameBtnClick
end
end
object ToolButton7: TToolButton
Left = 704
Top = 0
Caption = #25171#21360#25343#26679#28165#21333
ImageIndex = 68
OnClick = ToolButton7Click
end
object ToolButton8: TToolButton
Left = 811
Top = 0
AutoSize = True
Caption = #31354#30333#20449#31546#32440
ImageIndex = 76
OnClick = ToolButton8Click
end
object TBClose: TToolButton
Left = 910
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 193
Width = 1083
Height = 287
Align = alClient
TabOrder = 1
object Tv1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
OnCellClick = Tv1CellClick
OnCellDblClick = Tv1CellDblClick
DataController.DataSource = DataSource2
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsSelection.CellSelect = False
OptionsView.GroupByBox = False
object v1Column20: TcxGridDBColumn
Caption = #25343#26679#32534#21495
DataBinding.FieldName = 'CKNO'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 98
end
object v1Column19: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'KHName'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 83
end
object v1Column18: TcxGridDBColumn
Caption = #25343#26679#26102#38388
DataBinding.FieldName = 'CKDate'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 106
end
object v1Column12: TcxGridDBColumn
Caption = #26679#21697#31867#21035
DataBinding.FieldName = 'CPName'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 65
end
object v1Column1: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'CYNo'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 70
end
object v1Column2: TcxGridDBColumn
Caption = #20013#25991#21517#31216
DataBinding.FieldName = 'CYName'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 68
end
object v1Column3: TcxGridDBColumn
Caption = #33521#25991#21517#31216
DataBinding.FieldName = 'CYEName'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 66
end
object v1Column4: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'CYSpec'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 67
end
object v1Column5: TcxGridDBColumn
Caption = #20013#25991#25104#20998
DataBinding.FieldName = 'CYCF'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 66
end
object v1Column6: TcxGridDBColumn
Caption = #33521#25991#25104#20998
DataBinding.FieldName = 'CYECF'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 69
end
object v1Column7: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'CYMF'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 73
end
object v1Column8: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'CYKZ'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 67
end
object v1Column9: TcxGridDBColumn
Caption = #20013#25991#39068#33394
DataBinding.FieldName = 'CYColor'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 67
end
object v1Column14: TcxGridDBColumn
Caption = #33521#25991#39068#33394
DataBinding.FieldName = 'CYColorEng'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
end
object v1Column10: TcxGridDBColumn
Caption = #20154#27665#24065#20215#26684
DataBinding.FieldName = 'RMBPrice'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 82
end
object v1Column15: TcxGridDBColumn
Caption = #32654#37329#20215#26684
DataBinding.FieldName = 'USDPrice'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 64
end
object v1Column16: TcxGridDBColumn
Caption = #27719#29575
DataBinding.FieldName = 'HuiLv'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 60
end
object v1Column17: TcxGridDBColumn
Caption = #31995#25968
DataBinding.FieldName = 'LiRunLv'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 57
end
object v1Column13: TcxGridDBColumn
DataBinding.FieldName = 'CIF'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 47
end
object v1Column11: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'CKNote'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 71
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object Panel1: TPanel
Left = 0
Top = 31
Width = 1083
Height = 162
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 2
object Label2: TLabel
Left = 184
Top = 16
Width = 48
Height = 12
Caption = #20135#21697#32534#21495
end
object Label1: TLabel
Left = 184
Top = 67
Width = 48
Height = 12
Caption = #20013#25991#21517#31216
end
object Label4: TLabel
Left = 184
Top = 92
Width = 48
Height = 12
Caption = #33521#25991#21517#31216
end
object Label5: TLabel
Left = 184
Top = 41
Width = 48
Height = 12
Caption = #35268' '#26684
end
object Label3: TLabel
Left = 184
Top = 118
Width = 48
Height = 12
Caption = #23458' '#25143
end
object Label6: TLabel
Left = 16
Top = 16
Width = 48
Height = 12
Caption = #25343#26679#26085#26399
end
object Label7: TLabel
Left = 184
Top = 143
Width = 52
Height = 12
Caption = #25343#26679#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Image2: TImage
Left = 377
Top = 2
Width = 192
Height = 159
end
object CYNo: TEdit
Tag = 2
Left = 235
Top = 12
Width = 101
Height = 20
TabOrder = 0
OnChange = CYNoChange
OnKeyPress = CYNoKeyPress
end
object CYName: TEdit
Tag = 2
Left = 235
Top = 63
Width = 101
Height = 20
TabOrder = 1
OnChange = CYNoChange
end
object CYEName: TEdit
Tag = 2
Left = 235
Top = 88
Width = 101
Height = 20
TabOrder = 2
OnChange = CYNoChange
end
object CYSpec: TEdit
Tag = 2
Left = 235
Top = 37
Width = 101
Height = 20
TabOrder = 3
OnChange = CYNoChange
end
object KHName: TEdit
Tag = 2
Left = 235
Top = 114
Width = 101
Height = 20
TabOrder = 4
OnChange = CYNoChange
end
object BegDate: TDateTimePicker
Left = 64
Top = 12
Width = 89
Height = 20
Date = 40970.965677256940000000
Time = 40970.965677256940000000
TabOrder = 5
end
object EndDate: TDateTimePicker
Left = 64
Top = 35
Width = 89
Height = 20
Date = 40970.965677256940000000
Time = 40970.965677256940000000
TabOrder = 6
end
object CKNO: TEdit
Tag = 2
Left = 235
Top = 139
Width = 101
Height = 20
TabOrder = 7
OnKeyPress = CKNOKeyPress
end
end
object cxGrid2: TcxGrid
Left = 0
Top = 488
Width = 1083
Height = 130
Align = alBottom
TabOrder = 3
object Tv2: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource3
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = 'DefStr1'
end
item
Format = 'GYS'
end
item
Format = '1'
Position = spFooter
end
item
Format = '0'
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1Quantity
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusFirstCellOnNewRecord = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Header = DataLink_DDMD.Default
object cxGridDBColumn1: TcxGridDBColumn
Caption = #26679#21697#32534#21495
DataBinding.FieldName = 'CYNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 84
end
object cxGridDBColumn2: TcxGridDBColumn
Caption = #23384#25918#20301#32622
DataBinding.FieldName = 'WeiZhi'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 63
end
object cxGridDBColumn3: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'CYName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 57
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'CYMF'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 55
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'CYKZ'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 53
end
object cxGridDBColumn6: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'CYSpec'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 55
end
object cxGridDBColumn7: TcxGridDBColumn
Caption = #25104#20998
DataBinding.FieldName = 'CYCF'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 53
end
object cxGridDBColumn8: TcxGridDBColumn
Caption = #33457#22411
DataBinding.FieldName = 'CYHX'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 58
end
object v1P_ChnName: TcxGridDBColumn
Tag = 2
Caption = #39068#33394
DataBinding.FieldName = 'CYColor'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = False
HeaderAlignmentHorz = taCenter
Width = 53
end
object cxGridDBColumn9: TcxGridDBColumn
Tag = 2
Caption = #26679#21697#31867#22411
DataBinding.FieldName = 'CYType'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#21367#26679
#25512#38144#26679
#33337#26679)
HeaderAlignmentHorz = taCenter
Width = 68
end
object v1Quantity: TcxGridDBColumn
Tag = 2
Caption = #20986#24211#25968#37327
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Styles.Content = DataLink_DDMD.FoneRed
Styles.Footer = DataLink_DDMD.FoneRed
Styles.Header = DataLink_DDMD.FoneRed
Width = 74
end
object v1UnitName: TcxGridDBColumn
Tag = 2
Caption = #21333#20301
DataBinding.FieldName = 'QtyUnit'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#31859
#20844#26020
#22871)
HeaderAlignmentHorz = taCenter
Width = 47
end
object cxGridDBColumn10: TcxGridDBColumn
Caption = #31859#38271
DataBinding.FieldName = 'MLen'
HeaderAlignmentHorz = taCenter
Width = 67
end
object cxGridDBColumn11: TcxGridDBColumn
Tag = 2
Caption = #22383#24067#21378
DataBinding.FieldName = 'PBFactory'
HeaderAlignmentHorz = taCenter
Width = 64
end
object cxGridDBColumn12: TcxGridDBColumn
Tag = 2
Caption = #26579#21378
DataBinding.FieldName = 'RCFactory'
HeaderAlignmentHorz = taCenter
Width = 59
end
object cxGridDBColumn13: TcxGridDBColumn
Tag = 2
Caption = #21518#21152#24037#21378
DataBinding.FieldName = 'HJGFactory'
HeaderAlignmentHorz = taCenter
Width = 62
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv2
end
end
object cxSplitter1: TcxSplitter
Left = 0
Top = 480
Width = 1083
Height = 8
HotZoneClassName = 'TcxMediaPlayer9Style'
AlignSplitter = salBottom
Control = cxGrid2
end
object DataSource1: TDataSource
DataSet = ADOQueryPrint
Left = 395
Top = 91
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_DDMD.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 341
Top = 265
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_DDMD.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 933
Top = 73
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_DDMD.ADOLink
Parameters = <>
Left = 965
Top = 81
end
object cxGridPopupMenu1: TcxGridPopupMenu
PopupMenus = <>
Left = 528
Top = 216
end
object DataSource2: TDataSource
DataSet = CDS_Main
Left = 491
Top = 211
end
object ADOQueryMain: TADOQuery
Connection = DataLink_DDMD.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 453
Top = 209
end
object CDS_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 416
Top = 208
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, 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 = RMDB_Main
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 368
Top = 256
ReportData = {}
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_Main
Left = 424
Top = 296
end
object ODPat: TOpenDialog
Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
Left = 900
Top = 189
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 901
Top = 228
end
object SaveDialog1: TSaveDialog
Left = 905
Top = 277
end
object RM2: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, 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 = RMDBDataSet1
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 488
Top = 312
ReportData = {}
end
object RMDBDataSet1: TRMDBDataSet
Visible = True
DataSet = ADOQueryPrint
Left = 528
Top = 304
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 = 640
Top = 216
end
object ClientDataSet2: TClientDataSet
Aggregates = <>
Params = <>
Left = 640
Top = 536
end
object DataSource3: TDataSource
DataSet = ClientDataSet2
Left = 675
Top = 539
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 704
Top = 536
end
end