zwszpas.dfm
来自「本软件是一套功能完整成熟的固定资产管理系统,具有固定资产管理系统的相应全部功能」· DFM 代码 · 共 137 行
DFM
137 行
object w_zwsz: Tw_zwsz
Left = 233
Top = 130
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = #32844#21153#35774#32622
ClientHeight = 348
ClientWidth = 276
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 12
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 276
Height = 307
Align = alClient
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #32844#21153#32534#30721
Title.Alignment = taCenter
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -12
Title.Font.Name = #23435#20307
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = #32844#21153
Title.Alignment = taCenter
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -12
Title.Font.Name = #23435#20307
Title.Font.Style = []
Visible = True
end>
end
object Panel1: TPanel
Left = 0
Top = 307
Width = 276
Height = 41
Align = alBottom
BorderStyle = bsSingle
TabOrder = 1
object Button1: TButton
Left = 8
Top = 6
Width = 65
Height = 25
Action = DataSetInsert1
Caption = #22686#21152'(&A)'
TabOrder = 0
end
object Button2: TButton
Left = 72
Top = 6
Width = 65
Height = 25
Action = DataSetDelete1
Caption = #21024#38500'(&D)'
TabOrder = 1
end
object Button3: TButton
Left = 136
Top = 6
Width = 65
Height = 25
Action = DataSetPost1
Caption = #20445#23384'(&S)'
TabOrder = 2
end
object Button4: TButton
Left = 200
Top = 6
Width = 65
Height = 25
Action = DataSetCancel1
Caption = #21462#28040'(&C)'
TabOrder = 3
end
end
object DataSource1: TDataSource
DataSet = hjzcdata.zwbmb
Left = 88
Top = 32
end
object ActionList1: TActionList
Left = 192
Top = 120
object DataSetInsert1: TDataSetInsert
Category = 'Dataset'
Caption = '&Insert'
Hint = 'Insert'
ImageIndex = 4
OnExecute = DataSetInsert1Execute
end
object DataSetDelete1: TDataSetDelete
Category = 'Dataset'
Caption = '&Delete'
Hint = 'Delete'
ImageIndex = 5
OnExecute = DataSetDelete1Execute
end
object DataSetPost1: TDataSetPost
Category = 'Dataset'
Caption = 'P&ost'
Hint = 'Post'
ImageIndex = 7
end
object DataSetCancel1: TDataSetCancel
Category = 'Dataset'
Caption = '&Cancel'
Hint = 'Cancel'
ImageIndex = 8
end
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?