D10gmBitao/T03贸易布匹检验/U_TradePACKETPrint.dfm
“username” cebba7d3b2 111
2025-04-15 20:16:06 +08:00

592 lines
16 KiB
Plaintext

inherited frmTradePACKETPrint: TfrmTradePACKETPrint
Left = 347
Top = 169
Caption = #20844#21496#31649#29702
ClientHeight = 611
ClientWidth = 1366
FormStyle = fsMDIChild
Position = poScreenCenter
Visible = True
ExplicitWidth = 1382
ExplicitHeight = 650
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1366
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_TradeInsp.ImageList_new32
GradientEndColor = 15717318
Images = DataLink_TradeInsp.ImageList_new32
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 1
OnClick = TBRafreshClick
end
object btnFind: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 0
OnClick = btnFindClick
end
object ToolButton2: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 237
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object cxGrid1: TcxGrid [1]
Left = 0
Top = 182
Width = 684
Height = 429
Align = alLeft
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v2Column10
end
item
Kind = skSum
Column = Tv1Column3
end
item
Kind = skSum
Column = Tv1Column4
end
item
Kind = skSum
Column = Tv1Column5
end
item
Kind = skCount
Column = Tv1Column1
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsSelection.CellSelect = False
OptionsSelection.MultiSelect = True
OptionsSelection.CheckBoxVisibility = [cbvDataRow, cbvColumnHeader]
OptionsView.GroupByBox = False
object v2Column2: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'C_Code'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 86
end
object v2Column6: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'C_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 127
end
object Tv1Column6: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'C_Width'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 67
end
object Tv1Column7: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'C_GramWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 65
end
object Tv1Column1: TcxGridDBColumn
Caption = #21367#26465#30721
DataBinding.FieldName = 'CIID'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 91
end
object Tv1Column2: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'PieceNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 60
end
object v2Column10: TcxGridDBColumn
Caption = #31859#25968
DataBinding.FieldName = 'Meter'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 60
end
object Tv1Column3: TcxGridDBColumn
Caption = #30721#25968
DataBinding.FieldName = 'Yardage'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 60
end
object Tv1Column4: TcxGridDBColumn
Caption = #27611#37325
DataBinding.FieldName = 'GrossWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 60
end
object Tv1Column5: TcxGridDBColumn
Caption = #20928#37325
DataBinding.FieldName = 'NetWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 60
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv1
end
end
object Panel1: TPanel [2]
Left = 0
Top = 38
Width = 1366
Height = 144
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = 16242829
ParentBackground = False
TabOrder = 2
object Label1: TLabel
Left = 54
Top = 29
Width = 144
Height = 35
Caption = #26631#31614#25195#25551
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -35
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 99
Top = 94
Width = 100
Height = 24
Caption = #20221#25968#35774#32622
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object edtScan: TEdit
Tag = 2
Left = 217
Top = 25
Width = 334
Height = 43
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -35
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnKeyPress = edtScanKeyPress
end
object ComboBox1: TComboBox
Left = 217
Top = 91
Width = 62
Height = 32
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemIndex = 1
ParentFont = False
TabOrder = 1
Text = '2'
Items.Strings = (
'1'
'2'
'3'
'4')
end
object Button3: TButton
Left = 412
Top = 92
Width = 91
Height = 34
Caption = #37325#25171
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = Button3Click
end
object btn1: TButton
Left = 578
Top = 17
Width = 205
Height = 62
Caption = #25171#21360
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = btn1Click
end
end
object cxGrid2: TcxGrid [3]
Left = 684
Top = 182
Width = 682
Height = 429
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_2
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = cxgrdbclmn5
end
item
Kind = skSum
Column = cxgrdbclmn6
end
item
Kind = skSum
Column = cxgrdbclmn7
end
item
Kind = skSum
Column = cxgrdbclmn8
end
item
Kind = skCount
Column = cxgrdbclmn3
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsSelection.CellSelect = False
OptionsSelection.MultiSelect = True
OptionsSelection.CheckBoxVisibility = [cbvDataRow, cbvColumnHeader]
OptionsView.GroupByBox = False
object cxgrdbclmn1: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'C_Code'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 86
end
object cxgrdbclmn2: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'C_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 127
end
object Tv2Column1: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'C_Width'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 67
end
object Tv2Column2: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'C_GramWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
end
object cxgrdbclmn3: TcxGridDBColumn
Caption = #21367#26465#30721
DataBinding.FieldName = 'CIID'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 91
end
object cxgrdbclmn4: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'PieceNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 60
end
object cxgrdbclmn5: TcxGridDBColumn
Caption = #31859#25968
DataBinding.FieldName = 'Meter'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 60
end
object cxgrdbclmn6: TcxGridDBColumn
Caption = #30721#25968
DataBinding.FieldName = 'Yardage'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 60
end
object cxgrdbclmn7: TcxGridDBColumn
Caption = #27611#37325
DataBinding.FieldName = 'GrossWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 60
end
object cxgrdbclmn8: TcxGridDBColumn
Caption = #20928#37325
DataBinding.FieldName = 'NetWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 60
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv2
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
Left = 145
Top = 392
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
Left = 81
Top = 385
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 285
Top = 377
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
Parameters = <>
Left = 373
Top = 377
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 229
Top = 377
end
object GPM_1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 312
Top = 296
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 499
Top = 283
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 424
Top = 264
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 552
Top = 400
end
object RMDB_1: TRMDBDataSet
Visible = True
DataSet = CDS_Print
Left = 660
Top = 400
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbExport, rmpbNavigator]
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_1
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 708
Top = 400
ReportData = {}
end
object cxStyleRepository1: TcxStyleRepository
PixelsPerInch = 96
object cxStyle1: TcxStyle
AssignedValues = [svFont]
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
end
end
object CDS_Print: TClientDataSet
Aggregates = <>
Params = <>
Left = 600
Top = 400
end
object DS_2: TDataSource
DataSet = CDS_2
Left = 1015
Top = 297
end
object CDS_2: TClientDataSet
Aggregates = <>
Params = <>
Left = 949
Top = 300
end
end