D7snShanfengT/山峰贸易管理/U_JWLKCList_MoneyMX.dfm

462 lines
12 KiB
Plaintext
Raw Normal View History

2026-02-26 09:41:35 +08:00
object frmJWLKCList_MoneyMX: TfrmJWLKCList_MoneyMX
Left = 370
Top = 202
Width = 1314
Height = 684
Caption = #26426#29289#26009#36153#29992#26126#32454#26597#35810
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
Width = 1298
Height = 33
ButtonHeight = 30
ButtonWidth = 119
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_TradeManage.ThreeImgList
Flat = True
Images = DataLink_TradeManage.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 2
OnClick = TBRafreshClick
end
object TBFind: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 59
OnClick = TBFindClick
end
object TJWL: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #26426#29289#26009#27719#24635#26597#30475
ImageIndex = 12
Visible = False
OnClick = TJWLClick
end
object TBClose: TToolButton
Left = 249
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 33
Width = 1298
Height = 40
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label1: TLabel
Left = 47
Top = 14
Width = 52
Height = 12
Caption = #26597#35810#26102#38388
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 193
Top = 14
Width = 52
Height = 12
Caption = #39046#29992#37096#38376
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 364
Top = 14
Width = 54
Height = 12
Caption = #31867' '#21035
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object EndDate: TDateTimePicker
Left = 102
Top = 10
Width = 75
Height = 20
Date = 40768.458268587970000000
Format = 'yyyy-MM'
Time = 40768.458268587970000000
TabOrder = 0
end
object LYDept: TEdit
Tag = 2
Left = 247
Top = 10
Width = 100
Height = 20
TabOrder = 1
OnChange = LYDeptChange
end
object YCLSpec: TComboBox
Tag = 2
Left = 419
Top = 10
Width = 100
Height = 20
ItemHeight = 12
TabOrder = 2
OnChange = LYDeptChange
end
end
object cxGrid1: TcxGrid
Left = 19
Top = 108
Width = 1067
Height = 389
TabOrder = 2
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = 'DefStr1'
end
item
Format = 'GYS'
Column = v1ShortName
end
item
Format = 'YCLCode'
Column = v1P_ChnName
end
item
Kind = skSum
Column = v1YCLMoney
end
item
Kind = skSum
Position = spFooter
Column = v1YCLMoney
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1Quantity
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v1YCLMoney
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Inactive = DataLink_TradeManage.SHuangSe
Styles.IncSearch = DataLink_TradeManage.SHuangSe
Styles.Selection = DataLink_TradeManage.SHuangSe
Styles.Header = DataLink_TradeManage.Default
object v1Column1: TcxGridDBColumn
Tag = 1
Caption = #20986#24211#26102#38388
DataBinding.FieldName = 'CRTime'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Width = 109
end
object v1DepotClass: TcxGridDBColumn
Caption = #20986#24211#31867#22411
DataBinding.FieldName = 'CRType'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Width = 96
end
object v1P_ChnName: TcxGridDBColumn
Tag = 2
Caption = #29289#26009#21517#31216
DataBinding.FieldName = 'YCLName10'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Width = 92
end
object v1Column2: TcxGridDBColumn
Tag = 2
Caption = #31867#22411
DataBinding.FieldName = 'YCLSpec10'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Width = 110
end
object v1ShortName: TcxGridDBColumn
Caption = #20379#24212#21830
DataBinding.FieldName = 'GYSName10'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Width = 79
end
object v1Column4: TcxGridDBColumn
Caption = #39046#29992#20154
DataBinding.FieldName = 'LYPerson'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 67
end
object v1Column5: TcxGridDBColumn
Caption = #37096#38376
DataBinding.FieldName = 'LYDept'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 67
end
object v1Quantity: TcxGridDBColumn
Caption = #20986#24211#25968#37327
DataBinding.FieldName = 'CRQty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Width = 73
end
object v1CheHao: TcxGridDBColumn
Caption = #36710#21495
DataBinding.FieldName = 'CheHao'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object v1CLName: TcxGridDBColumn
Caption = #36710#36742#21517#31216
DataBinding.FieldName = 'CLName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object v1SJName: TcxGridDBColumn
Caption = #21496#26426
DataBinding.FieldName = 'SJName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object v1YCLMoney: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'YCLMoney'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object v1UnitName: TcxGridDBColumn
Tag = 2
Caption = #21333#20301
DataBinding.FieldName = 'CRUnit10'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Width = 52
end
object v1Note: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Width = 108
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object cxGridPopupMenu1: TcxGridPopupMenu
PopupMenus = <>
Left = 506
Top = 176
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 552
Top = 176
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 600
Top = 176
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 643
Top = 188
end
object DataSource1: TDataSource
DataSet = CDS_Main
Left = 504
Top = 216
end
object CDS_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 588
Top = 224
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_Main
Left = 294
Top = 201
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 = 328
Top = 200
ReportData = {}
end
object RMXLSExport1: TRMXLSExport
ShowAfterExport = True
ExportPrecision = 1
PagesOfSheet = 100
ExportImages = True
ExportFrames = True
ExportImageFormat = ifBMP
JPEGQuality = 0
ScaleX = 1.000000000000000000
ScaleY = 1.000000000000000000
CompressFile = False
Left = 668
Top = 223
end
object cxStyleRepository1: TcxStyleRepository
PixelsPerInch = 96
object cxStyle1: TcxStyle
AssignedValues = [svFont, svTextColor]
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
TextColor = clBlack
end
end
object DataSource2: TDataSource
DataSet = JWL_Sub
Left = 543
Top = 267
end
object JWL_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 581
Top = 267
end
object JWL_Money: TClientDataSet
Aggregates = <>
Params = <>
Left = 624
Top = 228
end
object RMDBMain: TRMDBDataSet
Visible = True
DataSet = JWL_Money
Left = 442
Top = 262
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 = RMDBMain
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 478
Top = 261
ReportData = {}
end
end