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.

163 lines
4.0 KiB
Plaintext

11 months ago
object frm_Amend_FeeList: Tfrm_Amend_FeeList
Left = 350
Top = 198
Width = 954
Height = 485
Caption = #36153#29992#21015#34920
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object dxDBGrid2: TdxDBGrid
Left = 0
Top = 0
Width = 946
Height = 451
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = #32534#21495
ShowGroupPanel = True
ShowSummaryFooter = True
SummaryGroups = <>
SummarySeparator = ', '
Align = alClient
TabOrder = 0
OnDblClick = dxDBGrid2DblClick
DataSource = ADOQuery_Amend_FeeList1
Filter.Criteria = {00000000}
HideSelectionColor = clBtnShadow
HighlightColor = clBtnShadow
OptionsBehavior = [edgoAutoSort, edgoDragScroll, edgoEnterShowEditor, edgoImmediateEditor, edgoMultiSelect, edgoTabThrough, edgoVertThrough]
OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks]
OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap]
ShowRowFooter = True
object dxDBGrid2Column9: TdxDBGridColumn
BandIndex = 0
RowIndex = 0
FieldName = #36153#29992#29366#24577
end
object dxDBGrid2Column1: TdxDBGridColumn
HeaderAlignment = taCenter
Width = 130
BandIndex = 0
RowIndex = 0
FieldName = #36153#29992#21517#31216
end
object dxDBGrid2Column2: TdxDBGridColumn
HeaderAlignment = taCenter
Width = 111
BandIndex = 0
RowIndex = 0
FieldName = #23458#25143#21517#31216
end
object dxDBGrid2Column3: TdxDBGridColumn
HeaderAlignment = taCenter
Width = 62
BandIndex = 0
RowIndex = 0
FieldName = #26631#20934
end
object dxDBGrid2Column4: TdxDBGridColumn
HeaderAlignment = taCenter
Width = 94
BandIndex = 0
RowIndex = 0
FieldName = #21333#20215
end
object dxDBGrid2Column5: TdxDBGridColumn
HeaderAlignment = taCenter
Width = 54
BandIndex = 0
RowIndex = 0
FieldName = #25968#37327
end
object dxDBGrid2Column6: TdxDBGridColumn
HeaderAlignment = taCenter
Width = 135
BandIndex = 0
RowIndex = 0
FieldName = #37329#39069
end
object dxDBGrid2Column7: TdxDBGridColumn
HeaderAlignment = taCenter
Width = 48
BandIndex = 0
RowIndex = 0
FieldName = #24065#21035
end
object dxDBGrid2Column8: TdxDBGridColumn
HeaderAlignment = taCenter
Width = 70
BandIndex = 0
RowIndex = 0
FieldName = #27719#29575
end
object dxDBGrid2Column10: TdxDBGridColumn
BandIndex = 0
RowIndex = 0
FieldName = #23545#24080#32534#21495
end
object dxDBGrid2Column11: TdxDBGridColumn
Width = 55
BandIndex = 0
RowIndex = 0
FieldName = #24320#31080#37329#39069
end
object dxDBGrid2Column12: TdxDBGridColumn
Width = 55
BandIndex = 0
RowIndex = 0
FieldName = #30003#35831#24320#31080
end
end
object ADOQuery_Amend_FeeList1: TDataSource
DataSet = ADOQuery_Amend_FeeList
Left = 152
Top = 136
end
object ADOQuery_Amend_FeeList: TADOQuery
Connection = frm_main.db
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from t_ch_fee'
'where 1=2')
Left = 344
Top = 128
end
object t_Fee_Insert: TDataSource
Left = 472
Top = 264
end
object p_op_gain: TADOStoredProc
Connection = frm_main.db
ProcedureName = 'p_op_gain;1'
Parameters = <
item
Name = '@RETURN_VALUE'
DataType = ftInteger
Direction = pdReturnValue
Precision = 10
Value = Null
end
item
Name = '@con_no'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = Null
end>
Left = 568
Top = 56
end
end