📄 pay220_01.dfm.svn-base
字号:
inherited Pay220_01Form: TPay220_01Form
Left = -4
Top = -4
Width = 808
Height = 580
Caption = #34218#36164#24180#24230#26597#35810
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 12
object CoolBar1: TCoolBar [0]
Left = 0
Top = 0
Width = 800
Height = 43
AutoSize = True
Bands = <
item
Control = ToolBar2
ImageIndex = -1
MinHeight = 39
Width = 796
end>
object ToolBar2: TToolBar
Left = 9
Top = 0
Width = 783
Height = 39
AutoSize = True
ButtonHeight = 39
ButtonWidth = 31
Caption = 'ToolBar2'
EdgeBorders = []
Flat = True
Images = SYSDM.imgBtn
ParentShowHint = False
ShowCaptions = True
ShowHint = True
TabOrder = 0
object tlbFirst: TToolButton
Left = 0
Top = 0
Action = ActFirst
AutoSize = True
end
object tlbPrior: TToolButton
Left = 35
Top = 0
Action = ActPrior
AutoSize = True
end
object tlbNext: TToolButton
Left = 70
Top = 0
Action = ActNext
AutoSize = True
end
object tlbLast: TToolButton
Left = 105
Top = 0
Action = ActLast
AutoSize = True
end
object ToolButton1: TToolButton
Left = 140
Top = 0
Width = 8
Caption = 'ToolButton1'
ImageIndex = 13
Style = tbsSeparator
end
object tlbLocate: TToolButton
Left = 148
Top = 0
Action = ActLocate
AutoSize = True
end
object tlbSearch: TToolButton
Left = 183
Top = 0
Action = ActSearch
AutoSize = True
end
object tlbPrint: TToolButton
Left = 218
Top = 0
Action = ActPrint
AutoSize = True
DropdownMenu = PopupMenu2
Style = tbsDropDown
end
object ToolButton6: TToolButton
Left = 266
Top = 0
Width = 8
Caption = 'ToolButton6'
ImageIndex = 16
Style = tbsSeparator
end
object tlbExit: TToolButton
Left = 274
Top = 0
Action = ActExit
AutoSize = True
end
end
end
object Panel1: TPanel [1]
Left = 0
Top = 43
Width = 800
Height = 37
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
DesignSize = (
800
37)
object Image1: TImage
Left = 2
Top = 2
Width = 796
Height = 33
Align = alClient
Stretch = True
end
object lblEmpID: TLabel
Left = 299
Top = 13
Width = 48
Height = 12
Anchors = [akTop, akRight]
Caption = #21592#24037#32534#21495
Transparent = True
end
object sbEmp: TSpeedButton
Left = 438
Top = 9
Width = 21
Height = 21
Anchors = [akTop, akRight]
Flat = True
Glyph.Data = {
F6060000424DF606000000000000360000002800000018000000180000000100
180000000000C006000000000000000000000000000000000000FF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000
000000FF00FFFF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FF000000C0C0C0000000FF00FFFF00FFFF00FFFF00FFFF00FF000000C0C0C0
000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FF000000000000000000808080FF00FFFF00FFFF00FF80
8080000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000000000000000000000
00000000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000000000C0C0C0
000000000000000000000000C0C0C0000000000000000000000000FF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
FFFF000000C0C0C0000000000000000000000000C0C0C0000000000000000000
000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
00FFFFFF80808080808000000000000000000000000000000000000000000000
0000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000
00C0C0C0000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFF808080808080FFFFFF808080
000000000000808080808080FFFFFF000000000000FF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
FFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF000000000000FF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
00FFFFFF808080808080FFFFFF808080000000000000808080808080FFFFFF00
0000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFBF0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000BF0000BF0000
BF0000BF0000BF0000BF0000BF0000BF0000FF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000C0C0C0BF0000BF
0000C0C0C0BF0000BF0000C0C0C0BF0000BF0000C0C0C0BF0000FF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
00BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF
0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
OnClick = sbEmpClick
end
object lblYear: TLabel
Left = 621
Top = 14
Width = 24
Height = 12
Anchors = [akTop, akRight]
Caption = #24180#20221
Transparent = True
end
object sbOk: TSpeedButton
Left = 728
Top = 9
Width = 59
Height = 21
Anchors = [akTop, akRight]
Caption = #30830#23450
Flat = True
OnClick = sbOkClick
end
object edtEmpID: TEdit
Left = 355
Top = 10
Width = 82
Height = 20
Anchors = [akTop, akRight]
TabOrder = 0
OnExit = edtEmpIDExit
OnKeyDown = edtEmpIDKeyDown
end
object edtEmpName: TEdit
Left = 465
Top = 10
Width = 141
Height = 20
Anchors = [akTop, akRight]
Enabled = False
TabOrder = 1
end
object cbYear: TComboBox
Left = 651
Top = 10
Width = 67
Height = 20
Style = csDropDownList
Anchors = [akTop, akRight]
ItemHeight = 12
TabOrder = 2
end
end
object ScrollBox2: TScrollBox [2]
Left = 0
Top = 80
Width = 800
Height = 473
Align = alClient
TabOrder = 2
object dxDBGrid1: TdxDBGrid
Left = 0
Top = 0
Width = 796
Height = 469
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = 'P150_002'
ShowGroupPanel = True
SummaryGroups = <>
SummarySeparator = ', '
Align = alClient
BorderStyle = bsNone
PopupMenu = pmGrid
TabOrder = 0
DataSource = DataSource1
Filter.Criteria = {00000000}
HeaderColor = 15262169
HideFocusRect = True
LookAndFeel = lfUltraFlat
OptionsDB = [edgoCancelOnExit, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks]
OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap]
OnBackgroundDrawEvent = dxDBGrid1BackgroundDrawEvent
end
end
object PopupMenu2: TPopupMenu
Left = 432
Top = 8
object mmiPrint: TMenuItem
Action = ActPrint
end
object mmiExport: TMenuItem
Action = ActExport
end
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 152
Top = 128
end
object frReport1: TfrReport
Dataset = frDBDataSet1
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbExit, pbPageSetup]
RebuildPrinter = False
Left = 216
Top = 72
ReportForm = {19000000}
end
object frDBDataSet1: TfrDBDataSet
DataSet = ADOQuery1
Left = 248
Top = 72
end
object ADOQuery1: TADOQuery
CacheSize = 1000
Connection = SYSDM.ADOC
AfterScroll = ADOQuery1AfterScroll
Parameters = <>
SQL.Strings = (
'select * from PAY150')
Left = 168
Top = 144
end
object ActionList1: TActionList
Images = SYSDM.imgBtn
Left = 368
Top = 72
object ActFirst: TAction
Caption = #26368#21069
Hint = #31227#21040#31532#19968#26465#35760#24405
ImageIndex = 0
ShortCut = 32838
OnExecute = ActFirstExecute
end
object ActPrior: TAction
Caption = #19978#31227
Hint = #31227#21040#19978#19968#26465#35760#24405
ImageIndex = 1
ShortCut = 32834
OnExecute = ActPriorExecute
end
object ActNext: TAction
Caption = #19979#31227
Hint = #31227#21040#19979#19968#26465#35760#24405
ImageIndex = 2
ShortCut = 32846
OnExecute = ActNextExecute
end
object ActLast: TAction
Caption = #26368#21518
Hint = #31227#21040#26368#21518#19968#26465#35760#24405
ImageIndex = 3
ShortCut = 32844
OnExecute = ActLastExecute
end
object ActLocate: TAction
Caption = #26597#25214
Hint = #24555#36895#23450#20301#35760#24405
ImageIndex = 10
ShortCut = 32847
OnExecute = ActLocateExecute
end
object ActSearch: TAction
Caption = #26597#35810
Hint = #25353#26465#20214#26597#35810#25968#25454
ImageIndex = 11
ShortCut = 32849
OnExecute = ActSearchExecute
end
object ActPrint: TAction
Caption = #25171#21360
Hint = #23558#25968#25454#25171#21360#20986#26469
ImageIndex = 12
ShortCut = 32848
OnExecute = ActPrintExecute
end
object ActExport: TAction
Caption = #23548#20986#21040'Excel'
Hint = #23548#20986#21040'Excel'#25991#20214#20013
ShortCut = 32852
OnExecute = ActExportExecute
end
object ActExit: TAction
Caption = #36864#20986
Hint = #20851#38381#24403#21069#31383#21475
ImageIndex = 15
ShortCut = 32856
OnExecute = ActExitExecute
end
end
object pmGrid: TPopupMenu
Left = 240
Top = 184
end
object qryHrm150: TADOQuery
CacheSize = 1000
Connection = SYSDM.ADOC
Parameters = <>
SQL.Strings = (
'select H150_001,H150_002,H150_003 from HRM150 order by H150_002')
Left = 144
Top = 48
object qryHrm150H150_001: TAutoIncField
FieldName = 'H150_001'
ReadOnly = True
Visible = False
end
object qryHrm150H150_002: TStringField
DisplayLabel = #21592#24037#32534#21495
FieldName = 'H150_002'
FixedChar = True
Size = 10
end
object qryHrm150H150_003: TStringField
DisplayLabel = #21592#24037#22995#21517
FieldName = 'H150_003'
FixedChar = True
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -