📄 u_studentmangeaction.dfm
字号:
object Fm_StudentMangeAction: TFm_StudentMangeAction
Left = 131
Top = 71
BorderStyle = bsDialog
Caption = '学生档案管理卡片'
ClientHeight = 433
ClientWidth = 622
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnKeyDown = FormKeyDown
PixelsPerInch = 96
TextHeight = 14
object Bevel1: TBevel
Left = 0
Top = 383
Width = 622
Height = 50
Align = alBottom
Shape = bsTopLine
end
object Btn_Save: TButton
Left = 274
Top = 397
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Caption = '存盘(&S)'
TabOrder = 3
OnClick = Btn_SaveClick
end
object Btn_Cancel: TButton
Left = 385
Top = 397
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Caption = '退出(&X)'
ModalResult = 2
TabOrder = 4
end
object Btn_Help: TButton
Left = 496
Top = 397
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Caption = '帮助 F1'
TabOrder = 5
end
object PgCtrl_Info: TPageControl
Left = 0
Top = 0
Width = 622
Height = 383
ActivePage = Ts_BaseInfo
Align = alClient
TabOrder = 0
OnChange = PgCtrl_InfoChange
object Ts_BaseInfo: TTabSheet
Caption = '基本信息'
OnExit = Ts_BaseInfoExit
object Label1: TLabel
Left = 17
Top = 23
Width = 28
Height = 14
Caption = '学号'
end
object Label2: TLabel
Left = 178
Top = 23
Width = 28
Height = 14
Caption = '姓名'
end
object Label3: TLabel
Left = 314
Top = 23
Width = 28
Height = 14
Caption = '性别'
end
object Label5: TLabel
Left = 17
Top = 64
Width = 28
Height = 14
Caption = '民族'
end
object Label6: TLabel
Left = 178
Top = 64
Width = 56
Height = 14
Caption = '出生日期'
end
object Label7: TLabel
Left = 17
Top = 106
Width = 28
Height = 14
Caption = '籍贯'
end
object Label8: TLabel
Left = 17
Top = 147
Width = 56
Height = 14
Caption = '家庭住址'
end
object Label9: TLabel
Left = 17
Top = 188
Width = 56
Height = 14
Caption = '联系方式'
end
object Label10: TLabel
Left = 17
Top = 229
Width = 56
Height = 14
Caption = '入团时间'
end
object Label11: TLabel
Left = 260
Top = 229
Width = 56
Height = 14
Caption = '入学时间'
end
object Label12: TLabel
Left = 375
Top = 188
Width = 56
Height = 14
Caption = '入队时间'
end
object Label13: TLabel
Left = 17
Top = 271
Width = 56
Height = 14
Caption = '毕业学校'
end
object Label14: TLabel
Left = 17
Top = 312
Width = 56
Height = 14
Caption = '当前班级'
end
object CmbBox_BJi: TComboBox
Left = 78
Top = 308
Width = 120
Height = 22
Style = csDropDownList
ItemHeight = 14
TabOrder = 14
OnExit = CmbBox_BJiExit
OnKeyDown = CmbBox_XBieKeyDown
OnKeyPress = CmbBox_XBieKeyPress
end
object Ed_XHao01: TEdit
Left = 51
Top = 19
Width = 72
Height = 22
Color = clBtnFace
Enabled = False
TabOrder = 0
end
object Ed_XMing: TEdit
Left = 212
Top = 19
Width = 79
Height = 22
MaxLength = 16
TabOrder = 2
OnExit = Ed_XMingExit
OnKeyDown = Ed_XHao02KeyDown
OnKeyPress = Ed_XMingKeyPress
end
object CmbBox_XBie: TComboBox
Left = 348
Top = 19
Width = 49
Height = 22
Style = csDropDownList
ItemHeight = 14
TabOrder = 3
OnExit = CmbBox_XBieExit
OnKeyDown = CmbBox_XBieKeyDown
OnKeyPress = CmbBox_XBieKeyPress
end
object CmbBox_MZu: TComboBox
Left = 51
Top = 60
Width = 110
Height = 22
Style = csDropDownList
ItemHeight = 14
TabOrder = 5
OnExit = CmbBox_MZuExit
OnKeyDown = CmbBox_XBieKeyDown
OnKeyPress = CmbBox_XBieKeyPress
end
object Ed_JGuan: TEdit
Left = 51
Top = 102
Width = 344
Height = 22
TabOrder = 7
OnKeyDown = Ed_XHao02KeyDown
OnKeyPress = Ed_XMingKeyPress
end
object Ed_JTZZhi: TEdit
Left = 79
Top = 143
Width = 509
Height = 22
TabOrder = 8
OnKeyDown = Ed_XHao02KeyDown
OnKeyPress = Ed_XMingKeyPress
end
object Ed_Lxfshi: TEdit
Left = 80
Top = 184
Width = 285
Height = 22
TabOrder = 9
OnKeyDown = Ed_XHao02KeyDown
OnKeyPress = Ed_XMingKeyPress
end
object Ed_BYXXiao: TEdit
Left = 79
Top = 267
Width = 231
Height = 22
TabOrder = 13
OnKeyDown = Ed_XHao02KeyDown
OnKeyPress = Ed_XMingKeyPress
end
object SclBox_ZPian: TScrollBox
Left = 424
Top = 7
Width = 164
Height = 124
TabOrder = 4
TabStop = True
OnEnter = SclBox_ZPianEnter
OnExit = SclBox_ZPianExit
object Label_ZPian: TLabel
Left = 48
Top = 53
Width = 63
Height = 14
Caption = '照 片'
end
object EnImg_ZPian: TEnImage
Left = 0
Top = 0
Width = 160
Height = 120
Align = alClient
OnDblClick = EnImg_ZPianDblClick
end
end
object DtEdit_CSRQi: TDateEdit
Left = 248
Top = 58
Width = 127
Height = 26
Ctl3D = True
ParentColor = False
ParentCtl3D = False
TabOrder = 6
TabStop = True
OnKeyDown = DtPicker_CSRQiKeyDown
OnKeyPress = DtPicker_CSRQiKeyPress
end
object DtEdit_RDSJian: TDateEdit
Left = 440
Top = 182
Width = 127
Height = 26
Ctl3D = True
ParentColor = False
ParentCtl3D = False
TabOrder = 10
TabStop = True
OnKeyDown = DtPicker_CSRQiKeyDown
OnKeyPress = DtPicker_CSRQiKeyPress
end
object DtEdit_RTSJian: TDateEdit
Left = 80
Top = 224
Width = 127
Height = 26
Ctl3D = True
ParentColor = False
ParentCtl3D = False
TabOrder = 11
TabStop = True
OnKeyDown = DtPicker_CSRQiKeyDown
OnKeyPress = DtPicker_CSRQiKeyPress
end
object DtEdit_RXSJian: TDateEdit
Left = 333
Top = 223
Width = 127
Height = 26
Ctl3D = True
ParentColor = False
ParentCtl3D = False
TabOrder = 12
TabStop = True
OnKeyDown = DtPicker_CSRQiKeyDown
OnKeyPress = DtPicker_CSRQiKeyPress
end
object Ed_XHao02: TEdit
Left = 105
Top = 19
Width = 39
Height = 22
MaxLength = 4
TabOrder = 1
OnExit = Ed_XHao02Exit
OnKeyDown = Ed_XHao02KeyDown
OnKeyPress = Ed_XHao02KeyPress
end
end
object Ts_Family: TTabSheet
Caption = '家庭成员'
ImageIndex = 1
object FGrid: THDBGrid
Left = 0
Top = 0
Width = 614
Height = 294
Align = alClient
CaptionBckColor = clBtnFace
CaptionHeight = 0
CaptionPanelFont.Charset = GB2312_CHARSET
CaptionPanelFont.Color = clWindowText
CaptionPanelFont.Height = -14
CaptionPanelFont.Name = '宋体'
CaptionPanelFont.Style = []
CaptionTextColor = clBlack
CaptionUnderLine = usDouble
DataSource = DDs_Family
LimitedCol = 0
LimitedColor = clInfoBk
IndicatorType = itAlive
Options = [tgEditing, tgTitles, tgIndicator, tgColSizing, tgColMoving, tgLimitedColMoving, tgColLines, tgRowLines, tgConfirmDelete, tgCancelOnExit]
HeightPerRow = 0
ReturnDirection = rdRight
RowAlternate = False
RowAlternateColor = clWindow
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋体'
TitleFont.Style = []
TitleRow = 2
VertAlignment = vgCenter
OnDblClick = FGridDblClick
OnKeyDown = FGridKeyDown
Columns = <
item
CanEdit = False
Expanded = False
FieldName = 'S_XHAO'
KiloFlag = False
Visible = True
MoneyLine = False
LeftMoneyDouble = True
end
item
CanEdit = False
Expanded = False
FieldName = 'I_SXHAO'
KiloFlag = False
Width = 44
Visible = True
MoneyLine = False
LeftMoneyDouble = True
end
item
Expanded = False
FieldName = 'S_XMING'
KiloFlag = False
Width = 66
Visible = True
MoneyLine = False
LeftMoneyDouble = True
end
item
Expanded = False
FieldName = 'D_CSRQI'
KiloFlag = False
Width = 90
Visible = True
MoneyLine = False
LeftMoneyDouble = True
end
item
Expanded = False
FieldName = 'SI_CHU'
KiloFlag = False
Visible = True
MoneyLine = False
LeftMoneyDouble = True
end
item
Expanded = False
FieldName = 'SI_ZZMMIAO'
KiloFlag = False
Visible = True
MoneyLine = False
LeftMoneyDouble = True
end
item
Expanded = False
FieldName = 'S_GZDWEI'
KiloFlag = False
Width = 149
Visible = True
MoneyLine = False
LeftMoneyDouble = True
end>
end
object Panel1: TPanel
Left = 0
Top = 294
Width = 614
Height = 60
Align = alBottom
TabOrder = 1
object Btn_FAdd: TButton
Left = 72
Top = 20
Width = 75
Height = 25
Caption = '添加'
TabOrder = 0
OnClick = Btn_FAddClick
end
object Btn_FEdit: TButton
Left = 171
Top = 20
Width = 75
Height = 25
Caption = '修改'
TabOrder = 1
OnClick = Btn_FEditClick
end
object Btn_FDelete: TButton
Left = 270
Top = 20
Width = 75
Height = 25
Caption = '删除'
TabOrder = 2
OnClick = Btn_FDeleteClick
end
object Btn_FOk: TButton
Left = 369
Top = 20
Width = 75
Height = 25
Caption = '确认'
TabOrder = 3
OnClick = Btn_FOkClick
end
object Btn_FCancel: TButton
Left = 468
Top = 20
Width = 75
Height = 25
Caption = '取消'
Enabled = False
TabOrder = 4
OnClick = Btn_FCancelClick
end
end
end
object Ts_Ruxue: TTabSheet
Caption = '入学成绩'
ImageIndex = 2
object GGrid: THDBGrid
Left = 0
Top = 0
Width = 614
Height = 294
Align = alClient
CaptionBckColor = clBtnFace
CaptionHeight = 0
CaptionPanelFont.Charset = GB2312_CHARSET
CaptionPanelFont.Color = clWindowText
CaptionPanelFont.Height = -14
CaptionPanelFont.Name = '宋体'
CaptionPanelFont.Style = []
CaptionTextColor = clBlack
CaptionUnderLine = usDouble
DataSource = DDs_Grades
LimitedCol = 0
LimitedColor = clInfoBk
IndicatorType = itAlive
Options = [tgEditing, tgTitles, tgIndicator, tgColSizing, tgColMoving, tgLimitedColMoving, tgColLines, tgRowLines, tgConfirmDelete, tgCancelOnExit]
HeightPerRow = 0
ReturnDirection = rdDown
RowAlternate = False
RowAlternateColor = clWindow
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋体'
TitleFont.Style = []
TitleRow = 2
VertAlignment = vgCenter
OnDblClick = GGridDblClick
OnKeyDown = GGridKeyDown
Columns = <
item
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -