162 lines
4.2 KiB
Plaintext
162 lines
4.2 KiB
Plaintext
|
object frmBizCateSel: TfrmBizCateSel
|
||
|
|
Left = 400
|
||
|
|
Top = 200
|
||
|
|
Caption = #19994#21153#22823#31867#26126#32454#39033#36873#25321
|
||
|
|
ClientHeight = 500
|
||
|
|
ClientWidth = 700
|
||
|
|
Color = clWhite
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -16
|
||
|
|
Font.Name = #24494#36719#38597#40657
|
||
|
|
Font.Style = []
|
||
|
|
OldCreateOrder = False
|
||
|
|
Position = poScreenCenter
|
||
|
|
OnDestroy = FormDestroy
|
||
|
|
OnShow = FormShow
|
||
|
|
PixelsPerInch = 96
|
||
|
|
TextHeight = 21
|
||
|
|
object ToolBar1: TToolBar
|
||
|
|
Tag = 1
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
Width = 700
|
||
|
|
Height = 30
|
||
|
|
AutoSize = True
|
||
|
|
ButtonHeight = 30
|
||
|
|
ButtonWidth = 59
|
||
|
|
Caption = 'ToolBar1'
|
||
|
|
DisabledImages = DataLink_Financial.cxImageList_bar
|
||
|
|
Images = DataLink_Financial.cxImageList_bar
|
||
|
|
List = True
|
||
|
|
ShowCaptions = True
|
||
|
|
TabOrder = 0
|
||
|
|
object TBOK: TToolButton
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #30830#23450
|
||
|
|
ImageIndex = 12
|
||
|
|
OnClick = TBOKClick
|
||
|
|
end
|
||
|
|
object TBAdd: TToolButton
|
||
|
|
Left = 63
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #22686#34892
|
||
|
|
ImageIndex = 2
|
||
|
|
OnClick = TBAddClick
|
||
|
|
end
|
||
|
|
object TBDel: TToolButton
|
||
|
|
Left = 126
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #21024#34892
|
||
|
|
ImageIndex = 6
|
||
|
|
OnClick = TBDelClick
|
||
|
|
end
|
||
|
|
object TBEdit: TToolButton
|
||
|
|
Left = 189
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #20462#25913
|
||
|
|
ImageIndex = 3
|
||
|
|
OnClick = TBEditClick
|
||
|
|
end
|
||
|
|
object TBClose: TToolButton
|
||
|
|
Left = 252
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #20851#38381
|
||
|
|
ImageIndex = 7
|
||
|
|
OnClick = TBCloseClick
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object cxGrid1: TcxGrid
|
||
|
|
Left = 0
|
||
|
|
Top = 30
|
||
|
|
Width = 700
|
||
|
|
Height = 470
|
||
|
|
Align = alClient
|
||
|
|
TabOrder = 1
|
||
|
|
object Tv1: TcxGridDBTableView
|
||
|
|
Navigator.Buttons.CustomButtons = <>
|
||
|
|
Navigator.Buttons.Delete.Enabled = False
|
||
|
|
Navigator.Buttons.Delete.Visible = False
|
||
|
|
ScrollbarAnnotations.CustomAnnotations = <>
|
||
|
|
OnCellDblClick = Tv1CellDblClick
|
||
|
|
DataController.DataSource = DS_1
|
||
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
||
|
|
DataController.Summary.FooterSummaryItems = <>
|
||
|
|
DataController.Summary.SummaryGroups = <>
|
||
|
|
OptionsCustomize.ColumnFiltering = False
|
||
|
|
OptionsData.Deleting = False
|
||
|
|
OptionsData.DeletingConfirmation = False
|
||
|
|
OptionsData.Editing = False
|
||
|
|
OptionsSelection.CellSelect = False
|
||
|
|
OptionsView.GroupByBox = False
|
||
|
|
OptionsView.Indicator = True
|
||
|
|
object Tv1BizCate: TcxGridDBColumn
|
||
|
|
Caption = #19994#21153#22823#31867
|
||
|
|
DataBinding.FieldName = 'BizCate'
|
||
|
|
DataBinding.IsNullValueType = True
|
||
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
|
Properties.OnEditValueChanged = Tv1BizCatePropertiesEditValueChanged
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Width = 240
|
||
|
|
end
|
||
|
|
object Tv1BizItem: TcxGridDBColumn
|
||
|
|
Caption = #26126#32454#39033
|
||
|
|
DataBinding.FieldName = 'BizItem'
|
||
|
|
DataBinding.IsNullValueType = True
|
||
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
|
Properties.OnEditValueChanged = Tv1BizItemPropertiesEditValueChanged
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Width = 240
|
||
|
|
end
|
||
|
|
object Tv1CateNo: TcxGridDBColumn
|
||
|
|
Caption = #22823#31867#32534#21495
|
||
|
|
DataBinding.FieldName = 'CateNo'
|
||
|
|
DataBinding.IsNullValueType = True
|
||
|
|
Visible = False
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Width = 80
|
||
|
|
end
|
||
|
|
object Tv1ItemNo: TcxGridDBColumn
|
||
|
|
Caption = #26126#32454#32534#21495
|
||
|
|
DataBinding.FieldName = 'ItemNo'
|
||
|
|
DataBinding.IsNullValueType = True
|
||
|
|
Visible = False
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Width = 80
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object cxGridLevel1: TcxGridLevel
|
||
|
|
GridView = Tv1
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object DS_1: TDataSource
|
||
|
|
DataSet = CDS_1
|
||
|
|
Left = 96
|
||
|
|
Top = 120
|
||
|
|
end
|
||
|
|
object CDS_1: TClientDataSet
|
||
|
|
Aggregates = <>
|
||
|
|
Params = <>
|
||
|
|
Left = 168
|
||
|
|
Top = 120
|
||
|
|
end
|
||
|
|
object ADOQueryTmp: TADOQuery
|
||
|
|
Connection = DataLink_Financial.ADOLink
|
||
|
|
Parameters = <>
|
||
|
|
Left = 560
|
||
|
|
Top = 120
|
||
|
|
end
|
||
|
|
object ADOQueryCmd: TADOQuery
|
||
|
|
Connection = DataLink_Financial.ADOLink
|
||
|
|
Parameters = <>
|
||
|
|
Left = 656
|
||
|
|
Top = 120
|
||
|
|
end
|
||
|
|
end
|