📄 unit_managerachives.dfm
字号:
MaxLength = 30
ScrollBars = ssVertical
TabOrder = 2
end
object dtp_ACTI_TIME_DATA: TDateTimePicker
Tag = 1
Left = 80
Top = 35
Width = 140
Height = 22
CalAlignment = dtaLeft
Date = 37432.4795666667
Time = 37432.4795666667
DateFormat = dfShort
DateMode = dmComboBox
ImeName = '中文 (简体) - 智能 ABC'
Kind = dtkDate
ParseInput = False
TabOrder = 1
end
object ed_ACTIVE: TFlatEdit
Tag = 1
Left = 80
Top = 12
Width = 367
Height = 20
ColorFlat = clWindow
MaxLength = 30
TabOrder = 0
end
end
object dbgActi_Prize: TDBGrid
Left = 0
Top = 0
Width = 458
Height = 129
Align = alTop
DataSource = DSOther
ImeName = '中文 (简体) - 智能 ABC'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
ParentShowHint = False
ShowHint = True
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'ACTIVE'
Title.Caption = '具体活动'
Width = 97
Visible = True
end
item
Expanded = False
FieldName = 'PUNISH'
Title.Caption = '处分'
Width = 116
Visible = True
end
item
Expanded = False
FieldName = 'PRIZE'
Title.Caption = '荣誉'
Width = 113
Visible = True
end
item
Expanded = False
FieldName = 'ADVICE'
Title.Caption = '领导认可 '
Width = 101
Visible = True
end
item
Expanded = False
FieldName = 'ACTI_TIME'
Title.Caption = '时间'
Width = 91
Visible = True
end>
end
end
object tssoci_rela: TTabSheet
Caption = '社会关系'
ImageIndex = 4
object Panel_soci_rela: TPanel
Left = 0
Top = 129
Width = 458
Height = 215
Align = alClient
BevelOuter = bvLowered
TabOrder = 0
object Label25: TLabel
Left = 14
Top = 14
Width = 63
Height = 14
Caption = '社会关系:'
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label38: TLabel
Left = 42
Top = 39
Width = 35
Height = 14
Caption = '姓名:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label42: TLabel
Left = 43
Top = 114
Width = 35
Height = 14
Caption = '性别:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label45: TLabel
Left = 14
Top = 87
Width = 63
Height = 14
Caption = '工作单位:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label46: TLabel
Left = 42
Top = 63
Width = 35
Height = 14
Caption = '职务:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label47: TLabel
Left = 16
Top = 139
Width = 63
Height = 14
Caption = '联系电话:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object co_SocietyNo: TFlatComboBox
Tag = 39
Left = 80
Top = 10
Width = 140
Height = 22
Style = csDropDownList
Color = clWindow
ItemHeight = 14
TabOrder = 0
ItemIndex = -1
end
object edSOCIRELA_NAME: TFlatEdit
Tag = 1
Left = 80
Top = 36
Width = 140
Height = 20
ColorFlat = clWindow
MaxLength = 8
TabOrder = 1
end
object coSOCIRELA_SEXNo: TFlatComboBox
Tag = 20
Left = 80
Top = 110
Width = 140
Height = 22
Style = csDropDownList
Color = clWindow
ItemHeight = 14
TabOrder = 4
ItemIndex = -1
end
object edSOCIRELA_WORK_UNIT: TFlatEdit
Tag = 1
Left = 80
Top = 84
Width = 140
Height = 20
ColorFlat = clWindow
MaxLength = 30
TabOrder = 3
end
object edSOCIRELA_DUTY: TFlatEdit
Tag = 1
Left = 80
Top = 60
Width = 140
Height = 20
ColorFlat = clWindow
MaxLength = 20
TabOrder = 2
end
object edSOCIRELA_PHONE_NO: TFlatEdit
Tag = 1
Left = 80
Top = 139
Width = 140
Height = 20
ColorFlat = clWindow
MaxLength = 11
TabOrder = 5
OnKeyPress = ed_SidKeyPress
end
end
object dbgSoci_Rela: TDBGrid
Left = 0
Top = 0
Width = 458
Height = 129
Align = alTop
DataSource = DSOther
ImeName = '中文 (简体) - 智能 ABC'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'SocietyName'
Title.Caption = '关系名称'
Width = 134
Visible = True
end
item
Expanded = False
FieldName = 'NAME'
Title.Caption = '姓名'
Visible = True
end
item
Expanded = False
FieldName = 'SEXname'
Title.Caption = '性别'
Visible = True
end
item
Expanded = False
FieldName = 'WORK_UNIT'
Title.Caption = '工作单位'
Visible = True
end
item
Expanded = False
FieldName = 'DUTY'
Title.Caption = '职务'
Visible = True
end
item
Expanded = False
FieldName = 'PHONE_NO'
Title.Caption = '联系电话'
Visible = True
end>
end
end
end
object Panel4: TPanel
Left = 0
Top = 376
Width = 466
Height = 40
Align = alBottom
BevelOuter = bvLowered
BorderWidth = 4
TabOrder = 1
object Btn_Exit: TFlatButton
Left = 382
Top = 8
Width = 70
Height = 25
Caption = '关闭'
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
0000}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 0
OnClick = Btn_ExitClick
Anchors = [akRight, akBottom]
end
object Btn_Cancel: TFlatButton
Tag = 5
Left = 309
Top = 8
Width = 70
Height = 25
Caption = '取消'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
3333333777333777FF33339993707399933333773337F3777FF3399933000339
9933377333777F3377F3399333707333993337733337333337FF993333333333
399377F33333F333377F993333303333399377F33337FF333373993333707333
333377F333777F333333993333101333333377F333777F3FFFFF993333000399
999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
99933773FF777F3F777F339993707399999333773F373F77777F333999999999
3393333777333777337333333999993333333333377777333333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 1
OnClick = Btn_CancelClick
Anchors = [akRight, akBottom]
end
object Btn_Save: TFlatButton
Tag = 4
Left = 236
Top = 8
Width = 70
Height = 25
Caption = '保存'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
0003737FFFFFFFFF7F7330099999999900333777777777777733}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 2
OnClick = Btn_SaveClick
Anchors = [akRight, akBottom]
end
object Btn_Delete: TFlatButton
Tag = 3
Left = 163
Top = 8
Width = 70
Height = 25
Caption = '删除'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 3
OnClick = Btn_DeleteClick
Anchors = [akRight, akBottom]
end
object Btn_Modify: TFlatButton
Tag = 2
Left = 90
Top = 8
Width = 70
Height = 25
Caption = '修改'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
00333377737FFFFF773333303300000003333337337777777333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 4
OnClick = Btn_ModifyClick
Anchors = [akRight, akBottom]
end
object Btn_Add: TFlatButton
Tag = 1
Left = 17
Top = 8
Width = 70
Height = 25
Caption = '新增'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333FF33333333FF333993333333300033377F3333333777333993333333
300033F77FFF3333377739999993333333333777777F3333333F399999933333
33003777777333333377333993333333330033377F3333333377333993333333
3333333773333333333F333333333333330033333333F33333773333333C3333
330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
333333333337733333FF3333333C333330003333333733333777333333333333
3000333333333333377733333333333333333333333333333333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 5
OnClick = Btn_AddClick
Anchors = [akRight, akBottom]
end
end
end
object DSOther: TDataSource
DataSet = QueryOther
Left = 148
Top = 316
end
object DSManager: TDataSource
DataSet = QueryManager
Left = 48
Top = 316
end
object QueryOther: TQuery
AfterScroll = QueryOtherAfterScroll
DatabaseName = 'db_vipdl'
Left = 116
Top = 316
end
object QueryAnalyze: TQuery
DatabaseName = 'db_vipdl'
Left = 16
Top = 356
end
object QueryManager: TQuery
AutoCalcFields = False
AfterScroll = QueryManagerAfterScroll
DatabaseName = 'db_vipdl'
SQL.Strings = (
'select * from T_d_config')
Left = 20
Top = 316
end
object QuerySearchManager: TQuery
DatabaseName = 'db_vipdl'
Left = 52
Top = 356
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -