D7wmguihua/基础资料维护(BaseInfo.dll)/U_ZdyAttachCP.dfm
DESKTOP-E401PHE\Administrator b4b5840f18 1
2025-01-18 16:22:10 +08:00

541 lines
14 KiB
Plaintext

object frmZdyAttachCP: TfrmZdyAttachCP
Left = 384
Top = 127
Width = 1151
Height = 818
Caption = #20135#21697#36164#26009#31649#29702
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1135
Height = 31
ButtonHeight = 30
ButtonWidth = 113
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_BaseInfo.ThreeImgList
Flat = True
Images = DataLink_BaseInfo.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 9
OnClick = TBRafreshClick
end
object ToolButton2: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 59
OnClick = ToolButton2Click
end
object ToolButton3: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #26032#22686
ImageIndex = 3
OnClick = ToolButton3Click
end
object ToolButton4: TToolButton
Left = 189
Top = 0
AutoSize = True
Caption = #20462#25913
ImageIndex = 54
OnClick = ToolButton4Click
end
object TBDel: TToolButton
Left = 252
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 17
OnClick = TBDelClick
end
object ToolButton5: TToolButton
Left = 315
Top = 0
Caption = #25552#21462'Excel'#25968#25454
ImageIndex = 106
OnClick = ToolButton5Click
end
object ToolButton1: TToolButton
Left = 428
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 53
OnClick = ToolButton1Click
end
object ToolButton6: TToolButton
Left = 491
Top = 0
AutoSize = True
Caption = #25171#21360#26631#31614
ImageIndex = 12
Visible = False
OnClick = ToolButton6Click
end
object TBClose: TToolButton
Left = 578
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 31
Width = 1135
Height = 39
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label3: TLabel
Left = 191
Top = 13
Width = 48
Height = 12
Caption = #20135#21697#21517#31216
end
object Label1: TLabel
Left = 22
Top = 13
Width = 48
Height = 12
Caption = #20135#21697#32534#21495
end
object Label2: TLabel
Left = 369
Top = 13
Width = 24
Height = 12
Caption = #31867#22411
Visible = False
end
object ZdyName: TEdit
Tag = 2
Left = 241
Top = 9
Width = 89
Height = 20
TabOrder = 0
OnChange = ZdyNameChange
end
object ZdyCode: TEdit
Tag = 2
Left = 71
Top = 9
Width = 89
Height = 20
TabOrder = 1
OnChange = ZdyNameChange
end
object DEFstr5: TComboBox
Tag = 1
Left = 398
Top = 8
Width = 81
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 2
Visible = False
OnChange = ZdyNameChange
Items.Strings = (
#22383#24067
#25104#21697
'')
end
end
object cxGrid2: TcxGrid
Left = 0
Top = 70
Width = 904
Height = 709
Align = alClient
TabOrder = 2
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
OnFocusedRecordChanged = Tv2FocusedRecordChanged
DataController.DataSource = DS_HZ
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
OptionsCustomize.ColumnSorting = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Inactive = DataLink_BaseInfo.SHuangSe
Styles.IncSearch = DataLink_BaseInfo.SHuangSe
Styles.Selection = DataLink_BaseInfo.SHuangSe
Styles.Header = DataLink_BaseInfo.handBlack
object v2Column2: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'ZdyCode'
PropertiesClassName = 'TcxTextEditProperties'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 94
end
object v2Column6: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'ZdyName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 120
end
object v2Column12: TcxGridDBColumn
Caption = #20013#25991#21517#31216
DataBinding.FieldName = 'defNote3'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 100
end
object v2Column5: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'DEFstr3'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 88
end
object v2Column16: TcxGridDBColumn
Caption = #20013#25991#39068#33394
DataBinding.FieldName = 'DEFstr6'
HeaderAlignmentHorz = taCenter
Width = 80
end
object v2Column11: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'DEFstr5'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 88
end
object v2Column3: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'DEFstr1'
PropertiesClassName = 'TcxTextEditProperties'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
VisibleForCustomization = False
Width = 72
end
object v2Column4: TcxGridDBColumn
Caption = #25104#20221
DataBinding.FieldName = 'DEFstr2'
PropertiesClassName = 'TcxTextEditProperties'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
VisibleForCustomization = False
Width = 74
end
object v2Mrate: TcxGridDBColumn
Caption = #35745#21010#32553#29575'(%)'
DataBinding.FieldName = 'Mrate'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
VisibleForCustomization = False
Width = 80
end
object v2Column13: TcxGridDBColumn
Caption = #24037#33402
DataBinding.FieldName = 'defNote2'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
VisibleForCustomization = False
Width = 100
end
object v2Column9: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'DEFstr7'
PropertiesClassName = 'TcxTextEditProperties'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
VisibleForCustomization = False
Width = 73
end
object v2Column7: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'DEFstr8'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
VisibleForCustomization = False
Width = 61
end
object v2defflt1: TcxGridDBColumn
Caption = #20215#26684#22686#24133
DataBinding.FieldName = 'defflt1'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object v2Column1: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 114
end
object v2Column14: TcxGridDBColumn
Caption = #25805#20316#21592
DataBinding.FieldName = 'Filler'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 60
end
object v2Column15: TcxGridDBColumn
Caption = #25805#20316#26102#38388
DataBinding.FieldName = 'FillTime'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 188
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv2
end
end
object Panel2: TPanel
Left = 384
Top = 128
Width = 269
Height = 177
Color = clSkyBlue
TabOrder = 3
Visible = False
object Label4: TLabel
Left = 8
Top = 12
Width = 48
Height = 12
Caption = #26631#31614#21517#31216
end
object RadioGroup1: TRadioGroup
Left = 37
Top = 29
Width = 192
Height = 88
ItemIndex = 0
Items.Strings = (
#20135#21697#26631#31614
#20135#21697#26631#31614'1')
TabOrder = 0
end
object cxButton1: TcxButton
Left = 28
Top = 140
Width = 75
Height = 25
Caption = #25171#21360
TabOrder = 1
OnClick = cxButton1Click
LookAndFeel.Kind = lfOffice11
end
object cxButton2: TcxButton
Left = 172
Top = 140
Width = 75
Height = 25
Caption = #21462#28040
TabOrder = 2
OnClick = cxButton2Click
LookAndFeel.Kind = lfOffice11
end
end
object cxGrid1: TcxGrid
Left = 904
Top = 70
Width = 231
Height = 709
Align = alRight
TabOrder = 4
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
DataController.DataSource = DS_GC
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
OptionsCustomize.ColumnSorting = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Inactive = DataLink_BaseInfo.SHuangSe
Styles.IncSearch = DataLink_BaseInfo.SHuangSe
Styles.Selection = DataLink_BaseInfo.SHuangSe
Styles.Header = DataLink_BaseInfo.handBlack
object Tv1Column1: TcxGridDBColumn
Caption = #21152#24037#21378
DataBinding.FieldName = 'JgcName'
HeaderAlignmentHorz = taCenter
Width = 100
end
object Tv1Column2: TcxGridDBColumn
Caption = #24037#21378#36135#21495
DataBinding.FieldName = 'JgcCode'
HeaderAlignmentHorz = taCenter
Width = 100
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv1
end
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 789
Top = 9
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
Parameters = <>
Left = 829
Top = 1
end
object ADOQueryMain: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 793
Top = 273
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 = 708
Top = 228
ReportData = {}
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_HZ
Left = 700
Top = 180
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 756
Top = 176
end
object DS_HZ: TDataSource
DataSet = CDS_HZ
Left = 727
Top = 335
end
object CDS_HZ: TClientDataSet
Aggregates = <>
Params = <>
Left = 816
Top = 204
end
object OpenDialog1: TOpenDialog
Left = 936
Top = 41
end
object ADOQueryGC: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 961
Top = 541
end
object CDS_GC: TClientDataSet
Aggregates = <>
Params = <>
Left = 1020
Top = 544
end
object DS_GC: TDataSource
DataSet = CDS_GC
Left = 1083
Top = 551
end
end