hanxuntao
/
DS6JIEFENG
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
master
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from '48f045977c'
${ noResults }
DS6JIEFENG/费用模块/u_fee_check_shen.~dfm

662 lines
16 KiB
Plaintext
Raw Normal View History Unescape Escape

1
11 months ago
object frm_fee_check_shen: Tfrm_fee_check_shen
Left = 271
Top = 122
BorderIcons = []
BorderStyle = bsDialog
Caption = #23519#30475#21382#21490#36153#29992#30003#35831#20449#24687
ClientHeight = 399
ClientWidth = 612
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
PixelsPerInch = 96
TextHeight = 12
object dxDBGrid1: TdxDBGrid
Left = 0
Top = 0
Width = 377
Height = 399
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = 'FM_ID'
SummaryGroups = <>
SummarySeparator = ', '
Align = alLeft
TabOrder = 0
DataSource = t_ch_fee1
Filter.Criteria = {00000000}
OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks]
OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap]
object dxDBGrid1Column1: TdxDBGridMaskColumn
ReadOnly = True
Width = 58
BandIndex = 0
RowIndex = 0
FieldName = #30003#35831#31867#22411
end
object dxDBGrid1Column2: TdxDBGridMaskColumn
ReadOnly = True
Width = 57
BandIndex = 0
RowIndex = 0
FieldName = #30003#35831#29366#24577
end
object dxDBGrid1Column3: TdxDBGridMaskColumn
ReadOnly = True
Width = 101
BandIndex = 0
RowIndex = 0
FieldName = #36153#29992#21517#31216
end
object dxDBGrid1Column4: TdxDBGridMaskColumn
ReadOnly = True
Width = 47
BandIndex = 0
RowIndex = 0
FieldName = #30003#35831#20154
end
object dxDBGrid1Column5: TdxDBGridDateColumn
ReadOnly = True
Width = 77
BandIndex = 0
RowIndex = 0
FieldName = #30003#35831#26085#26399
end
end
object bsSkinPanel1: TbsSkinPanel
Left = 377
Top = 0
Width = 235
Height = 399
TabOrder = 1
SkinData = frm_main.bsSkinData1
SkinDataName = 'panel'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
AutoEnabledControls = True
CheckedMode = False
Checked = False
DefaultAlignment = taLeftJustify
DefaultCaptionHeight = 22
BorderStyle = bvFrame
CaptionMode = False
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = 'bsSkinPanel1'
Align = alClient
object Label1: TLabel
Left = 5
Top = 8
Width = 48
Height = 12
Caption = #23457' '#26680' '#20154
FocusControl = DBEdit1
Transparent = True
end
object Label2: TLabel
Left = 5
Top = 30
Width = 48
Height = 12
Caption = #23457#26680#26085#26399
FocusControl = DBEdit2
Transparent = True
end
object DBEdit1: TDBEdit
Left = 56
Top = 4
Width = 170
Height = 20
DataField = #23457#26680#20154
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 56
Top = 26
Width = 170
Height = 20
DataField = #23457#26680#26085#26399
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 1
end
object bsSkinPanel2: TbsSkinPanel
Left = 1
Top = 59
Width = 233
Height = 339
TabOrder = 2
SkinData = frm_main.bsSkinData1
SkinDataName = 'panel'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
AutoEnabledControls = True
CheckedMode = False
Checked = False
DefaultAlignment = taLeftJustify
DefaultCaptionHeight = 22
BorderStyle = bvFrame
CaptionMode = False
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = 'bsSkinPanel2'
Align = alBottom
object a_modify_old: TbsSkinGroupBox
Left = 1
Top = 1
Width = 231
Height = 200
TabOrder = 0
Visible = False
SkinData = frm_main.bsSkinData1
SkinDataName = 'groupbox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
AutoEnabledControls = True
CheckedMode = False
Checked = False
DefaultAlignment = taLeftJustify
DefaultCaptionHeight = 22
BorderStyle = bvFrame
CaptionMode = True
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = #30003#35831#20462#25913#26087#20540
Align = alTop
object Label8: TLabel
Left = 3
Top = 28
Width = 24
Height = 12
Caption = #36153#29992
FocusControl = DBEdit3
Transparent = True
end
object Label9: TLabel
Left = 3
Top = 50
Width = 24
Height = 12
Caption = #23458#25143
FocusControl = DBEdit4
Transparent = True
end
object Label10: TLabel
Left = 115
Top = 94
Width = 24
Height = 12
Caption = #37329#39069
FocusControl = DBEdit5
Transparent = True
end
object Label11: TLabel
Left = 3
Top = 116
Width = 24
Height = 12
Caption = #24065#21035
FocusControl = DBEdit6
Transparent = True
end
object Label12: TLabel
Left = 115
Top = 116
Width = 24
Height = 12
Caption = #27719#29575
FocusControl = DBEdit7
Transparent = True
end
object Label13: TLabel
Left = 3
Top = 72
Width = 24
Height = 12
Caption = #26631#20934
FocusControl = DBEdit8
Transparent = True
end
object Label14: TLabel
Left = 115
Top = 72
Width = 24
Height = 12
Caption = #25968#37327
FocusControl = DBEdit9
Transparent = True
end
object Label15: TLabel
Left = 3
Top = 94
Width = 24
Height = 12
Caption = #21333#20215
FocusControl = DBEdit10
Transparent = True
end
object Label3: TLabel
Left = 3
Top = 137
Width = 24
Height = 12
Caption = #21407#22240
Transparent = True
end
object DBEdit3: TDBEdit
Left = 28
Top = 24
Width = 195
Height = 20
DataField = #36153#29992#21517#31216
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 0
end
object DBEdit4: TDBEdit
Left = 28
Top = 46
Width = 195
Height = 20
DataField = #23458#25143#21517#31216
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 1
end
object DBEdit5: TDBEdit
Left = 139
Top = 90
Width = 84
Height = 20
DataField = #37329#39069
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 2
end
object DBEdit6: TDBEdit
Left = 28
Top = 112
Width = 84
Height = 20
DataField = #24065#21035
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 3
end
object DBEdit7: TDBEdit
Left = 139
Top = 112
Width = 84
Height = 20
DataField = #27719#29575
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 4
end
object DBEdit8: TDBEdit
Left = 28
Top = 68
Width = 84
Height = 20
DataField = #26631#20934
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 5
end
object DBEdit9: TDBEdit
Left = 139
Top = 68
Width = 84
Height = 20
DataField = #25968#37327
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 6
end
object DBEdit10: TDBEdit
Left = 28
Top = 90
Width = 84
Height = 20
DataField = #21333#20215
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 7
end
object DBMemo1: TDBMemo
Left = 28
Top = 134
Width = 195
Height = 63
DataField = #36153#29992#21407#22240
DataSource = t_ch_fee1
ReadOnly = True
TabOrder = 8
end
end
object a_modify_new: TbsSkinGroupBox
Left = 1
Top = 201
Width = 231
Height = 137
TabOrder = 1
Visible = False
SkinData = frm_main.bsSkinData1
SkinDataName = 'groupbox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
AutoEnabledControls = True
CheckedMode = False
Checked = False
DefaultAlignment = taLeftJustify
DefaultCaptionHeight = 22
BorderStyle = bvFrame
CaptionMode = True
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = #30003#35831#20462#25913#26032#20540
Align = alClient
object Label4: TLabel
Left = 3
Top = 28
Width = 24
Height = 12
Caption = #36153#29992
FocusControl = DBEdit11
Transparent = True
end
object Label5: TLabel
Left = 3
Top = 50
Width = 24
Height = 12
Caption = #23458#25143
FocusControl = DBEdit12
Transparent = True
end
object Label6: TLabel
Left = 115
Top = 94
Width = 24
Height = 12
Caption = #37329#39069
FocusControl = DBEdit13
Transparent = True
end
object Label7: TLabel
Left = 3
Top = 116
Width = 24
Height = 12
Caption = #24065#21035
FocusControl = DBEdit14
Transparent = True
end
object Label16: TLabel
Left = 115
Top = 116
Width = 24
Height = 12
Caption = #27719#29575
FocusControl = DBEdit15
Transparent = True
end
object Label17: TLabel
Left = 3
Top = 72
Width = 24
Height = 12
Caption = #26631#20934
FocusControl = DBEdit16
Transparent = True
end
object Label18: TLabel
Left = 115
Top = 72
Width = 24
Height = 12
Caption = #25968#37327
FocusControl = DBEdit17
Transparent = True
end
object Label19: TLabel
Left = 3
Top = 94
Width = 24
Height = 12
Caption = #21333#20215
FocusControl = DBEdit18
Transparent = True
end
object DBEdit11: TDBEdit
Left = 28
Top = 24
Width = 195
Height = 20
DataField = #36153#29992#21517#31216
DataSource = t_ch_fee_new1
ReadOnly = True
TabOrder = 0
end
object DBEdit12: TDBEdit
Left = 28
Top = 46
Width = 195
Height = 20
DataField = #23458#25143#21517#31216
DataSource = t_ch_fee_new1
ReadOnly = True
TabOrder = 1
end
object DBEdit13: TDBEdit
Left = 139
Top = 90
Width = 84
Height = 20
DataField = #37329#39069
DataSource = t_ch_fee_new1
ReadOnly = True
TabOrder = 2
end
object DBEdit14: TDBEdit
Left = 28
Top = 112
Width = 84
Height = 20
DataField = #24065#21035
DataSource = t_ch_fee_new1
ReadOnly = True
TabOrder = 3
end
object DBEdit15: TDBEdit
Left = 139
Top = 112
Width = 84
Height = 20
DataField = #27719#29575
DataSource = t_ch_fee_new1
ReadOnly = True
TabOrder = 4
end
object DBEdit16: TDBEdit
Left = 28
Top = 68
Width = 84
Height = 20
DataField = #26631#20934
DataSource = t_ch_fee_new1
ReadOnly = True
TabOrder = 5
end
object DBEdit17: TDBEdit
Left = 139
Top = 68
Width = 84
Height = 20
DataField = #25968#37327
DataSource = t_ch_fee_new1
ReadOnly = True
TabOrder = 6
end
object DBEdit18: TDBEdit
Left = 28
Top = 90
Width = 84
Height = 20
DataField = #21333#20215
DataSource = t_ch_fee_new1
ReadOnly = True
TabOrder = 7
end
end
end
end
object DBEdit19: TDBEdit
Left = 152
Top = 56
Width = 121
Height = 20
DataField = #30003#35831#31867#22411
DataSource = t_ch_fee1
TabOrder = 2
Visible = False
OnChange = DBEdit19Change
end
object t_ch_fee: TADOQuery
Connection = frm_main.db
CursorType = ctStatic
Parameters = <
item
Name = #31867#22411
DataType = ftString
NumericScale = 255
Precision = 255
Size = 2
Value = Null
end
item
Name = #32534#21495
DataType = ftString
NumericScale = 255
Precision = 255
Size = 12
Value = Null
end>
SQL.Strings = (
'select * from t_ch_fee_modify'
'where '#31867#22411'=:'#31867#22411' and '#32534#21495'=:'#32534#21495
'and '#30003#35831#31867#22411' in ('#39#30003#35831#21024#38500#39','#39#30003#35831#26087#20540#39')'
'and '#30003#35831#29366#24577' in ('#39#25209#20934#30003#35831#39','#39#39539#22238#30003#35831#39')'
'order by FM_ID')
Left = 160
Top = 136
end
object t_ch_fee1: TDataSource
DataSet = t_ch_fee
Left = 160
Top = 184
end
object t_ch_fee_new: TADOQuery
Connection = frm_main.db
CursorType = ctStatic
DataSource = t_ch_fee1
Parameters = <
item
Name = 'FM_ID'
Attributes = [paSigned, paNullable]
DataType = ftInteger
Precision = 10
Value = Null
end>
SQL.Strings = (
'select * from t_ch_fee_modify'
'where MD_ID=:FM_ID and '#30003#35831#31867#22411'='#39#30003#35831#26032#20540#39)
Left = 200
Top = 136
end
object t_ch_fee_new1: TDataSource
DataSet = t_ch_fee_new
Left = 200
Top = 184
end
object bsBusinessSkinForm1: TbsBusinessSkinForm
UseSkinFontInMenu = True
ShowIcon = False
MaximizeOnFullScreen = False
AlphaBlend = False
AlphaBlendAnimation = False
AlphaBlendValue = 100
ShowObjectHint = False
MenusAlphaBlend = False
MenusAlphaBlendAnimation = False
MenusAlphaBlendValue = 0
DefCaptionFont.Charset = GB2312_CHARSET
DefCaptionFont.Color = clBtnText
DefCaptionFont.Height = -12
DefCaptionFont.Name = #23435#20307
DefCaptionFont.Style = []
DefInActiveCaptionFont.Charset = GB2312_CHARSET
DefInActiveCaptionFont.Color = clBtnShadow
DefInActiveCaptionFont.Height = -12
DefInActiveCaptionFont.Name = #23435#20307
DefInActiveCaptionFont.Style = []
DefMenuItemHeight = 20
DefMenuItemFont.Charset = GB2312_CHARSET
DefMenuItemFont.Color = clWindowText
DefMenuItemFont.Height = -12
DefMenuItemFont.Name = #23435#20307
DefMenuItemFont.Style = []
UseDefaultSysMenu = True
SkinData = frm_main.bsSkinData1
MinHeight = 0
MinWidth = 0
Magnetic = False
MagneticSize = 10
BorderIcons = [biMinimize]
Left = 160
Top = 220
end
end