D10myYicheng/财务管理(Financial.dll)/U_KhHKList.dfm

806 lines
22 KiB
Plaintext
Raw Normal View History

2025-05-27 14:08:09 +08:00
inherited frmKhHKList: TfrmKhHKList
Left = 314
Top = 158
Caption = #23458#25143#22238#27454#30331#35760
ClientHeight = 711
ClientWidth = 1430
ExplicitWidth = 1446
ExplicitHeight = 750
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1430
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 75
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_Financial.ThreeImgList
Images = DataLink_Financial.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 ToolButton2: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 16
OnClick = ToolButton2Click
end
object ToolButton1: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #25171#21360
ImageIndex = 21
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 213
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object Panel1: TPanel [1]
Left = 0
Top = 38
Width = 1430
Height = 69
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 1
object Label3: TLabel
Left = 214
Top = 37
Width = 36
Height = 12
Caption = #23458' '#25143
end
object Label1: TLabel
Left = 214
Top = 11
Width = 36
Height = 12
Caption = #21512#21516#21495
end
object Label2: TLabel
Left = 86
Top = 37
Width = 12
Height = 12
Caption = #19968
end
object Label4: TLabel
Left = 512
Top = 11
Width = 48
Height = 12
Caption = #20184#27454#29366#24577
end
object Label5: TLabel
Left = 512
Top = 37
Width = 48
Height = 12
Caption = #30005#25918#29366#24577
end
object Label6: TLabel
Left = 358
Top = 37
Width = 36
Height = 12
Caption = #20013#38388#21830
end
object Label7: TLabel
Left = 358
Top = 11
Width = 36
Height = 12
Caption = #23458#21333#21495
end
object KHName: TEdit
Tag = 2
Left = 252
Top = 33
Width = 90
Height = 20
TabOrder = 0
OnKeyPress = KHNameKeyPress
end
object enddate: TDateTimePicker
Left = 104
Top = 33
Width = 86
Height = 20
Date = 40675.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.464761099538009100
TabOrder = 1
end
object begdate: TDateTimePicker
Left = 105
Top = 7
Width = 85
Height = 20
Date = 40675.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.464742650459811600
TabOrder = 2
end
object conno: TEdit
Tag = 2
Left = 252
Top = 7
Width = 90
Height = 20
TabOrder = 3
OnKeyPress = KHNameKeyPress
end
object cbbDate: TComboBox
Left = 20
Top = 6
Width = 79
Height = 22
Style = csOwnerDrawFixed
ItemIndex = 0
TabOrder = 4
Text = #20986#24211#26102#38388
Items.Strings = (
#20986#24211#26102#38388
#20813#22534#26399)
end
object cbbFKZT: TComboBox
Left = 566
Top = 6
Width = 79
Height = 22
Style = csOwnerDrawFixed
TabOrder = 5
OnChange = cbbFKZTChange
Items.Strings = (
''
#26410#20184#27454
#24050#20184#27454
#24050#32467#28165)
end
object cbbDF: TComboBox
Left = 566
Top = 32
Width = 79
Height = 22
Style = csOwnerDrawFixed
TabOrder = 6
OnChange = cbbFKZTChange
Items.Strings = (
''
#26410#30005#25918
#24050#30005#25918)
end
object MiddleName: TEdit
Tag = 2
Left = 396
Top = 33
Width = 90
Height = 20
TabOrder = 7
OnKeyPress = KHNameKeyPress
end
object KHConNo: TEdit
Tag = 2
Left = 396
Top = 7
Width = 90
Height = 20
TabOrder = 8
OnKeyPress = KHNameKeyPress
end
end
object cxGrid1: TcxGrid [2]
Left = 0
Top = 107
Width = 1430
Height = 205
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
object Tv1: TcxGridDBTableView
OnMouseDown = Tv1MouseDown
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
DataController.DataSource = DS_1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = Tv1Column4
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = Tv1Column5
end
item
Kind = skSum
Column = Tv1Column6
end
item
Kind = skSum
Column = Tv1Column7
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsSelection.MultiSelect = True
OptionsSelection.CheckBoxVisibility = [cbvDataRow, cbvColumnHeader]
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.IncSearch = DataLink_Financial.SHuangSe
Styles.Header = DataLink_Financial.Default
Styles.Inactive = DataLink_Financial.SHuangSe
Styles.Selection = DataLink_Financial.SHuangSe
object Tv1Column15: TcxGridDBColumn
Tag = 9
Caption = #36873#25321
DataBinding.FieldName = 'ssel'
HeaderAlignmentHorz = taCenter
Width = 34
end
object fph: TcxGridDBColumn
Caption = #21457#31080#21495
DataBinding.FieldName = 'IVNo'
HeaderAlignmentHorz = taCenter
Width = 96
end
object Tv1Column8: TcxGridDBColumn
Caption = #20986#24211#26102#38388
DataBinding.FieldName = 'CKDate'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 87
end
object Tv1Column1: TcxGridDBColumn
Caption = #21512#21516#21495
DataBinding.FieldName = 'ConNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 55
end
object v2Column2: TcxGridDBColumn
Caption = #23458#25143#35746#21333#21495
DataBinding.FieldName = 'KHConNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 103
end
object Tv1Column12: TcxGridDBColumn
Caption = #32463#33829#21333#20301
DataBinding.FieldName = 'ComTaiTou'
HeaderAlignmentHorz = taCenter
Width = 85
end
object Tv1Column9: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'MiddleName'
HeaderAlignmentHorz = taCenter
Width = 86
end
object Tv1Column11: TcxGridDBColumn
Caption = #23545#26041#21333#20301
DataBinding.FieldName = 'KHName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 81
end
object Tv1Column4: TcxGridDBColumn
Caption = #21253#25968
DataBinding.FieldName = 'BS'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 62
end
object Tv1Column3: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'QtyNote'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 76
end
object Tv1Column5: TcxGridDBColumn
Caption = #24212#25910#24635#37329#39069'/AMOUNT'
DataBinding.FieldName = 'Money'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 132
end
object Tv1Column6: TcxGridDBColumn
Caption = #20184#27454#37329#39069'/AMOUNT PAID'
DataBinding.FieldName = 'HXMoney'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 113
end
object Tv1Column7: TcxGridDBColumn
Caption = #27424#27454'/DEBT'
DataBinding.FieldName = 'QKMoney'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 85
end
object VC_ETD: TcxGridDBColumn
Caption = #24320#33337#26102#38388'/ETD'
DataBinding.FieldName = 'ETD'
PropertiesClassName = 'TcxDateEditProperties'
Properties.OnEditValueChanged = ztPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 101
end
object Tv1Column10: TcxGridDBColumn
Caption = 'ETA/'#39044#35745#21040#36798#26102#38388
DataBinding.FieldName = 'ETA'
PropertiesClassName = 'TcxDateEditProperties'
Properties.OnEditValueChanged = DateEdit
HeaderAlignmentHorz = taCenter
Width = 118
end
object yjcdrq: TcxGridDBColumn
Caption = #20813#22534#26399
DataBinding.FieldName = 'MDQ'
HeaderAlignmentHorz = taCenter
Width = 100
end
object etd: TcxGridDBColumn
Caption = #30005#25918#26102#38388
DataBinding.FieldName = 'DFDate'
PropertiesClassName = 'TcxDateEditProperties'
HeaderAlignmentHorz = taCenter
Width = 80
end
object jdrq: TcxGridDBColumn
Caption = #20184#27454#26102#38388
DataBinding.FieldName = 'FKDATE'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object kddh: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 100
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv1
end
end
object Panel2: TPanel [3]
Left = 0
Top = 312
Width = 1430
Height = 399
Align = alBottom
Caption = 'Panel2'
TabOrder = 3
object cxGrid2: TcxGrid
Left = 1
Top = 1
Width = 496
Height = 397
Align = alLeft
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
object TV2: TcxGridDBTableView
OnMouseDown = TV2MouseDown
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
DataController.DataSource = DS_2
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = cxGridDBColumn13
end
item
Kind = skSum
end
item
Kind = skSum
Column = cxGridDBColumn9
end
item
Kind = skSum
Column = cxGridDBColumn7
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.IncSearch = DataLink_Financial.SHuangSe
Styles.Header = DataLink_Financial.Default
Styles.Inactive = DataLink_Financial.SHuangSe
Styles.Selection = DataLink_Financial.SHuangSe
object TV2Column3: TcxGridDBColumn
Caption = #21512#21516#21495
DataBinding.FieldName = 'ConNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 71
end
object TV2Column2: TcxGridDBColumn
Caption = #23458#25143#35746#21333#21495
DataBinding.FieldName = 'KHConNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object TV2Column1: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'P_CodeName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 77
end
object cxGridDBColumn7: TcxGridDBColumn
Caption = #21367#25968
DataBinding.FieldName = 'ps'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 89
end
object cxGridDBColumn9: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 96
end
object cxGridDBColumn13: TcxGridDBColumn
Caption = #24212#25910#24635#37329#39069'/AMOUNT'
DataBinding.FieldName = 'Money'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 132
end
end
object cxGridLevel2: TcxGridLevel
GridView = TV2
end
end
object cxGrid3: TcxGrid
Left = 497
Top = 1
Width = 932
Height = 397
Align = alClient
TabOrder = 1
object TV3: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
DataController.DataSource = DS_3
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.IncSearch = DataLink_Financial.SHuangSe
Styles.Footer = DataLink_Financial.Default
Styles.Header = DataLink_Financial.Default
Styles.Inactive = DataLink_Financial.SHuangSeCu
Styles.Selection = DataLink_Financial.SHuangSe
object v2P_Color: TcxGridDBColumn
Tag = 7
Caption = #39068#33394
DataBinding.FieldName = 'P_Color'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 102
end
object v2P_HX: TcxGridDBColumn
Tag = 7
Caption = #33457#22411
DataBinding.FieldName = 'P_HX'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 90
end
object v2ps: TcxGridDBColumn
Tag = 7
Caption = #21305#25968
DataBinding.FieldName = 'ps'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 61
end
object v2Qty: TcxGridDBColumn
Tag = 7
Caption = #25968#37327
DataBinding.FieldName = 'Qty'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 82
end
object v2Column1: TcxGridDBColumn
Tag = 7
Caption = #21333#20215
DataBinding.FieldName = 'Price'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 72
end
object TV3Column1: TcxGridDBColumn
Caption = #21547#20323#21333#20215
DataBinding.FieldName = 'HYPrice'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 72
end
object v2BZType: TcxGridDBColumn
Tag = 7
Caption = #24065#31181
DataBinding.FieldName = 'BZType'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
'$'
#65509
#8364)
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 55
end
object v2QtyUnit: TcxGridDBColumn
Tag = 7
Caption = #21333#20301
DataBinding.FieldName = 'QtyUnit'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 58
end
object v2Column14: TcxGridDBColumn
Tag = 7
Caption = #20854#20182#36153
DataBinding.FieldName = 'QTFee'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 71
end
object VYB: TcxGridDBColumn
Tag = 7
Caption = #37329#39069
DataBinding.FieldName = 'Money'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 76
end
object v2Note: TcxGridDBColumn
Tag = 7
Caption = #22791#27880
DataBinding.FieldName = 'Note'
PropertiesClassName = 'TcxTextEditProperties'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
VisibleForCustomization = False
Width = 75
end
object v2Column3: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 62
end
object TV3Column2: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'P_ColorNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
end
object cxGridLevel3: TcxGridLevel
GridView = TV3
end
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_Financial.ADOLink
Left = 313
Top = 160
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_Financial.ADOLink
Left = 201
Top = 153
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_Financial.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 453
Top = 157
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_Financial.ADOLink
Parameters = <>
Left = 533
Top = 153
end
object ADOQueryMain: TADOQuery
Connection = DataLink_Financial.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 101
Top = 149
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_Main
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 188
Top = 344
ReportData = {}
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_PRT
Left = 140
Top = 336
end
object rmxlsxprt1: TRMXLSExport
ShowAfterExport = True
ExportPrecision = 1
PagesOfSheet = 100
ExportImages = True
ExportFrames = True
ExportImageFormat = ifBMP
JPEGQuality = 0
ScaleX = 1.000000000000000000
ScaleY = 1.000000000000000000
CompressFile = False
Left = 191
Top = 244
end
object CDS_PRT: TClientDataSet
Aggregates = <>
Params = <>
Left = 93
Top = 337
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 519
Top = 339
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 424
Top = 336
end
object GPM_1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 360
Top = 340
end
object GPM_2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 360
Top = 420
end
object CDS_2: TClientDataSet
Aggregates = <>
Params = <>
Left = 432
Top = 416
end
object DS_2: TDataSource
DataSet = CDS_2
Left = 519
Top = 419
end
object GPM_3: TcxGridPopupMenu
Grid = cxGrid3
PopupMenus = <>
Left = 360
Top = 516
end
object CDS_3: TClientDataSet
Aggregates = <>
Params = <>
Left = 432
Top = 512
end
object DS_3: TDataSource
DataSet = CDS_3
Left = 519
Top = 515
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_Financial.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 121
Top = 249
end
end