frm_k_sgqdpas.dfm
来自「是一个用delphi设计的考勤系统」· DFM 代码 · 共 937 行 · 第 1/3 页
DFM
937 行
CCCCCCCCCCCCCCCBCBCBC9C9C9C7C7C7C5C5C5C3C3C3C2C2C2C1C1C1C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0C1C1
C1C3C3C3C6C6C6C9C9C9CDCDCDD1D1D1D5D5D5D7D7D7D9D9D9DADADAD9D9D9D7
D7D7D5D5D5D1D1D1CDCDCDC9C9C9C6C6C6C3C3C3C1C1C1C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C1C1C1C2C2C2C4C4C4C8C8C8CDCDCDD3
D3D3DADADAE0E0E0E5E5E5E9E9E9EBEBEBECECECEBEBEBE9E9E9E5E5E5E0E0E0
DADADAD3D3D3CDCDCDC8C8C8C4C4C4C2C2C2C1C1C1C0C0C0C0C0C0C0C0C0C0C0
C000C0C0C0C1C1C1C2C2C2C5C5C5CACACAD1D1D1D9D9D9E2E2E2EBE8E4EBDBC5
E3C9A3D5B382C59E66BA9156B89461BEA179CBB597D9CDBDE7E5E2E2E2E2D9D9
D9D1D1D1CACACAC5C5C5C2C2C2C1C1C1C0C0C0C0C0C0C0C0C000C0C0C0C2C2C2
C5C5C5CBCBCBD3D3D3DDDDDDE9E9E9F0DEC2EBC692DBAA64D2A25EC99B57C294
53BA8E50B2884DAA834AA47F499F7B49B69D7BD3C6B4E9E9E9DDDDDDD3D3D3CB
CBCBC5C5C5C2C2C2C0C0C0C0C0C0C0C0C000C1C1C1C4C4C4CACACAD3D3D3DEDE
DEEDE7DEF6D8AEEFBB6FE7B166DFAA5FD6A258CF9C53C6944FBE8F4CB68949B0
8446A77E449F7A449A7644987646C2B096E2DED9DEDEDED3D3D3CACACAC4C4C4
C1C1C1C0C0C0C0C0C000C3C3C3C8C8C8D1D1D1DDDDDDEDE7DEF6D6A7F3BC6FF2
B969EBB260E3AA5ADCA454D49D4FCD974BC69248BE8C45B68744AD8142A47B41
9D7640967341947243BBA78AE2DED9DDDDDDD1D1D1C8C8C8C3C3C3C1C1C1C0C0
C000C6C6C6CDCDCDD9D9D9E9E9E9F6D9AFF3BD70F2BA6AF2B663F0B35DE8AC56
E2A650DAA04CD49A48CD9646C79144BF8C42B58540AC7F40A2793E9A743E9471
40917042C0AE95E9E9E9D9D9D9CDCDCDC6C6C6C2C2C2C0C0C000C9C9C9D3D3D3
E2E2E2F4E1C5F3C075F2BB6DF2B764EAAF5B9D73392F200E0C0602E1A249DB9E
46D69945D09643C89141BF8B40B5853E07020044311899733E92703F927244D1
C4B3E2E2E2D3D3D3C9C9C9C3C3C3C0C0C000CDCDCDDADADAECE9E5F6D19BF3BD
71F2B967E9B0654835660100AD0000CC0702000C0602E2A145DE9E44D99B42D3
9641CA91400000D103017E07020033241296713D917040AF9777E7E5E2DADADA
CDCDCDC5C5C5C1C1C100D1D1D1E0E0E0F4E3CBF4BF76F3BC6EF1B8666E529D00
00D10000D10000D10000CC0702000C0602E5A243E19F42DB9C410000CA0000D1
0000D102019422170B9B743E95723F937243D5CBBBE0E0E0D1D1D1C7C7C7C2C2
C200D5D5D5E5E5E5F7DAB1F3BF74F3BB6BF2B762F1B35A0000D10000D10000D1
0000D10000CC0702000C0602E8A3420000D10000D10000D10000D10D08B0AA7D
3CA3793E9B753F967443C2AF93E5E5E5D5D5D5C9C9C9C2C2C200D7D7D7E9E9E9
F7CF98F3BE72F3BA6AF2B762F1B35AF0AF530000D10000D10000D10000D10000
CC0702000000D10000D10000D10000D1140E88BD8942B5853EA97E3FA079409A
7643B19673E9E9E9D7D7D7CBCBCBC3C3C300D9D9D9EBEBEBF5C785F3BE73F2BA
6AF2B661F1B259F0AF52F0AD4D0000D10000D10000D10000D10000CF0000D100
00D10000D10200A0D39640C89040BB8940B08240A67D429E7945A58558EBEBEB
D9D9D9CCCCCCC4C4C400DADADAECECECF4C27CF3BE73F2BA6BF2B661F1B35AF1
AF53F0AD4DEFAA490000D10000D10000D10000D10000D10000D10000D1E09E42
D89A42CC9242C08C42B58642AC8145A47E47A37F4CECECECDADADACCCCCCC4C4
C400D9D9D9EBEBEBF5C787F3BE75F2BB6CF2B762F1B35BF1B054F0AD4EEFAA49
38260F0000D10000D10000D10000D10000D10702000B0501DA9C42D09643C58F
43BB8A44B28547AB834AB08E5DEBEBEBD9D9D9CCCCCCC4C4C400D7D7D7E9E9E9
F7D19AF3C077F3BC6EF2B866F1B55EF1B157EBAA4E150EAA0000D10000D10000
D10000D10000D10000D10000CD0702000C0602D39845C99446C08E48B88A4BB1
884DC2A47AE9E9E9D7D7D7CBCBCBC3C3C300D4D4D4E5E5E5F7DBB2F4C179F3BD
71F2BA69F2B661EBAE5C1912890000D10000D10000D10000D10000D10000D100
00D10000D10000CC0702000C0602CE974AC6944CBE904EB98E52D3BD9CE5E5E5
D4D4D4C9C9C9C2C2C200D1D1D1DFDFDFF3E6D4F4C37DF3BF75F2BB6DF2B8651B
14A50000D10000D10000D10000D1EFAB4AEFAA470000D10000D10000D10000D1
0000CC070200080300CA9851C39554C09558E5DACADFDFDFD1D1D1C7C7C7C2C2
C200CDCDCDD9D9D9EAE9E7F7D3A0F3C179F3BD716750A50000D10000D10000D1
0000CBF0AD4FF0AD4EF0AC4CF0AC4C0000D10000D10000D10000D10000D08361
32D29F57CA9C5AD6B688E9E8E6D9D9D9CDCDCDC5C5C5C1C1C100C9C9C9D3D3D3
E1E1E1F3E6D5F4C37EF3C077DDAC792019C30000D10000D1F1B259F1B056F0B0
54F0AF52F0AF51F0AE520000D10101D10201AD553F75DEA85BD7A65DD3A562EA
DECDE1E1E1D3D3D3C9C9C9C3C3C3C0C0C000C5C5C5CDCDCDD8D8D8E7E7E7F6E0
C0F4C27CF3BF77D3A47D2019C3F2B865F2B661F2B45EF1B35AF0B257F0B258F1
B258F1B25A0504CF936F8BEBB260E4AE63DEAC65EAD4B5E7E7E7D8D8D8CDCDCD
C5C5C5C1C1C1C0C0C000C3C3C3C8C8C8D0D0D0DBDBDBEAE8E5F7DEBAF4C27CF3
C077F3BE72F3BB6CF2B968F2B764F2B762F2B560F1B660F1B560F1B561F2B762
F2B866F0B969EAB56BEFD5B1E9E7E4DBDBDBD0D0D0C8C8C8C3C3C3C1C1C1C0C0
C000C1C1C1C4C4C4C9C9C9D1D1D1DCDCDCE9E8E6F5E2C6F4C37DF4C179F3BE74
F3BD70F3BC6DF3BA6AF3B967F3B967F2B968F2BA69F2BA6AF3BC6DF3BE72F4DF
C1E9E8E5DCDCDCD1D1D1C9C9C9C4C4C4C1C1C1C0C0C0C0C0C000C0C0C0C2C2C2
C4C4C4CACACAD1D1D1DADADAE5E5E5F2E9DCF7D9B0F4C27BF4C078F3BF75F3BE
72F3BE71F3BD6FF2BC70F3BD71F3BE73F7D7ABF1E8DBE5E5E5DADADAD1D1D1CA
CACAC4C4C4C2C2C2C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C2C2C2C4C4C4C9C9
C9CFCFCFD6D6D6DFDFDFE8E7E7F0EBE2F6E5CDF7D9AFF6CB8FF4C179F6CA8DF7
D9ACF6E4CBF0EAE1E8E7E7DFDFDFD6D6D6CFCFCFC9C9C9C4C4C4C2C2C2C0C0C0
C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C2C2C2C4C4C4C7C7C7CBCBCBD1
D1D1D7D7D7DDDDDDE2E2E2E6E6E6E9E9E9EAEAEAE9E9E9E6E6E6E2E2E2DDDDDD
D7D7D7D1D1D1CBCBCBC7C7C7C4C4C4C2C2C2C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C000C0C0C0C0C0C0C0C0C0C0C0C0C1C1C1C2C2C2C5C5C5C8C8C8CBCBCBCFCFCF
D3D3D3D5D5D5D7D7D7D8D8D8D7D7D7D5D5D5D3D3D3CFCFCFCBCBCBC8C8C8C5C5
C5C2C2C2C1C1C1C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000}
OnClick = BtnExitClick
end
object LBtnExit: TLabelB
Left = 246
Top = 157
Width = 26
Height = 13
Cursor = crHandPoint
Caption = #21462#28040
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsUnderline]
ParentFont = False
Transparent = True
OnClick = BtnExitClick
end
object chk1: TCheckBox
Left = 20
Top = 10
Width = 23
Height = 18
TabOrder = 0
OnClick = chk1Click
end
object Edit1: TEdit
Left = 117
Top = 7
Width = 173
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ImeMode = imClose
ParentFont = False
TabOrder = 1
end
object GroupBox3: TGroupBox
Left = 5
Top = 69
Width = 291
Height = 74
Caption = ' '#26085#26399#36873#25321
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
object Label6: TLabel
Left = 133
Top = 35
Width = 24
Height = 16
Caption = '-->'
end
object dtp1: TDateTimePicker
Left = 11
Top = 30
Width = 122
Height = 24
Date = 36761.906077314800000000
Time = 36761.906077314800000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
ParentFont = False
TabOrder = 0
end
object dtp2: TDateTimePicker
Left = 158
Top = 30
Width = 123
Height = 24
Date = 36761.906077314800000000
Time = 36761.906077314800000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
ParentFont = False
TabOrder = 1
end
end
object chk3: TCheckBox
Left = 20
Top = 67
Width = 23
Height = 19
TabOrder = 3
end
object chk2: TCheckBox
Left = 20
Top = 38
Width = 23
Height = 18
TabOrder = 4
end
object yhxm: TEdit
Left = 117
Top = 38
Width = 174
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ImeMode = imClose
ParentFont = False
TabOrder = 5
end
end
end
object BitBtn1: TBitBtn
Left = 24
Top = 16
Width = 81
Height = 25
Caption = #25163#24037#31614#21040
TabOrder = 5
OnClick = BitBtn1Click
end
object BitBtn3: TBitBtn
Left = 120
Top = 16
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 6
OnClick = BitBtn3Click
end
object Dkqjl: TDataSource
DataSet = Qrysgqd
Left = 291
Top = 16
end
object Dyhxx: TDataSource
DataSet = Qyhxx
Left = 235
Top = 16
end
object Qyhxx: TADOQuery
Connection = WindData.AdoConn
Parameters = <>
SQL.Strings = (
'select yhbh,yhxm from zx_s_yhxx'
' order by yhbh')
Left = 264
Top = 16
end
object Qrysgqd: TADOQuery
Connection = WindData.AdoConn
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select yhbh,yhxm,jlrq,jlsj,bmbh,bmmc from vkq_kqjlcur')
Left = 320
Top = 16
end
object pkq_A_Sgqd: TADOStoredProc
Connection = WindData.AdoConn
ProcedureName = 'pkq_A_Sgqd'
Parameters = <
item
Name = '@RETURN_VALUE'
DataType = ftInteger
Direction = pdReturnValue
Precision = 10
Value = Null
end
item
Name = '@cs'
Attributes = [paNullable]
DataType = ftString
Size = 1
Value = Null
end
item
Name = '@csz'
Attributes = [paNullable]
DataType = ftString
Size = 20
Value = Null
end
item
Name = '@kqrq'
Attributes = [paNullable]
DataType = ftString
Size = 10
Value = Null
end
item
Name = '@kqsj'
Attributes = [paNullable]
DataType = ftString
Size = 8
Value = Null
end
item
Name = '@qdlb'
Attributes = [paNullable]
DataType = ftString
Size = 1
Value = Null
end
item
Name = '@bc'
Attributes = [paNullable]
DataType = ftInteger
Precision = 10
Value = Null
end
item
Name = '@Retmsg'
Attributes = [paNullable]
DataType = ftString
Direction = pdInputOutput
Size = 100
Value = Null
end>
Left = 344
Top = 16
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?