D7myYunxiang/云翔财务(Money.dll)/U_GYSListSel.dfm

402 lines
10 KiB
Plaintext
Raw Normal View History

2025-01-20 13:04:03 +08:00
object frmGYSListSel: TfrmGYSListSel
2025-11-06 09:08:40 +08:00
Left = 552
Top = 557
2025-01-20 13:04:03 +08:00
Width = 1222
Height = 672
Caption = #20379#24212#21830#20449#24687#26597#35810
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
WindowState = wsMaximized
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
2025-11-06 09:08:40 +08:00
Width = 1214
2025-01-20 13:04:03 +08:00
Height = 31
ButtonHeight = 30
ButtonWidth = 65
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_Money.ThreeImgList
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_Money.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 2
OnClick = TBRafreshClick
end
object ToolButton2: TToolButton
Left = 69
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 59
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 138
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 31
2025-11-06 09:08:40 +08:00
Width = 1214
2025-01-20 13:04:03 +08:00
Height = 35
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
object Label2: TLabel
Left = 16
Top = 7
Width = 44
Height = 21
Caption = #21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object LabKHType: TLabel
Left = 393
Top = 10
Width = 32
Height = 15
Caption = #31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
2025-11-06 09:08:40 +08:00
object Label1: TLabel
Left = 569
Top = 10
Width = 32
Height = 15
Caption = #31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
2025-01-20 13:04:03 +08:00
object zjm: TEdit
Tag = 2
Left = 83
Top = 6
Width = 294
Height = 23
TabOrder = 0
OnChange = zjmChange
end
object KHType: TBtnEditC
Tag = 1
Left = 426
Top = 6
Width = 121
Height = 23
ReadOnly = True
TabOrder = 1
OnBtnUpClick = KHTypeBtnUpClick
OnBtnDnClick = KHTypeBtnDnClick
end
2025-11-06 09:08:40 +08:00
object KHFlag: TComboBox
Left = 608
Top = 5
Width = 145
Height = 23
ItemHeight = 15
TabOrder = 2
OnChange = KHFlagChange
Items.Strings = (
'GYS'
'KH')
end
2025-01-20 13:04:03 +08:00
end
object cxGrid1: TcxGrid
Left = 0
Top = 66
2025-11-06 09:08:40 +08:00
Width = 1214
Height = 413
2025-01-20 13:04:03 +08:00
Align = alClient
TabOrder = 2
object TV1: TcxGridDBTableView
OnMouseDown = TV1MouseDown
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
DataController.DataSource = DS_HZ
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Header = cxStyle1
object V1Column2: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'KHType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Width = 103
end
object V1Column1: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'KHNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Styles.Content = cxStyle1
Width = 80
end
object cxGYSName: TcxGridDBColumn
Caption = #20379#24212#21830
DataBinding.FieldName = 'KHName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Styles.Content = cxStyle1
Width = 200
end
object cxGridDBGYSNameZC: TcxGridDBColumn
Caption = #31616#31216
DataBinding.FieldName = 'KHNameJC'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Styles.Content = cxStyle1
Width = 92
end
object V1Column3: TcxGridDBColumn
Caption = #20135#21697#33539#22260
DataBinding.FieldName = 'KHJYFanWei'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Width = 181
end
object V1SHStatus: TcxGridDBColumn
Caption = #23457#26680#29366#24577
DataBinding.FieldName = 'SHStatus'
OnCustomDrawCell = V1SHStatusCustomDrawCell
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Styles.Content = cxStyle1
Width = 106
end
object V1FZR: TcxGridDBColumn
Caption = #36127#36131#20154
DataBinding.FieldName = 'FZR'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Styles.Content = cxStyle1
Width = 68
end
end
object cxGridLevel2: TcxGridLevel
GridView = TV1
end
end
object cxGrid3: TcxGrid
Left = 0
2025-11-06 09:08:40 +08:00
Top = 479
Width = 1214
2025-01-20 13:04:03 +08:00
Height = 162
Align = alBottom
TabOrder = 3
object TV3: TcxGridDBTableView
OnDblClick = TV3DblClick
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
DataController.DataSource = DS_HZ3
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsSelection.CellSelect = False
OptionsView.GroupByBox = False
Styles.Content = DataLink_Money.cxStyle2
Styles.Inactive = DataLink_Money.SHuangSe
Styles.IncSearch = DataLink_Money.SHuangSe
Styles.Selection = DataLink_Money.SHuangSe
Styles.Header = DataLink_Money.Default
object V3Column2: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'BankType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Width = 127
end
object V3BankName: TcxGridDBColumn
Caption = #25143#21517
DataBinding.FieldName = 'HuMing'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Width = 211
end
object V3BankNo: TcxGridDBColumn
Caption = #36134#21495
DataBinding.FieldName = 'BankNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Width = 229
end
object V3Column3: TcxGridDBColumn
Caption = #24320#25143#34892
DataBinding.FieldName = 'BankName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Width = 250
end
object V3Column1: TcxGridDBColumn
Caption = #31246#21495
DataBinding.FieldName = 'ShuiHao'
HeaderAlignmentHorz = taCenter
Width = 248
end
end
object cxGridLevel3: TcxGridLevel
GridView = TV3
end
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_Money.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 882
Top = 144
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_Money.ADOLink
Parameters = <>
Left = 690
Top = 143
end
object ADOQueryMain: TADOQuery
Connection = DataLink_Money.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 723
Top = 144
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 780
Top = 145
end
object DS_HZ: TDataSource
DataSet = CDS_HZ
Left = 814
Top = 144
end
object CDS_HZ: TClientDataSet
Aggregates = <>
Params = <>
Left = 848
Top = 144
end
object cxStyleRepository1: TcxStyleRepository
Left = 240
PixelsPerInch = 96
object cxStyle1: TcxStyle
AssignedValues = [svFont]
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
end
end
object DS_HZ3: TDataSource
DataSet = CDS_HZ3
Left = 855
Top = 486
end
object CDS_HZ3: TClientDataSet
Aggregates = <>
Params = <>
Left = 886
Top = 489
end
object cxGridPopupMenu4: TcxGridPopupMenu
Grid = cxGrid3
PopupMenus = <>
Left = 918
Top = 491
end
end