📄 sy_ckjhdcx.dfm
字号:
Expanded = False
FieldName = 'JSJ'
Title.Caption = '结算价(元)'
Visible = True
end
item
Expanded = False
FieldName = 'JSJE'
Title.Caption = '结算金额(元)'
Visible = True
end
item
Expanded = False
FieldName = 'FPSL'
Title.Caption = '分配数量'
Visible = True
end
item
Expanded = False
FieldName = 'ZBR'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '制表人'
Width = 45
Visible = True
end
item
Expanded = False
FieldName = 'PZR'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '批准人'
Width = 51
Visible = True
end
item
Expanded = False
FieldName = 'BZ'
Title.Alignment = taCenter
Title.Caption = '备注'
Width = 106
Visible = True
end
item
Expanded = False
FieldName = 'ZDRQ'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '制单日期'
Width = 63
Visible = True
end>
end
end
end
end
object Panel3: TPanel
Left = 0
Top = 436
Width = 692
Height = 37
Align = alBottom
BevelOuter = bvLowered
TabOrder = 2
object BBt_Quit: TBitBtn
Left = 604
Top = 7
Width = 75
Height = 25
Cancel = True
Caption = '返回(&X)'
ModalResult = 3
TabOrder = 3
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
0000}
NumGlyphs = 2
end
object BBt_Find: TBitBtn
Left = 417
Top = 7
Width = 75
Height = 25
Action = Act_Find
Caption = '查询(&F)'
TabOrder = 1
Glyph.Data = {
36020000424D3602000000000000360000002800000010000000100000000100
10000000000000020000000000000000000000000000000000001F7C1F7C1F7C
1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F001F001F00
1F001F001F7C1F7C1F7C1F7C1F7C1F001F001F001F001F001F7C1F00FF7F1F00
1F001F001F7C1F7C1F7C1F7C1F7C1F00FF7F1F001F001F001F7C1F00FF7F1F00
1F001F001F7C1F7C1F7C1F7C1F7C1F00FF7F1F001F001F001F7C1F001F001F00
1F001F001F001F001F7C1F001F001F001F001F001F001F001F7C1F001F00FF7F
1F001F001F001F001F001F00FF7F1F001F001F001F001F001F7C1F001F00FF7F
1F001F001F001F7C1F001F00FF7F1F001F001F001F001F001F7C1F001F00FF7F
1F001F001F001F7C1F001F00FF7F1F001F001F001F001F001F7C1F7C1F001F00
1F001F001F001F001F001F001F001F001F001F001F001F7C1F7C1F7C1F7C1F00
FF7F1F001F001F001F7C1F00FF7F1F001F001F001F7C1F7C1F7C1F7C1F7C1F00
1F001F001F001F001F7C1F001F001F001F001F001F7C1F7C1F7C1F7C1F7C1F7C
1F001F001F001F7C1F7C1F7C1F001F001F001F7C1F7C1F7C1F7C1F7C1F7C1F7C
1F00FF7F1F001F7C1F7C1F7C1F00FF7F1F001F7C1F7C1F7C1F7C1F7C1F7C1F7C
1F001F001F001F7C1F7C1F7C1F001F001F001F7C1F7C1F7C1F7C1F7C1F7C1F7C
1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C}
end
object BBt_Print: TBitBtn
Left = 511
Top = 7
Width = 75
Height = 25
Action = Act_Print
Caption = '打印(&P)'
TabOrder = 2
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
0003377777777777777308888888888888807F33333333333337088888888888
88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object BBt_Hide: TBitBtn
Left = 324
Top = 7
Width = 75
Height = 25
Action = Act_Hide
Caption = '隐藏(&H)'
TabOrder = 0
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003FF3FFFFF3333777003000003333
300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333
330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000
333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000
339977FF777777773377000BFB03333333337773FF733333333F333000333333
3300333777333333337733333333333333003333333333333377333333333333
333333333333333333FF33333333333330003333333333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
end
object ALi_Edit: TActionList
Left = 576
Top = 146
object Act_AddDW: TAction
Caption = '添加单位(&G)'
Hint = '添加'
ImageIndex = 0
ShortCut = 16449
end
object Act_DeleteDW: TAction
Caption = '删除单位(&K)'
Hint = '删除'
ImageIndex = 1
ShortCut = 16452
end
object Act_AddFPJH: TAction
Caption = '做分配计划(&A)'
end
object Act_DeleteFPJH: TAction
Caption = '删除(&D)'
end
object Act_ModifyFPJH: TAction
Caption = '修改(&M)'
Hint = '修改'
ImageIndex = 2
ShortCut = 16461
end
object Act_Find: TAction
Caption = '查询(&F)'
ImageIndex = 17
OnExecute = Act_FindExecute
end
object Act_Print: TAction
Caption = '打印(&P)'
Hint = '打印'
ImageIndex = 9
ShortCut = 16464
OnExecute = Act_PrintExecute
end
object Act_Save: TAction
Caption = '存盘(&S)'
Hint = '存盘'
ImageIndex = 3
ShortCut = 16467
end
object Act_Cancel: TAction
Caption = '取消(&C)'
Hint = '取消'
ImageIndex = 4
ShortCut = 16474
end
object Act_Send: TAction
Caption = '发送(&S)'
end
object Act_Hide: TAction
Caption = '隐藏(&H)'
OnExecute = Act_HideExecute
end
end
object Qry_JJNFPJH: TQuery
DatabaseName = 'yzpp'
SQL.Strings = (
'select A.CKJHDH, A.CKXZ, A.ZBR, A.PZR, A.ZDRQ, A.BZ , A.ZT, B.KF' +
'DM, B.DWDM, B.PPDM, B.JJ, B.DWMC, B.KWH, B.PPMC, B.YJ, B.XJ, B.Z' +
'K, B.JSJ, B.FPSL, 0 jsje FROM TYS_JYCKJHDB A,TYS_JYCKJHDPPB B wh' +
'ere A.CKJHDH = B.CKJHDH ')
Left = 242
Top = 176
object Qry_JJNFPJHCKJHDH: TStringField
FieldName = 'CKJHDH'
Origin = 'YZPP.TYS_JYCKJHDB.CKJHDH'
end
object Qry_JJNFPJHCKXZ: TStringField
FieldName = 'CKXZ'
Origin = 'YZPP.TYS_JYCKJHDB.CKXZ'
Size = 2
end
object Qry_JJNFPJHZBR: TStringField
FieldName = 'ZBR'
Origin = 'YZPP.TYS_JYCKJHDB.ZBR'
Size = 12
end
object Qry_JJNFPJHPZR: TStringField
FieldName = 'PZR'
Origin = 'YZPP.TYS_JYCKJHDB.PZR'
Size = 12
end
object Qry_JJNFPJHZDRQ: TDateTimeField
FieldName = 'ZDRQ'
Origin = 'YZPP.TYS_JYCKJHDB.ZDRQ'
end
object Qry_JJNFPJHBZ: TStringField
FieldName = 'BZ'
Origin = 'YZPP.TYS_JYCKJHDB.BZ'
Size = 200
end
object Qry_JJNFPJHZT: TStringField
FieldName = 'ZT'
Origin = 'YZPP.TYS_JYCKJHDB.ZT'
Size = 1
end
object Qry_JJNFPJHKFDM: TStringField
FieldName = 'KFDM'
Origin = 'YZPP.TYS_JYCKJHDPPB.KFDM'
Size = 3
end
object Qry_JJNFPJHDWDM: TStringField
FieldName = 'DWDM'
Origin = 'YZPP.TYS_JYCKJHDPPB.DWDM'
Size = 8
end
object Qry_JJNFPJHPPDM: TStringField
FieldName = 'PPDM'
Origin = 'YZPP.TYS_JYCKJHDPPB.PPDM'
Size = 13
end
object Qry_JJNFPJHJJ: TFloatField
FieldName = 'JJ'
Origin = 'YZPP.TYS_JYCKJHDPPB.JJ'
OnGetText = Qry_JJNFPJHJJGetText
OnSetText = Qry_JJNFPJHJJSetText
end
object Qry_JJNFPJHDWMC: TStringField
FieldName = 'DWMC'
Origin = 'YZPP.TYS_JYCKJHDPPB.DWMC'
Size = 40
end
object Qry_JJNFPJHKWH: TStringField
FieldName = 'KWH'
Origin = 'YZPP.TYS_JYCKJHDPPB.KWH'
Size = 30
end
object Qry_JJNFPJHPPMC: TStringField
FieldName = 'PPMC'
Origin = 'YZPP.TYS_JYCKJHDPPB.PPMC'
Size = 60
end
object Qry_JJNFPJHYJ: TFloatField
FieldName = 'YJ'
Origin = 'YZPP.TYS_JYCKJHDPPB.YJ'
end
object Qry_JJNFPJHXJ: TFloatField
FieldName = 'XJ'
Origin = 'YZPP.TYS_JYCKJHDPPB.XJ'
OnGetText = Qry_JJNFPJHJJGetText
OnSetText = Qry_JJNFPJHJJSetText
end
object Qry_JJNFPJHZK: TFloatField
FieldName = 'ZK'
Origin = 'YZPP.TYS_JYCKJHDPPB.ZK'
end
object Qry_JJNFPJHJSJ: TFloatField
FieldName = 'JSJ'
Origin = 'YZPP.TYS_JYCKJHDPPB.JSJ'
OnGetText = Qry_JJNFPJHJJGetText
OnSetText = Qry_JJNFPJHJJSetText
end
object Qry_JJNFPJHFPSL: TFloatField
FieldName = 'FPSL'
Origin = 'YZPP.TYS_JYCKJHDPPB.FPSL'
DisplayFormat = '#,##'
end
object Qry_JJNFPJHJSJE: TFloatField
FieldName = 'JSJE'
OnGetText = Qry_JJNFPJHJJGetText
OnSetText = Qry_JJNFPJHJJSetText
end
end
object DataSource3: TDataSource
DataSet = Qry_JJNFPJH
Left = 272
Top = 174
end
object Qry_GXDWSJB: TQuery
DatabaseName = 'yzpp'
SQL.Strings = (
'select DWDM,DWMC from TO_GXDWSJB')
Left = 240
Top = 130
end
object Qry_Static: TQuery
DatabaseName = 'yzpp'
SQL.Strings = (
'select * from to_gxdwsjb')
Left = 512
Top = 146
end
object Query1: TQuery
DatabaseName = 'yzpp'
SQL.Strings = (
'select DWDM,DWMC from TO_GXDWSJB')
Left = 584
Top = 178
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -