?? moralset_unit.dfm
字號:
inherited frmMoralSet: TfrmMoralSet
Left = 241
Top = 142
Caption = #24605#24819#21697#24503#31649#29702
ClientHeight = 474
ClientWidth = 626
OldCreateOrder = True
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel [0]
Left = 8
Top = 8
Width = 609
Height = 129
BevelInner = bvLowered
TabOrder = 0
object GroupBox1: TGroupBox
Left = 2
Top = 2
Width = 605
Height = 125
Align = alClient
Caption = #24605#24819#21697#24503#20869#23481
TabOrder = 0
object trvwMoralName: TTreeView
Left = 2
Top = 14
Width = 601
Height = 109
Align = alClient
Indent = 19
ReadOnly = True
TabOrder = 0
OnDblClick = trvwMoralNameDblClick
Items.Data = {
03000000230000000000000000000000FFFFFFFFFFFFFFFF0000000003000000
0A312EBBF9B1BEB9E6D5C22A0000000000000000000000FFFFFFFFFFFFFFFF00
0000000000000011313030312EB9D8D0C4B9FABCD2B4F3CAC230000000000000
0000000000FFFFFFFFFFFFFFFF000000000000000017313030322EC8C8B0AEBC
AFCCE5A1A2B9D8D0C4BCAFCCE5260000000000000000000000FFFFFFFFFFFFFF
FF00000000000000000D313030332ED7F0C0CFB0AED3D7230000000000000000
000000FFFFFFFFFFFFFFFF00000000020000000A322EB5C0B5C2C6B7D6CA2A00
00000000000000000000FFFFFFFFFFFFFFFF000000000000000011323030312E
B2BBB4F2BCDCB2BBB6B7C5B9300000000000000000000000FFFFFFFFFFFFFFFF
000000000000000017323030322ED7F0D6D8C0CFCAA6A1A2CDC5BDE1CDACD1A7
230000000000000000000000FFFFFFFFFFFFFFFF00000000020000000A332EBC
CDC2C9B9E6B7B62A0000000000000000000000FFFFFFFFFFFFFFFF0000000000
00000011333030312ED7F1CAD8D1A7D0A3BCCDC2C92A00000000000000000000
00FFFFFFFFFFFFFFFF000000000000000011333030322EBBFDBCABB2CEBCD3C0
CDB6AF}
end
end
end
object Panel2: TPanel [1]
Left = 8
Top = 320
Width = 609
Height = 149
BevelInner = bvLowered
TabOrder = 1
object Label1: TLabel
Left = 16
Top = 17
Width = 48
Height = 12
Caption = #23398' '#21495#65306
end
object Label2: TLabel
Left = 160
Top = 17
Width = 60
Height = 12
Caption = #29677#32423#32534#21495#65306
end
object Label3: TLabel
Left = 320
Top = 17
Width = 60
Height = 12
Caption = #21697#24503#32534#21495#65306
end
object Label4: TLabel
Left = 456
Top = 17
Width = 60
Height = 12
Caption = #21697#24503#25104#32489#65306
end
object Label5: TLabel
Left = 16
Top = 56
Width = 48
Height = 12
Caption = #22791' '#27880#65306
end
object cmbxStudentID: TDBLookupComboBox
Left = 64
Top = 13
Width = 90
Height = 20
DataField = 'StudentID'
DataSource = DataMoral
DropDownWidth = 150
KeyField = 'StudentID'
ListField = 'StudentID;StuName'
ListSource = DataStudentID
TabOrder = 0
end
object cmbxClassID: TDBLookupComboBox
Left = 216
Top = 13
Width = 90
Height = 20
DataField = 'ClassID'
DataSource = DataMoral
DropDownWidth = 150
KeyField = 'ClassID'
ListField = 'ClassID;ClaName'
ListSource = DataClassID
TabOrder = 1
end
object edtMoralResult: TDBEdit
Left = 520
Top = 13
Width = 73
Height = 20
DataField = 'MoralResult'
DataSource = DataMoral
TabOrder = 2
end
object edtRemark: TDBMemo
Left = 64
Top = 40
Width = 529
Height = 65
DataField = 'Remark'
DataSource = DataMoral
TabOrder = 3
end
object btnCancel: TBitBtn
Left = 491
Top = 114
Width = 75
Height = 25
Caption = #21462#28040'(&C)'
TabOrder = 4
OnClick = btnCancelClick
end
object btnSave: TBitBtn
Left = 379
Top = 114
Width = 75
Height = 25
Caption = #20445#23384'(&S)'
TabOrder = 5
OnClick = btnSaveClick
end
object btnDel: TBitBtn
Left = 267
Top = 114
Width = 75
Height = 25
Caption = #21024#38500'(&D)'
TabOrder = 6
OnClick = btnDelClick
end
object btnModify: TBitBtn
Left = 150
Top = 114
Width = 75
Height = 25
Caption = #20462#25913'(&M)'
TabOrder = 7
OnClick = btnModifyClick
end
object btnAdd: TBitBtn
Left = 35
Top = 114
Width = 75
Height = 25
Caption = #28155#21152'(&A)'
TabOrder = 8
OnClick = btnAddClick
end
object edtMoralID: TDBEdit
Left = 377
Top = 13
Width = 74
Height = 20
DataField = 'MoralID'
DataSource = DataMoral
TabOrder = 9
end
end
object Panel3: TPanel [2]
Left = 8
Top = 144
Width = 609
Height = 169
BevelInner = bvLowered
TabOrder = 2
object DBGrid1: TDBGrid
Left = 2
Top = 2
Width = 605
Height = 165
Align = alClient
DataSource = DataMoral
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'StudentID'
Title.Alignment = taCenter
Title.Caption = #23398#21495
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'ClassID'
Title.Alignment = taCenter
Title.Caption = #29677#32423#32534#21495
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'MoralID'
Title.Alignment = taCenter
Title.Caption = #21697#24503#26465#30446#32534#21495
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'MoralResult'
Title.Alignment = taCenter
Title.Caption = #21697#24503#25104#32489
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Remark'
Title.Alignment = taCenter
Title.Caption = #22791#27880
Width = 200
Visible = True
end>
end
end
inherited ActionList1: TActionList
Left = 32
Top = 208
end
inherited PopupMenu1: TPopupMenu
Left = 72
Top = 208
end
object DataMoral: TDataSource
Left = 104
Top = 208
end
object DataStudentID: TDataSource
Left = 136
Top = 208
end
object DataClassID: TDataSource
Left = 168
Top = 208
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -