RTFormwork/项目代码/RTBasicsV1/A05基础资料管理/U_SYDept.dfm
“ddf” 61630656e9 1
2024-07-07 09:35:27 +08:00

312 lines
7.7 KiB
Plaintext

object frmSYDept: TfrmSYDept
Left = 73
Top = 128
Width = 1004
Height = 509
Caption = #32452#32455#32467#26500
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 = 988
Height = 33
ButtonHeight = 30
ButtonWidth = 83
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_DDMD.ThreeImgList
Flat = True
Images = DataLink_DDMD.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 0
OnClick = TBRafreshClick
end
object TBAdd: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #26032#22686#23376#31867
ImageIndex = 12
OnClick = TBAddClick
end
object ToolButton1: TToolButton
Left = 150
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 5
OnClick = ToolButton1Click
end
object TBDel: TToolButton
Left = 213
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 13
OnClick = TBDelClick
end
object ToolButton2: TToolButton
Left = 276
Top = 0
AutoSize = True
Caption = #32452#32455#20998#37197
ImageIndex = 22
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 363
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object cxDBTreeList1: TcxDBTreeList
Left = 0
Top = 33
Width = 249
Height = 437
Align = alLeft
Bands = <
item
end>
BufferedPaint = False
DataController.DataSource = DataSource1
DataController.ParentField = 'DPParent'
DataController.KeyField = 'DPID'
OptionsSelection.CellSelect = False
OptionsView.CellAutoHeight = True
OptionsView.Headers = False
RootValue = -1
Styles.Inactive = DataLink_DDMD.Red
Styles.Selection = DataLink_DDMD.Red
Styles.IncSearch = DataLink_DDMD.Red
TabOrder = 1
OnClick = cxDBTreeList1Click
OnDblClick = cxDBTreeList1DblClick
object cxDBTreeList1cxDBTreeListColumn2: TcxDBTreeListColumn
DataBinding.FieldName = 'DPName'
Width = 210
Position.ColIndex = 1
Position.RowIndex = 0
Position.BandIndex = 0
end
end
object Panel1: TPanel
Left = 249
Top = 33
Width = 315
Height = 437
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 2
object Label1: TLabel
Left = 41
Top = 40
Width = 48
Height = 12
Caption = #19978#32423#32452#32455
end
object Label2: TLabel
Left = 41
Top = 81
Width = 48
Height = 12
Caption = #32452#32455#21517#31216
end
object Label3: TLabel
Left = 41
Top = 121
Width = 48
Height = 12
Caption = #32452#32455#32534#30721
end
object Label4: TLabel
Left = 24
Top = 16
Width = 60
Height = 14
Caption = #32452#32455#32467#26500
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 41
Top = 159
Width = 48
Height = 12
Caption = #39034' '#24207' '#21495
end
object DPTopName: TEdit
Left = 104
Top = 37
Width = 169
Height = 20
ReadOnly = True
TabOrder = 0
end
object DPName: TEdit
Left = 104
Top = 77
Width = 169
Height = 20
TabOrder = 1
OnKeyPress = DPNameKeyPress
end
object DPNo: TEdit
Left = 104
Top = 117
Width = 169
Height = 20
TabOrder = 2
end
object DPOrder: TEdit
Left = 104
Top = 155
Width = 169
Height = 20
TabOrder = 3
end
end
object cxGrid4: TcxGrid
Left = 564
Top = 33
Width = 424
Height = 437
Align = alClient
TabOrder = 3
object Tv4: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
NavigatorButtons.Delete.Enabled = False
NavigatorButtons.Delete.Visible = False
DataController.DataSource = DSUser
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.GroupByBox = False
Styles.Inactive = DataLink_DDMD.SHuangSe
Styles.IncSearch = DataLink_DDMD.SHuangSe
Styles.Selection = DataLink_DDMD.SHuangSe
object cxGridDBColumn1: TcxGridDBColumn
Caption = #21592#24037#32534#21495
DataBinding.FieldName = 'UserId'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Alignment.Vert = taVCenter
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Header = DataLink_DDMD.Default
Width = 84
end
object cxGridDBColumn7: TcxGridDBColumn
Caption = #30331#24405#21517#31216
DataBinding.FieldName = 'UserName'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Alignment.Vert = taVCenter
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Header = DataLink_DDMD.Default
Width = 87
end
object cxGridDBColumn8: TcxGridDBColumn
Caption = #21592#24037#32452#32455
DataBinding.FieldName = 'dept'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Alignment.Vert = taVCenter
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Header = DataLink_DDMD.Default
Width = 74
end
object v4Column1: TcxGridDBColumn
Caption = #31995#32479#21517#31216
DataBinding.FieldName = 'MoneyUserName'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Alignment.Vert = taVCenter
Properties.OnEditValueChanged = v4Column1PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_DDMD.Default
Width = 91
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv4
end
end
object DataSource1: TDataSource
DataSet = CDS_Tree
Left = 147
Top = 219
end
object ADOQueryTree: TADOQuery
Connection = DataLink_DDMD.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 117
Top = 145
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_DDMD.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 528
Top = 215
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_DDMD.ADOLink
Parameters = <>
Left = 520
Top = 258
end
object CDS_Tree: TClientDataSet
Aggregates = <>
Params = <>
Left = 96
Top = 256
end
object CDS_User: TClientDataSet
Aggregates = <>
Params = <>
Left = 680
Top = 272
end
object DSUser: TDataSource
DataSet = CDS_User
Left = 675
Top = 211
end
end