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.

104 lines
3.1 KiB
Plaintext

11 months ago
object frm_seai_sf_status: Tfrm_seai_sf_status
Left = 259
Top = 264
Width = 979
Height = 563
Caption = #19977#24223#29366#24577
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
Position = poDesktopCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object dxDBGrid1: TdxDBGrid
Left = 0
Top = 0
Width = 971
Height = 529
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = #32534#21495
ShowGroupPanel = True
ShowSummaryFooter = True
SummaryGroups = <>
SummarySeparator = ', '
Align = alClient
TabOrder = 0
OnClick = dxDBGrid1Click
DataSource = t_op_state1
Filter.Active = True
Filter.Criteria = {00000000}
OptionsBehavior = [edgoAutoSort, edgoDragScroll, edgoEditing, edgoEnterShowEditor, edgoExtMultiSelect, edgoImmediateEditor, edgoMultiSelect, edgoTabThrough, edgoVertThrough]
OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks]
OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap]
object dxDBGrid1Column1: TdxDBGridMaskColumn
HeaderAlignment = taCenter
ReadOnly = True
Width = 198
BandIndex = 0
RowIndex = 0
FieldName = #20027#25552#21333#21495
SummaryFooterType = cstCount
SummaryFooterFormat = #31080#25968':0'
end
object dxDBGrid1Column4: TdxDBGridColumn
HeaderAlignment = taCenter
ReadOnly = True
Width = 90
BandIndex = 0
RowIndex = 0
FieldName = #25805#20316#21592
end
object dxDBGrid1Column5: TdxDBGridColumn
HeaderAlignment = taCenter
Width = 114
BandIndex = 0
RowIndex = 0
FieldName = #36827#21475#26085#26399
end
object dxDBGrid1Column6: TdxDBGridColumn
HeaderAlignment = taCenter
Width = 128
BandIndex = 0
RowIndex = 0
FieldName = #22996#25176#21333#20301
end
object dxDBGrid1Column2: TdxDBGridColumn
HeaderAlignment = taCenter
ReadOnly = True
Width = 119
BandIndex = 0
RowIndex = 0
FieldName = #19994#21153#29366#24577
end
end
object t_op_state: TADOQuery
Connection = frm_main.db
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select t_op_seai.'#32534#21495', t_op_seai.'#20027#25552#21333#21495' ,t_op_seai.'#19994#21153#29366#24577',t_op_sea' +
'i.'#36827#21475#26085#26399',t_op_seai.'#22996#25176#21333#20301',t_op_seai.'#25805#20316#21592' from t_op_seai'
'where t_op_seai.'#35013#36816#26041#24335'='#39#19977#24223#39' and '#19994#21153#29366#24577' not in('#39#19994#21153#23553#24080#39','#39#19994#21153#23436#25104#39')'
'order by t_op_seai.'#20027#25552#21333#21495)
Left = 72
Top = 80
end
object t_op_state1: TDataSource
DataSet = t_op_state
Left = 120
Top = 152
end
end