D7myChuangpin/管理系统/U_MJEdit.dfm
“ddf” ece69a5ac1 1
2024-07-23 20:18:14 +08:00

293 lines
6.9 KiB
Plaintext

object frmMJEdit: TfrmMJEdit
Left = 476
Top = 194
Width = 717
Height = 500
Caption = #24037#24207#35774#32622
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 = 701
Height = 30
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradeManage.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object ToolButton2: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 9
OnClick = ToolButton2Click
end
object ToolButton1: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #30830#35748
ImageIndex = 10
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 30
Width = 701
Height = 63
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label2: TLabel
Left = 33
Top = 48
Width = 7
Height = 12
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label13: TLabel
Left = 16
Top = 26
Width = 54
Height = 12
Caption = #32534' '#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 169
Top = 26
Width = 54
Height = 12
Caption = #21517' '#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object UserID: TEdit
Tag = 2
Left = 72
Top = 22
Width = 80
Height = 20
TabOrder = 0
OnChange = UserIDChange
end
object UserName: TEdit
Tag = 2
Left = 224
Top = 22
Width = 80
Height = 20
TabOrder = 1
OnChange = UserIDChange
end
end
object cxGrid4: TcxGrid
Left = 174
Top = 93
Width = 527
Height = 369
Align = alClient
TabOrder = 2
object TV3: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
OnCellClick = TV3CellClick
DataController.DataSource = DS_Glide
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsCustomize.ColumnSorting = False
OptionsData.Deleting = False
OptionsView.GroupByBox = False
OptionsView.Indicator = True
object cxGridDBColumn2: TcxGridDBColumn
Caption = #21517#31216
DataBinding.FieldName = 'YGName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = cxStyle1
Width = 89
end
object cxGridDBColumn1: TcxGridDBColumn
Caption = #37096#38376
DataBinding.FieldName = 'Dept'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = cxStyle1
Width = 73
end
object V3Column1: TcxGridDBColumn
Caption = #31867#21035
DataBinding.FieldName = 'YGType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = cxStyle1
end
object V3Column2: TcxGridDBColumn
Caption = #23703#20301
DataBinding.FieldName = 'GangWei'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = cxStyle1
end
end
object cxGridLevel3: TcxGridLevel
GridView = TV3
end
end
object cxDBTreeList1: TcxDBTreeList
Left = 0
Top = 93
Width = 174
Height = 369
Align = alLeft
Bands = <
item
end>
BufferedPaint = False
DataController.DataSource = DataSource2
DataController.ParentField = 'DPParent'
DataController.KeyField = 'DPID'
OptionsBehavior.ExpandOnDblClick = False
OptionsSelection.CellSelect = False
OptionsView.CellAutoHeight = True
OptionsView.Headers = False
RootValue = -1
Styles.Inactive = DataLink_TradeManage.Red
Styles.Selection = DataLink_TradeManage.Red
Styles.IncSearch = DataLink_TradeManage.Red
TabOrder = 3
OnDblClick = cxDBTreeList1DblClick
object cxDBTreeList1cxDBTreeListColumn2: TcxDBTreeListColumn
DataBinding.FieldName = 'DPName'
Width = 210
Position.ColIndex = 1
Position.RowIndex = 0
Position.BandIndex = 0
end
end
object ADOTmp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 832
Top = 72
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 340
Top = 196
end
object ADOCmd: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 832
Top = 40
end
object DS_Glide: TDataSource
DataSet = CDS_Glide
Left = 456
Top = 200
end
object CDS_Glide: TClientDataSet
Aggregates = <>
Params = <>
Left = 384
Top = 196
end
object ADOQueryTree: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 48
Top = 153
end
object CDS_Tree: TClientDataSet
Aggregates = <>
Params = <>
Left = 58
Top = 213
end
object DataSource2: TDataSource
DataSet = CDS_Tree
Left = 109
Top = 210
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 248
Top = 147
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 430
Top = 149
end
object cxStyleRepository1: TcxStyleRepository
object cxStyle1: TcxStyle
AssignedValues = [svFont]
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
end
end
end