D7DJkairan/坯布码单待检(PBMDDJ.dll)/U_ContractList.dfm

943 lines
24 KiB
Plaintext
Raw Permalink Normal View History

2025-07-19 13:52:55 +08:00
object frmContractList: TfrmContractList
Left = 39
Top = 71
Width = 1249
Height = 594
2025-04-30 19:46:29 +08:00
Caption = #35746#21333#21512#21516
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
2025-07-19 13:52:55 +08:00
Width = 1233
2025-04-30 19:46:29 +08:00
AutoSize = True
ButtonHeight = 30
2025-07-19 13:52:55 +08:00
ButtonWidth = 83
2025-04-30 19:46:29 +08:00
Caption = 'ToolBar1'
Color = clSkyBlue
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
2025-07-19 13:52:55 +08:00
Images = DataLink_DDMD.ThreeImgList
2025-04-30 19:46:29 +08:00
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
2025-07-19 13:52:55 +08:00
ImageIndex = 0
2025-04-30 19:46:29 +08:00
OnClick = TBRafreshClick
end
object TBFind: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #36807#28388
2025-07-19 13:52:55 +08:00
ImageIndex = 20
2025-04-30 19:46:29 +08:00
OnClick = TBFindClick
end
object TBAdd: TToolButton
2025-07-19 13:52:55 +08:00
Left = 126
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
Caption = #26032#22686
2025-07-19 13:52:55 +08:00
ImageIndex = 1
2025-04-30 19:46:29 +08:00
OnClick = TBAddClick
end
object TBEdit: TToolButton
2025-07-19 13:52:55 +08:00
Left = 189
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
Caption = #20462#25913
2025-07-19 13:52:55 +08:00
ImageIndex = 11
2025-04-30 19:46:29 +08:00
OnClick = TBEditClick
end
object ToolButton2: TToolButton
2025-07-19 13:52:55 +08:00
Left = 252
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
Caption = #22797#21046
2025-07-19 13:52:55 +08:00
ImageIndex = 38
2025-04-30 19:46:29 +08:00
OnClick = ToolButton2Click
end
object ToolButton1: TToolButton
2025-07-19 13:52:55 +08:00
Left = 315
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
Caption = #26597#30475
2025-07-19 13:52:55 +08:00
ImageIndex = 55
2025-04-30 19:46:29 +08:00
OnClick = ToolButton1Click
end
object TBDel: TToolButton
2025-07-19 13:52:55 +08:00
Left = 378
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
Caption = #21024#38500
2025-07-19 13:52:55 +08:00
ImageIndex = 13
2025-04-30 19:46:29 +08:00
OnClick = TBDelClick
end
2025-07-19 13:52:55 +08:00
object ToolButton3: TToolButton
Left = 441
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
2025-07-19 13:52:55 +08:00
Caption = #36865#23457
ImageIndex = 22
OnClick = ToolButton3Click
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object ToolButton4: TToolButton
Left = 504
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
2025-07-19 13:52:55 +08:00
Caption = #36865#23457#25764#38144
ImageIndex = 52
OnClick = ToolButton4Click
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object ToolButton5: TToolButton
Left = 591
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
2025-07-19 13:52:55 +08:00
Caption = #20316#24223#36865#23457
ImageIndex = 32
OnClick = ToolButton5Click
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object ToolButton6: TToolButton
Left = 678
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
2025-07-19 13:52:55 +08:00
Caption = #20316#24223#25764#38144
ImageIndex = 52
OnClick = ToolButton6Click
2025-04-30 19:46:29 +08:00
end
object TBExport: TToolButton
2025-07-19 13:52:55 +08:00
Left = 765
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
Caption = #23548#20986
2025-07-19 13:52:55 +08:00
ImageIndex = 6
2025-04-30 19:46:29 +08:00
OnClick = TBExportClick
end
object TBPrint: TToolButton
2025-07-19 13:52:55 +08:00
Left = 828
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
Caption = #25171#21360
2025-07-19 13:52:55 +08:00
ImageIndex = 4
2025-04-30 19:46:29 +08:00
OnClick = TBPrintClick
end
object TBClose: TToolButton
2025-07-19 13:52:55 +08:00
Left = 891
2025-04-30 19:46:29 +08:00
Top = 0
AutoSize = True
Caption = #20851#38381
2025-07-19 13:52:55 +08:00
ImageIndex = 21
2025-04-30 19:46:29 +08:00
OnClick = TBCloseClick
end
2025-07-19 13:52:55 +08:00
object ComboBox1: TComboBox
Left = 954
Top = 3
Width = 145
Height = 24
DropDownCount = 10
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 16
ParentFont = False
TabOrder = 0
end
2025-04-30 19:46:29 +08:00
end
object cxGrid1: TcxGrid
2025-07-19 13:52:55 +08:00
Left = -7
Top = 125
Width = 1224
Height = 220
2025-04-30 19:46:29 +08:00
TabOrder = 1
object Tv1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
OnFocusedRecordChanged = Tv1FocusedRecordChanged
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
2025-07-19 13:52:55 +08:00
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1MPRTCF
end
item
Kind = skSum
Column = v1PRTOrderQty
end
item
Kind = skSum
Column = v1Column14
end
item
Kind = skSum
Column = v1Column15
end
item
Kind = skSum
Column = v1Column16
end>
2025-04-30 19:46:29 +08:00
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
2025-07-19 13:52:55 +08:00
OptionsSelection.CellSelect = False
2025-04-30 19:46:29 +08:00
OptionsView.Footer = True
OptionsView.GroupByBox = False
2025-07-19 13:52:55 +08:00
Styles.Inactive = DataLink_DDMD.SHuangSe
Styles.IncSearch = DataLink_DDMD.SHuangSe
Styles.Selection = DataLink_DDMD.SHuangSe
2025-04-30 19:46:29 +08:00
Styles.OnGetContentStyle = Tv1StylesGetContentStyle
2025-07-19 13:52:55 +08:00
Styles.Header = DataLink_DDMD.Default
2025-04-30 19:46:29 +08:00
object v1Column4: TcxGridDBColumn
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.NullStyle = nssUnchecked
Visible = False
HeaderAlignmentHorz = taCenter
Width = 49
end
object v1ConNo: TcxGridDBColumn
Caption = #21512#21516#21495
DataBinding.FieldName = 'ConNo'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
2025-07-19 13:52:55 +08:00
Styles.Header = DataLink_DDMD.Default
2025-04-30 19:46:29 +08:00
Width = 73
end
object v1Column1: TcxGridDBColumn
2025-07-19 13:52:55 +08:00
Caption = #20844#21496#25260#22836
2025-04-30 19:46:29 +08:00
DataBinding.FieldName = 'SYRName'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
2025-07-19 13:52:55 +08:00
Width = 96
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object v1OrdDate: TcxGridDBColumn
Caption = #21046#21333#26085#26399
DataBinding.FieldName = 'OrdDate'
PropertiesClassName = 'TcxDateEditProperties'
Properties.ShowTime = False
2025-04-30 19:46:29 +08:00
HeaderAlignmentHorz = taCenter
Options.Focusing = False
2025-07-19 13:52:55 +08:00
Styles.Header = DataLink_DDMD.Default
Width = 68
2025-04-30 19:46:29 +08:00
end
object v1CustomerNoName: TcxGridDBColumn
2025-07-19 13:52:55 +08:00
Caption = #23458#25143
2025-04-30 19:46:29 +08:00
DataBinding.FieldName = 'CustomerNoName'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
2025-07-19 13:52:55 +08:00
Styles.Header = DataLink_DDMD.Default
Width = 62
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object v1Column13: TcxGridDBColumn
Caption = #20184#27454#26041#24335
DataBinding.FieldName = 'PayMent'
2025-04-30 19:46:29 +08:00
HeaderAlignmentHorz = taCenter
2025-07-19 13:52:55 +08:00
Width = 111
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object v1Column8: TcxGridDBColumn
Caption = #25903#20184#26041#24335
DataBinding.FieldName = 'ZFPayment'
2025-04-30 19:46:29 +08:00
HeaderAlignmentHorz = taCenter
2025-07-19 13:52:55 +08:00
Options.Editing = False
Width = 96
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object v1Column17: TcxGridDBColumn
Caption = #20215#26684#26465#27454
DataBinding.FieldName = 'PriceTK'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 102
end
object v1Column7: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'PRTCode'
HeaderAlignmentHorz = taCenter
Width = 71
end
object v1MPRTCodeName: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'PRTCodeName'
2025-04-30 19:46:29 +08:00
HeaderAlignmentHorz = taCenter
Options.Focusing = False
2025-07-19 13:52:55 +08:00
Styles.Header = DataLink_DDMD.Default
Width = 73
end
object v1Column9: TcxGridDBColumn
Caption = #25104#20998
DataBinding.FieldName = 'PRTCF'
HeaderAlignmentHorz = taCenter
2025-04-30 19:46:29 +08:00
Width = 67
end
2025-07-19 13:52:55 +08:00
object v1Column10: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'PRTSpec'
2025-04-30 19:46:29 +08:00
HeaderAlignmentHorz = taCenter
2025-07-19 13:52:55 +08:00
Width = 85
end
object v1Column11: TcxGridDBColumn
Caption = #38376#24133'cm'
DataBinding.FieldName = 'PRTMF'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 75
end
object v1Column12: TcxGridDBColumn
Caption = #20811#37325'g/'#13217
DataBinding.FieldName = 'PRTKZ'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 84
2025-04-30 19:46:29 +08:00
end
object v1PRTOrderQty: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'PRTOrderQty'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
2025-07-19 13:52:55 +08:00
Styles.Header = DataLink_DDMD.Default
2025-04-30 19:46:29 +08:00
Width = 67
end
object v1Column2: TcxGridDBColumn
Caption = #25968#37327#21333#20301
DataBinding.FieldName = 'OrderUnit'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
2025-07-19 13:52:55 +08:00
Width = 60
end
object v1PRTPrice: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'PRTPrice'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Header = DataLink_DDMD.Default
Width = 71
end
object v1PRTColor: TcxGridDBColumn
Caption = #24065#31181
DataBinding.FieldName = 'PriceUnit'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Header = DataLink_DDMD.Default
Width = 63
2025-04-30 19:46:29 +08:00
end
object v1MPRTCF: TcxGridDBColumn
2025-07-19 13:52:55 +08:00
Caption = #37329#39069
DataBinding.FieldName = 'PRTMoney'
2025-04-30 19:46:29 +08:00
HeaderAlignmentHorz = taCenter
Options.Focusing = False
2025-07-19 13:52:55 +08:00
Styles.Header = DataLink_DDMD.Default
Width = 69
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object v1Column14: TcxGridDBColumn
Caption = #23450#37329
DataBinding.FieldName = 'DJMoney'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object v1Column15: TcxGridDBColumn
Caption = #24050#20998#37197#23450#37329
DataBinding.FieldName = 'FPDJMoney'
Options.Editing = False
Width = 72
end
object v1Column16: TcxGridDBColumn
Caption = #26410#20998#37197#23450#37329
DataBinding.FieldName = 'WFPDJMoney'
Options.Editing = False
Width = 72
end
object v1MPRTMF: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'PRTNote'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Header = DataLink_DDMD.Default
Width = 70
end
object v1Column3: TcxGridDBColumn
Caption = #23457#26680#20154
DataBinding.FieldName = 'Chker'
HeaderAlignmentHorz = taCenter
Width = 58
end
object v1Column5: TcxGridDBColumn
Caption = #23457#26680#26102#38388
DataBinding.FieldName = 'ChkTime'
HeaderAlignmentHorz = taCenter
Width = 60
end
object v1Column6: TcxGridDBColumn
Caption = #23457#26680#29366#24577
DataBinding.FieldName = 'ChkStatus'
HeaderAlignmentHorz = taCenter
Width = 56
end
object v1Column21: TcxGridDBColumn
Caption = #24050#20316#24223
DataBinding.FieldName = 'ZuoFeiFlag'
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.NullStyle = nssUnchecked
Properties.ReadOnly = True
HeaderAlignmentHorz = taCenter
Width = 49
end
object v1Column18: TcxGridDBColumn
Caption = #23457#25209#20154
DataBinding.FieldName = 'PChker'
2025-04-30 19:46:29 +08:00
HeaderAlignmentHorz = taCenter
2025-07-19 13:52:55 +08:00
Options.Editing = False
Width = 67
end
object v1Column19: TcxGridDBColumn
Caption = #23457#25209#26102#38388
DataBinding.FieldName = 'PChkTime'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 68
end
object v1Column20: TcxGridDBColumn
Caption = #23457#25209#29366#24577
DataBinding.FieldName = 'PChkStatus'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 68
2025-04-30 19:46:29 +08:00
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object Panel1: TPanel
Left = 0
Top = 32
2025-07-19 13:52:55 +08:00
Width = 1233
Height = 67
2025-04-30 19:46:29 +08:00
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 2
object Label1: TLabel
Left = 23
Top = 15
Width = 52
Height = 12
Caption = #21046#21333#26085#26399
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
2025-07-19 13:52:55 +08:00
Left = 177
Top = 39
2025-04-30 19:46:29 +08:00
Width = 40
Height = 12
2025-07-19 13:52:55 +08:00
Caption = #23458' '#25143
2025-04-30 19:46:29 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
2025-07-19 13:52:55 +08:00
object Label6: TLabel
Left = 311
2025-04-30 19:46:29 +08:00
Top = 15
Width = 52
Height = 12
2025-07-19 13:52:55 +08:00
Caption = #20844#21496#25260#22836
2025-04-30 19:46:29 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
2025-07-19 13:52:55 +08:00
Left = 177
2025-04-30 19:46:29 +08:00
Top = 15
Width = 39
Height = 12
Caption = #21512#21516#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
2025-07-19 13:52:55 +08:00
object Label2: TLabel
Left = 311
Top = 40
Width = 52
2025-04-30 19:46:29 +08:00
Height = 12
2025-07-19 13:52:55 +08:00
Caption = #20135#21697#32534#21495
2025-04-30 19:46:29 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
2025-07-19 13:52:55 +08:00
object Label3: TLabel
Left = 463
Top = 15
2025-04-30 19:46:29 +08:00
Width = 26
Height = 12
2025-07-19 13:52:55 +08:00
Caption = #35268#26684
2025-04-30 19:46:29 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
2025-07-19 13:52:55 +08:00
object Label5: TLabel
Left = 463
Top = 40
Width = 26
2025-04-30 19:46:29 +08:00
Height = 12
2025-07-19 13:52:55 +08:00
Caption = #25104#20998
2025-04-30 19:46:29 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BegDate: TDateTimePicker
Left = 76
Top = 11
Width = 85
Height = 20
Date = 40675.464742650460000000
Format = 'yyyy-MM-dd'
Time = 40675.464742650460000000
TabOrder = 0
end
object EndDate: TDateTimePicker
2025-07-19 13:52:55 +08:00
Left = 76
Top = 36
2025-04-30 19:46:29 +08:00
Width = 86
Height = 20
Date = 40675.464761099540000000
Format = 'yyyy-MM-dd'
Time = 40675.464761099540000000
TabOrder = 1
end
object CustomerNoName: TEdit
Tag = 2
2025-07-19 13:52:55 +08:00
Left = 218
Top = 35
Width = 77
2025-04-30 19:46:29 +08:00
Height = 20
TabOrder = 2
OnChange = CustomerNoNameChange
end
2025-07-19 13:52:55 +08:00
object SYRName: TEdit
2025-04-30 19:46:29 +08:00
Tag = 2
2025-07-19 13:52:55 +08:00
Left = 364
2025-04-30 19:46:29 +08:00
Top = 11
2025-07-19 13:52:55 +08:00
Width = 77
2025-04-30 19:46:29 +08:00
Height = 20
TabOrder = 3
OnChange = CustomerNoNameChange
end
2025-07-19 13:52:55 +08:00
object ConNo: TEdit
2025-04-30 19:46:29 +08:00
Tag = 2
2025-07-19 13:52:55 +08:00
Left = 218
Top = 11
Width = 77
2025-04-30 19:46:29 +08:00
Height = 20
TabOrder = 4
OnChange = CustomerNoNameChange
2025-07-19 13:52:55 +08:00
OnKeyPress = ConNoKeyPress
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object PRTCode: TEdit
2025-04-30 19:46:29 +08:00
Tag = 2
2025-07-19 13:52:55 +08:00
Left = 364
Top = 36
2025-04-30 19:46:29 +08:00
Width = 77
Height = 20
TabOrder = 5
OnChange = CustomerNoNameChange
end
2025-07-19 13:52:55 +08:00
object PRTSpec: TEdit
2025-04-30 19:46:29 +08:00
Tag = 2
2025-07-19 13:52:55 +08:00
Left = 489
Top = 11
Width = 77
2025-04-30 19:46:29 +08:00
Height = 20
TabOrder = 6
OnChange = CustomerNoNameChange
end
2025-07-19 13:52:55 +08:00
object PRTCF: TEdit
2025-04-30 19:46:29 +08:00
Tag = 2
2025-07-19 13:52:55 +08:00
Left = 489
Top = 36
Width = 77
2025-04-30 19:46:29 +08:00
Height = 20
TabOrder = 7
OnChange = CustomerNoNameChange
end
end
object cxTabControl1: TcxTabControl
Left = 0
2025-07-19 13:52:55 +08:00
Top = 99
Width = 1233
Height = 21
2025-04-30 19:46:29 +08:00
Align = alTop
2025-07-19 13:52:55 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Style = 8
2025-04-30 19:46:29 +08:00
TabIndex = 0
TabOrder = 3
Tabs.Strings = (
2025-07-19 13:52:55 +08:00
#24453#36865#23457
#24050#36865#23457
#24050#20316#24223
2025-04-30 19:46:29 +08:00
#20840#37096)
OnChange = cxTabControl1Change
2025-07-19 13:52:55 +08:00
ClientRectBottom = 23
ClientRectRight = 1233
ClientRectTop = 23
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object Panel2: TPanel
2025-04-30 19:46:29 +08:00
Left = 0
2025-07-19 13:52:55 +08:00
Top = 360
Width = 1233
Height = 195
2025-04-30 19:46:29 +08:00
Align = alBottom
2025-07-19 13:52:55 +08:00
BevelInner = bvRaised
BevelOuter = bvLowered
2025-04-30 19:46:29 +08:00
TabOrder = 4
2025-07-19 13:52:55 +08:00
object Label7: TLabel
Left = 2
Top = 2
Width = 13
Height = 191
Align = alLeft
Caption = #13#10#13#10#13#10#23450#13#10#13#10#37329#13#10#13#10#20998#13#10#13#10#37197
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Panel3: TPanel
Left = 15
Top = 2
Width = 66
Height = 191
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object Button1: TButton
Left = 4
Top = 28
Width = 57
Height = 22
Caption = #22686#21152
TabOrder = 0
OnClick = Button1Click
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object Button2: TButton
Left = 4
Top = 68
Width = 57
Height = 22
Caption = #21024#38500
TabOrder = 1
OnClick = Button2Click
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object Button3: TButton
Left = 4
Top = 108
Width = 57
Height = 22
Caption = #20445#23384
TabOrder = 2
OnClick = Button3Click
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
end
object cxGrid2: TcxGrid
Left = 81
Top = 2
Width = 1150
Height = 191
Align = alClient
TabOrder = 1
object Tv2: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
NavigatorButtons.Delete.Enabled = False
NavigatorButtons.Delete.Visible = False
DataController.DataSource = DataSource2
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
2025-04-30 19:46:29 +08:00
item
2025-07-19 13:52:55 +08:00
Format = '0'
Position = spFooter
end
2025-04-30 19:46:29 +08:00
item
2025-07-19 13:52:55 +08:00
Format = '0'
Position = spFooter
end
item
Format = '0'
Position = spFooter
end
2025-04-30 19:46:29 +08:00
item
2025-07-19 13:52:55 +08:00
Format = '0'
Position = spFooter
Column = VYB
end
item
Format = '0'
Position = spFooter
2025-04-30 19:46:29 +08:00
end>
2025-07-19 13:52:55 +08:00
DataController.Summary.FooterSummaryItems = <
2025-04-30 19:46:29 +08:00
item
2025-07-19 13:52:55 +08:00
Kind = skSum
Column = v2Column2
2025-04-30 19:46:29 +08:00
end>
2025-07-19 13:52:55 +08:00
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Inactive = DataLink_DDMD.SHuangSe
Styles.IncSearch = DataLink_DDMD.SHuangSe
Styles.Selection = DataLink_DDMD.SHuangSe
Styles.Header = DataLink_DDMD.Default
object VDate: TcxGridDBColumn
Tag = 2
Caption = #20998#37197#26085#26399
DataBinding.FieldName = 'FPDate'
PropertiesClassName = 'TcxDateEditProperties'
Properties.SaveTime = False
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Width = 110
end
object v2Column3: TcxGridDBColumn
Caption = #25910#27454#26085#26399
DataBinding.FieldName = 'CRTime'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object v2Column1: TcxGridDBColumn
Tag = 2
Caption = #24065#31181
DataBinding.FieldName = 'BZType'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
'$'
#65509
#8364)
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 64
end
object VYB: TcxGridDBColumn
Tag = 2
Caption = #25910#27454#37329#39069
DataBinding.FieldName = 'Money'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 77
end
object v2Column2: TcxGridDBColumn
Caption = #20998#37197#23450#37329
DataBinding.FieldName = 'FPMoney'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 70
end
object VNote: TcxGridDBColumn
Tag = 2
Caption = #22791#27880
DataBinding.FieldName = 'Note'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 127
end
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object cxGridLevel1: TcxGridLevel
GridView = Tv2
2025-04-30 19:46:29 +08:00
end
end
end
object cxSplitter1: TcxSplitter
Left = 0
2025-07-19 13:52:55 +08:00
Top = 352
Width = 1233
2025-04-30 19:46:29 +08:00
Height = 8
HotZoneClassName = 'TcxMediaPlayer9Style'
AlignSplitter = salBottom
2025-07-19 13:52:55 +08:00
Control = Panel2
Visible = False
2025-04-30 19:46:29 +08:00
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 544
Top = 176
end
object ADOQueryCmd: TADOQuery
2025-07-19 13:52:55 +08:00
Connection = DataLink_DDMD.ADOLink
2025-04-30 19:46:29 +08:00
Parameters = <>
Left = 688
Top = 224
end
object ADOQueryMain: TADOQuery
2025-07-19 13:52:55 +08:00
Connection = DataLink_DDMD.ADOLink
2025-04-30 19:46:29 +08:00
LockType = ltReadOnly
Parameters = <>
Left = 552
Top = 216
end
object ADOQueryTemp: TADOQuery
2025-07-19 13:52:55 +08:00
Connection = DataLink_DDMD.ADOLink
2025-04-30 19:46:29 +08:00
LockType = ltReadOnly
Parameters = <>
Left = 312
Top = 248
end
object DataSource1: TDataSource
DataSet = Order_Main
Left = 440
Top = 184
end
object Order_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 464
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 = RMDBDataSet1
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 336
Top = 200
ReportData = {}
end
object RMDBDataSet1: TRMDBDataSet
Visible = True
2025-07-19 13:52:55 +08:00
DataSet = CDS_Print
2025-04-30 19:46:29 +08:00
Left = 392
Top = 200
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 = 576
Top = 248
end
object PopupMenu1: TPopupMenu
Left = 288
Top = 184
object N2: TMenuItem
Caption = #26377#20379#24212#21830
end
end
object ADOQueryPrint: TADOQuery
2025-07-19 13:52:55 +08:00
Connection = DataLink_DDMD.ADOLink
2025-04-30 19:46:29 +08:00
LockType = ltReadOnly
Parameters = <>
Left = 360
Top = 240
end
object CDS_Print: TClientDataSet
Aggregates = <>
Params = <>
2025-07-19 13:52:55 +08:00
Left = 448
Top = 248
2025-04-30 19:46:29 +08:00
end
2025-07-19 13:52:55 +08:00
object ClientDataSet2: TClientDataSet
Aggregates = <>
Params = <>
Left = 400
Top = 440
2025-04-30 19:46:29 +08:00
end
object DataSource2: TDataSource
2025-07-19 13:52:55 +08:00
DataSet = ClientDataSet2
Left = 368
2025-04-30 19:46:29 +08:00
Top = 440
end
2025-07-19 13:52:55 +08:00
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 520
Top = 424
end
object CDS_PRT10: TClientDataSet
Aggregates = <>
Params = <>
Left = 520
Top = 264
end
object RMDBDataSet2: TRMDBDataSet
Visible = True
DataSet = CDS_PRT10
Left = 408
Top = 256
end
2025-04-30 19:46:29 +08:00
end