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.

154 lines
3.8 KiB
Plaintext

11 months ago
object frm_op_Air_Goods: Tfrm_op_Air_Goods
Left = 363
Top = 272
Width = 385
Height = 352
Caption = #31354#36816#36135#29289#26126#32454
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 cxGrid1: TcxGrid
Left = 0
Top = 0
Width = 367
Height = 281
TabOrder = 0
object cxGrid1DBTableView1: TcxGridDBTableView
DataController.DataSource = t_op_Air_Goods1
DataController.Filter.Criteria = {FFFFFFFF0000000000}
DataController.KeyFieldNames = 'id'
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Format = ';;'
Kind = skSum
Column = cxGrid1DBTableView1DBColumn1
end
item
Format = ';;'
Kind = skSum
Column = cxGrid1DBTableView1DBColumn2
end
item
Format = ';;'
Kind = skSum
Column = cxGrid1DBTableView1DBColumn3
end
item
Format = ';;'
Kind = skSum
Column = cxGrid1DBTableView1DBColumn4
end>
DataController.Summary.SummaryGroups = <>
NavigatorButtons.ConfirmDelete = False
OptionsView.Footer = True
object cxGrid1DBTableView1DBColumn1: TcxGridDBColumn
PropertiesClassName = 'TcxCalcEditProperties'
Width = 69
DataBinding.FieldName = #20214#25968
end
object cxGrid1DBTableView1DBColumn2: TcxGridDBColumn
PropertiesClassName = 'TcxCalcEditProperties'
Width = 94
DataBinding.FieldName = #38271
end
object cxGrid1DBTableView1DBColumn3: TcxGridDBColumn
PropertiesClassName = 'TcxCalcEditProperties'
Width = 77
DataBinding.FieldName = #23485
end
object cxGrid1DBTableView1DBColumn4: TcxGridDBColumn
PropertiesClassName = 'TcxCalcEditProperties'
SortOrder = soAscending
Width = 119
DataBinding.FieldName = #39640
end
end
object cxGrid1Level1: TcxGridLevel
GridView = cxGrid1DBTableView1
end
end
object bsSkinButton1: TbsSkinButton
Left = 136
Top = 287
Width = 75
Height = 25
TabOrder = 1
SkinDataName = 'button'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
RepeatMode = False
RepeatInterval = 100
AllowAllUp = False
TabStop = True
CanFocused = True
Down = False
GroupIndex = 0
Caption = #20445#23384#36864#20986
NumGlyphs = 2
Spacing = 1
OnClick = bsSkinButton1Click
end
object cxDBNavigator1: TcxDBNavigator
Left = 1
Top = 8
Width = 227
Height = 25
DataSource = t_op_Air_Goods1
TabOrder = 2
end
object cxCalcEdit1: TcxCalcEdit
Left = 277
Top = 11
Width = 77
Height = 21
EditValue = 6000
TabOrder = 3
end
object cxLabel1: TcxLabel
Left = 244
Top = 13
Width = 32
Height = 17
TabOrder = 4
Caption = #22522#25968
end
object t_op_Air_Goods1: TDataSource
DataSet = t_op_Air_Goods
Left = 128
Top = 248
end
object t_op_Air_Goods: TADOQuery
Connection = frm_main.db
AfterInsert = t_op_Air_GoodsAfterInsert
BeforePost = t_op_Air_GoodsBeforePost
Parameters = <
item
Name = #32534#21495
DataType = ftString
NumericScale = 255
Precision = 255
Size = 12
Value = Null
end>
SQL.Strings = (
'select * from t_op_Air_Goods'
'where '#32534#21495'=:'#32534#21495)
Left = 232
Top = 248
end
end