RTFormwork/项目代码/RTBasicsV1/E02梭织经轴仓库/U_TatWBCardInPut.dfm

947 lines
25 KiB
Plaintext
Raw Normal View History

2024-07-07 09:35:27 +08:00
inherited frmTatWBCardInPut: TfrmTatWBCardInPut
Left = -35
Top = 98
Caption = #32463#36724#35745#21010
ClientHeight = 516
ClientWidth = 1507
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Height = -12
Font.Name = #23435#20307
Position = poMainFormCenter
OnClose = FormClose
ExplicitWidth = 1523
ExplicitHeight = 555
PixelsPerInch = 96
TextHeight = 12
object Panel2: TPanel [0]
Left = 0
Top = 0
Width = 1507
Height = 516
Align = alClient
TabOrder = 0
object Panel4: TPanel
Left = 332
Top = 195
Width = 1174
Height = 320
Align = alClient
Caption = 'Panel4'
TabOrder = 0
object cxGrid2: TcxGrid
Left = 1
Top = 39
Width = 1172
Height = 280
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 0
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DS_Card
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Header = DataLink_WarpBeamStk.Default
object cxGridDBColumn1: TcxGridDBColumn
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
HeaderAlignmentHorz = taCenter
Width = 49
end
object TV2Column8: TcxGridDBColumn
Caption = #25972#32463#21333#21495
DataBinding.FieldName = 'WBCNO'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 82
end
object TV2Column7: TcxGridDBColumn
Caption = #30424#22836
DataBinding.FieldName = 'WBTray'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 76
end
object V2Column4: TcxGridDBColumn
Caption = #36724#21345#21495
DataBinding.FieldName = 'WBCID'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object V2Column1: TcxGridDBColumn
Caption = #19978#25490
DataBinding.FieldName = 'WB_YarnArr'
HeaderAlignmentHorz = taCenter
Options.Editing = False
end
object TV2Column6: TcxGridDBColumn
Caption = #32463#32534#21495
DataBinding.FieldName = 'WB_Code'
HeaderAlignmentHorz = taCenter
Width = 84
end
object TV2Column5: TcxGridDBColumn
Caption = #32463#35268#26684
DataBinding.FieldName = 'WB_Spec'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 78
end
object V2Column3: TcxGridDBColumn
Caption = #25972#32463#26426#21495
DataBinding.FieldName = 'WB_MachNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 71
end
object TV2Column4: TcxGridDBColumn
Caption = #25972#32463#38271#24230
DataBinding.FieldName = 'WB_YarnLen'
end
object cxGridDBColumn15: TcxGridDBColumn
Caption = #36724#38271
DataBinding.FieldName = 'WB_Len'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_WarpBeamStk.Default
Width = 65
end
object cxGridDBColumn9: TcxGridDBColumn
Caption = #25190#32463#24037
DataBinding.FieldName = 'WB_Macher'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 68
end
object cxGridDBColumn10: TcxGridDBColumn
Caption = #22836#32441
DataBinding.FieldName = 'WB_YarnQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_WarpBeamStk.Default
Width = 68
end
object TV2Column1: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'WB_Type'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object TV2Column2: TcxGridDBColumn
Caption = #21305#39069
DataBinding.FieldName = 'WB_ClothPiece'
HeaderAlignmentHorz = taCenter
end
object TV2Column3: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
HeaderAlignmentHorz = taCenter
Width = 146
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV2
end
end
object ToolBar1: TToolBar
Tag = 1
Left = 1
Top = 1
Width = 1172
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
DisabledImages = DataLink_WarpBeamStk.ImageList_new32
EdgeInner = esNone
EdgeOuter = esNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_WarpBeamStk.ImageList_new32
List = True
ParentFont = False
ShowCaptions = True
TabOrder = 1
object ToolButton4: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #35745#21010#21333
ImageIndex = 12
OnClick = ToolButton4Click
end
object TBSave: TToolButton
Left = 83
Top = 0
AutoSize = True
Caption = #24320#21345
ImageIndex = 16
OnClick = TBSaveClick
end
object ToolButton1: TToolButton
Left = 154
Top = 0
AutoSize = True
Caption = #25171#21360
ImageIndex = 21
OnClick = ToolButton1Click
end
object ToolButton8: TToolButton
Left = 225
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 5
OnClick = ToolButton8Click
end
object ToolButton2: TToolButton
Left = 296
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 391
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
end
object cxGrid1: TcxGrid
Left = 1
Top = 1
Width = 1505
Height = 194
Align = alTop
PopupMenu = PM_1
TabOrder = 1
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DS_1
DataController.Filter.AutoDataSetFilter = True
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
Column = v1Column6
end
item
Kind = skSum
Column = v1Column6
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1PRTOrderQty
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v1Column6
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Header = DataLink_WarpBeamStk.Default
object v1OrderNo: TcxGridDBColumn
Caption = #21512#21516#21495
DataBinding.FieldName = 'ConNo'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
object Tv1Column2: TcxGridDBColumn
Caption = #35745#21010#21333#21495
DataBinding.FieldName = 'OrderNo'
HeaderAlignmentHorz = taCenter
Width = 66
end
object v1Column31: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'CustName'
HeaderAlignmentHorz = taCenter
Width = 66
end
object v1Column5: TcxGridDBColumn
Caption = #19979#21333#26085#26399
DataBinding.FieldName = 'OrdDate'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
object Tv1Column1: TcxGridDBColumn
Caption = #21152#24037#21333#20301
DataBinding.FieldName = 'FtyCoName'
HeaderAlignmentHorz = taCenter
Width = 66
end
object v1Column19: TcxGridDBColumn
Caption = #20132#36135#26085#26399
DataBinding.FieldName = 'DlyDate'
PropertiesClassName = 'TcxDateEditProperties'
Properties.SaveTime = False
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
object v1Column21: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'C_Code'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
object v1Column2: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'C_Name'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
object v1Column20: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'C_Spec'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object v1PRTMF: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'C_Width'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
object v1PRTKZ: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'C_GramWeight'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
object v1Column7: TcxGridDBColumn
Caption = #19979#24067#21305#38271
DataBinding.FieldName = 'OrdPieceLen'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
object Tv1Column5: TcxGridDBColumn
Caption = #22836#32441
DataBinding.FieldName = 'C_YarnQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column6: TcxGridDBColumn
Caption = #32428#32433#35268#26684
DataBinding.FieldName = 'C_LatitudeSpec'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column7: TcxGridDBColumn
Caption = #32463#32433#35268#26684
DataBinding.FieldName = 'C_LongitudeSpec'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column8: TcxGridDBColumn
Caption = #31576#21495
DataBinding.FieldName = 'C_ReedNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object v1Column6: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'OrdPiece'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
object v1PRTOrderQty: TcxGridDBColumn
Caption = #24635#25968#37327
DataBinding.FieldName = 'OrdQty'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
object v1Column4: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'OrdSNote'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_WarpBeamStk.Default
Width = 66
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object Panel1: TPanel
Left = 1
Top = 195
Width = 331
Height = 320
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 2
object Label8: TLabel
Left = 179
Top = 153
Width = 40
Height = 12
Caption = #22836' '#32441
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 19
Top = 184
Width = 39
Height = 12
Caption = #25190#32463#24037
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 18
Top = 153
Width = 40
Height = 12
Caption = #36724' '#38271
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 18
Top = 16
Width = 40
Height = 12
Caption = #36724' '#25968
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 179
Top = 184
Width = 40
Height = 12
Caption = #19978' '#25490
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 179
Top = 60
Width = 40
Height = 12
Caption = #31867' '#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 19
Top = 127
Width = 39
Height = 12
Caption = #25972#32463#26426
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 179
Top = 213
Width = 40
Height = 12
Caption = #21305' '#39069
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 18
Top = 213
Width = 40
Height = 12
Caption = #38271' '#24230
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 18
Top = 240
Width = 40
Height = 12
Caption = #22791' '#27880
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 19
Top = 96
Width = 39
Height = 12
Caption = #32463#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 19
Top = 60
Width = 39
Height = 12
Caption = #25972#32463#21333
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 180
Top = 127
Width = 40
Height = 12
Caption = #30424' '#22836
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object WB_YarnQty: TEdit
Tag = 1
Left = 221
Top = 149
Width = 100
Height = 20
TabOrder = 0
end
object WB_Len: TEdit
Tag = 1
Left = 58
Top = 149
Width = 100
Height = 20
TabOrder = 1
end
object edtCardQty: TEdit
Tag = 99
Left = 58
Top = 12
Width = 256
Height = 20
TabOrder = 2
end
object WB_YarnArr: TEdit
Tag = 1
Left = 221
Top = 180
Width = 100
Height = 20
TabOrder = 3
end
object WB_Type: TComboBox
Tag = 1
Left = 221
Top = 56
Width = 100
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
Items.Strings = (
''
#22823#36135
#35797#26679)
end
object WB_ClothPiece: TEdit
Tag = 1
Left = 221
Top = 209
Width = 100
Height = 20
Hint = 'edtQJingG/'#25190#32463#24037
TabOrder = 5
end
object WB_MachNo: TBtnEditC
Tag = 1
Left = 58
Top = 123
Width = 100
Height = 20
Hint = 'WB_MachNo/'#25972#32463#26426
ReadOnly = True
TabOrder = 6
OnBtnUpClick = WB_MachNoBtnUpClick
OnBtnDnClick = WB_MachNoBtnDnClick
end
object WB_Macher: TBtnEditC
Tag = 1
Left = 58
Top = 180
Width = 100
Height = 20
Hint = 'WB_Macher/'#25190#32463#24037
ReadOnly = True
TabOrder = 7
OnBtnUpClick = WB_MachNoBtnUpClick
OnBtnDnClick = WB_MachNoBtnDnClick
end
object WB_YarnLen: TEdit
Tag = 1
Left = 58
Top = 209
Width = 100
Height = 20
TabOrder = 8
end
object Note: TRichEdit
Tag = 1
Left = 58
Top = 240
Width = 260
Height = 66
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 9
Zoom = 100
end
object WB_Code: TBtnEditC
Tag = 1
Left = 58
Top = 92
Width = 71
Height = 20
ReadOnly = True
TabOrder = 10
OnBtnUpClick = WB_CodeBtnUpClick
OnBtnDnClick = WB_CodeBtnDnClick
end
object WB_Spec: TEdit
Tag = 1
Left = 130
Top = 92
Width = 188
Height = 20
Enabled = False
TabOrder = 11
end
object WBCNO: TEdit
Tag = 1
Left = 58
Top = 56
Width = 100
Height = 20
ReadOnly = True
TabOrder = 12
end
object WBTray: TBtnEditC
Tag = 1
Left = 221
Top = 123
Width = 100
Height = 20
Hint = 'WBTray/'#30424#22836
ReadOnly = True
TabOrder = 13
OnBtnUpClick = WB_MachNoBtnUpClick
OnBtnDnClick = WB_MachNoBtnDnClick
end
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_WarpBeamStk.ADOLink
Left = 737
Top = 272
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_WarpBeamStk.ADOLink
Left = 601
Top = 281
end
inherited ImageList_new32: TImageList
Left = 680
Top = 416
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_WarpBeamStk.ADOLink
Parameters = <>
Left = 1060
Top = 264
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_WarpBeamStk.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 948
Top = 268
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbExport, rmpbNavigator]
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_1
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 364
Top = 384
ReportData = {}
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 = 776
Top = 416
end
object RMDB_1: TRMDBDataSet
Visible = True
DataSet = ADOQueryPrint
Left = 520
Top = 376
end
object DS_Card: TDataSource
DataSet = CDS_Card
Left = 476
Top = 284
end
object CDS_Card: TClientDataSet
Aggregates = <>
Params = <>
Left = 412
Top = 284
end
object GPM_1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 532
Top = 68
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_WarpBeamStk.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 436
Top = 376
end
object PopupMenu1: TPopupMenu
Left = 592
Top = 420
object N2: TMenuItem
Caption = #20840#36873
OnClick = N2Click
end
object N3: TMenuItem
Caption = #20840#24323
OnClick = N3Click
end
end
object GPM_2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 596
Top = 340
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 588
Top = 68
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 636
Top = 68
end
object PM_1: TPopupMenu
Left = 696
Top = 68
object N1: TMenuItem
Caption = #21024#38500
OnClick = N1Click
end
end
end