📄 unit_job.~dfm
字号:
object form_job: Tform_job
Left = 248
Top = 214
Width = 584
Height = 392
Caption = #25307#32856#31649#29702
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object ControlBar1: TControlBar
Left = 0
Top = 0
Width = 576
Height = 28
Align = alTop
AutoSize = True
TabOrder = 0
object ToolBar1: TToolBar
Left = 11
Top = 2
Width = 555
Height = 20
AutoSize = True
ButtonHeight = 20
ButtonWidth = 31
Caption = 'ToolBar1'
EdgeBorders = []
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
ShowCaptions = True
TabOrder = 0
object tbInfoAdd: TToolButton
Left = 0
Top = 0
Caption = #26032#22686
ImageIndex = 0
OnClick = tbInfoAddClick
end
object tbInfoEdit: TToolButton
Left = 31
Top = 0
Caption = #32534#36753
ImageIndex = 1
OnClick = tbInfoEditClick
end
object tbInfoDel: TToolButton
Left = 62
Top = 0
Caption = #21024#38500
ImageIndex = 2
OnClick = tbInfoDelClick
end
object ToolButton1: TToolButton
Left = 93
Top = 0
Width = 8
Caption = 'ToolButton1'
ImageIndex = 3
Style = tbsSeparator
end
object tbInfoList: TToolButton
Left = 101
Top = 0
Caption = #21015#34920
DropdownMenu = pmList
ImageIndex = 3
Style = tbsDropDown
OnClick = tbInfoListClick
end
object tbSearch: TToolButton
Left = 145
Top = 0
Caption = #25628#32034
DropdownMenu = pmSearch
ImageIndex = 4
Style = tbsDropDown
end
object ToolButton2: TToolButton
Left = 189
Top = 0
Width = 8
Caption = 'ToolButton2'
ImageIndex = 5
Style = tbsSeparator
end
object tbClose: TToolButton
Left = 197
Top = 0
Caption = #20851#38381
ImageIndex = 6
OnClick = tbCloseClick
end
end
end
object pcJob: TPageControl
Left = 0
Top = 28
Width = 576
Height = 337
ActivePage = tsList
Align = alClient
TabOrder = 1
object tsList: TTabSheet
Caption = #24037#20316#21015#34920
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 568
Height = 310
Align = alClient
DataSource = dm.dsJob
ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
Columns = <
item
Expanded = False
FieldName = 'iNo'
Title.Caption = #32534#21495
Width = 37
Visible = True
end
item
Expanded = False
FieldName = 'vEnterpriseName'
Title.Caption = #25307#32856#20225#19994
Width = 200
Visible = True
end
item
Expanded = False
FieldName = 'vName'
Title.Caption = #25307#32856#32844#20301
Width = 122
Visible = True
end
item
Expanded = False
FieldName = 'iNum'
Title.Caption = #25307#32856#20154#25968
Width = 53
Visible = True
end
item
Expanded = False
FieldName = 'dStartDate'
Title.Caption = #24320#22987#26102#38388
Width = 90
Visible = True
end
item
Expanded = False
FieldName = 'dEndDate'
Title.Caption = #32467#26463#26102#38388
Width = 94
Visible = True
end>
end
end
object tsParticular: TTabSheet
Caption = #24037#20316#35814#32454#20449#24687
ImageIndex = 1
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 568
Height = 310
Align = alClient
Caption = ' '#35814#32454#20449#24687' '
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 27
Width = 48
Height = 13
AutoSize = False
Caption = #25307#32856#32844#20301
FocusControl = dbeName
end
object Label2: TLabel
Left = 16
Top = 51
Width = 48
Height = 13
AutoSize = False
Caption = #25307#32856#20225#19994
FocusControl = dbeNum
end
object Label3: TLabel
Left = 16
Top = 76
Width = 48
Height = 13
AutoSize = False
Caption = #25307#32856#20154#25968
end
object Label4: TLabel
Left = 16
Top = 100
Width = 54
Height = 13
AutoSize = False
Caption = #24320#22987#26102#38388
FocusControl = dbeStartDate
end
object Label5: TLabel
Left = 16
Top = 123
Width = 54
Height = 13
AutoSize = False
Caption = #32467#26463#26102#38388
FocusControl = dbeEndDate
end
object Label6: TLabel
Left = 267
Top = 27
Width = 54
Height = 13
AutoSize = False
Caption = #32844#20301#35201#27714
FocusControl = dmRequire
end
object Label7: TLabel
Left = 16
Top = 152
Width = 54
Height = 13
AutoSize = False
Caption = #32852#31995#26041#24335
FocusControl = dmLiaison
end
object dbeName: TDBEdit
Left = 72
Top = 24
Width = 169
Height = 20
DataField = 'vName'
DataSource = dm.dsJob
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
TabOrder = 0
end
object dbeNum: TDBEdit
Left = 72
Top = 72
Width = 169
Height = 20
DataField = 'iNum'
DataSource = dm.dsJob
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
TabOrder = 1
end
object dbeEnterprise: TDBEdit
Left = 72
Top = 48
Width = 169
Height = 20
DataField = 'vEnterpriseName'
DataSource = dm.dsJob
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
TabOrder = 2
end
object dbeStartDate: TDBEdit
Left = 72
Top = 96
Width = 169
Height = 20
DataField = 'dStartDate'
DataSource = dm.dsJob
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
TabOrder = 3
end
object dbeEndDate: TDBEdit
Left = 72
Top = 120
Width = 169
Height = 20
DataField = 'dEndDate'
DataSource = dm.dsJob
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
TabOrder = 4
end
object dmRequire: TDBMemo
Left = 320
Top = 24
Width = 241
Height = 273
DataField = 'vRequire'
DataSource = dm.dsJob
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
TabOrder = 5
end
object dmLiaison: TDBMemo
Left = 72
Top = 144
Width = 169
Height = 153
DataField = 'vLiaison'
DataSource = dm.dsJob
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
TabOrder = 6
end
end
end
end
object XPMenu1: TXPMenu
DimLevel = 30
GrayLevel = 10
Font.Charset = GB2312_CHARSET
Font.Color = clMenuText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Color = clBtnFace
IconBackColor = clBtnFace
MenuBarColor = clBtnFace
SelectColor = clHighlight
SelectBorderColor = clHighlight
SelectFontColor = clMenuText
DisabledColor = clInactiveCaption
SeparatorColor = clBtnFace
CheckedColor = clHighlight
IconWidth = 24
DrawSelect = True
UseSystemColors = True
OverrideOwnerDraw = False
Gradient = False
FlatMenu = False
AutoDetect = False
Active = True
Left = 491
Top = 10
end
object pmSearch: TPopupMenu
OwnerDraw = True
Left = 435
Top = 10
object N1: TMenuItem
Caption = #24555#36895#23450#20301'..'
OnClick = N1Click
end
object N2: TMenuItem
Caption = #39640#32423#25628#32034'...'
end
end
object pmList: TPopupMenu
OwnerDraw = True
Left = 395
Top = 10
object N3: TMenuItem
Caption = #20840#37096#25307#32856#20449#24687
OnClick = N3Click
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -