object fra_sys_data_price: Tfra_sys_data_price Left = 0 Top = 0 Width = 151 Height = 230 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 object bsSkinGroupBox9: TbsSkinGroupBox Left = 0 Top = 0 Width = 151 Height = 230 TabOrder = 0 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 = #21806#20215#32423#21035#21487#35270 Align = alClient object bsSkinPanel1: TbsSkinPanel Left = 1 Top = 23 Width = 149 Height = 25 TabOrder = 0 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 = bvNone CaptionMode = False RollUpMode = False RollUpState = False NumGlyphs = 1 Spacing = 2 Caption = 'bsSkinPanel1' Align = alTop object bsSkinButton2: TbsSkinButton Left = 3 Top = 0 Width = 70 Height = 24 TabOrder = 0 SkinData = frm_main.bsSkinData1 SkinDataName = 'resizebutton' 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 = #36873#25321 NumGlyphs = 2 Spacing = 1 OnClick = bsSkinButton2Click end object bsSkinButton5: TbsSkinButton Left = 75 Top = 0 Width = 70 Height = 24 TabOrder = 1 SkinData = frm_main.bsSkinData1 SkinDataName = 'resizebutton' 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 NumGlyphs = 2 Spacing = 1 OnClick = bsSkinButton5Click end end object dxDBGrid1: TdxDBGrid Left = 1 Top = 48 Width = 149 Height = 181 Bands = < item end> DefaultLayout = True HeaderPanelRowCount = 1 KeyField = #32844#21592 SummaryGroups = <> SummarySeparator = ', ' Align = alClient PopupMenu = PopupMenu1 TabOrder = 1 DataSource = t_op1 Filter.Criteria = {00000000} OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks] object dxDBGrid1Column1: TdxDBGridMaskColumn Caption = #36816#20215#32423#21035 ReadOnly = True Width = 74 BandIndex = 0 RowIndex = 0 FieldName = #32844#21592 end object dxDBGrid1Column2: TdxDBGridCheckColumn Caption = #21487#35270 Width = 46 BandIndex = 0 RowIndex = 0 FieldName = #26159#21542#21487#35270 ValueChecked = 'True' ValueUnchecked = 'False' end end end object t_op: TADOQuery Connection = frm_main.db CursorType = ctStatic Parameters = < item Name = #22995#21517 DataType = ftString NumericScale = 255 Precision = 255 Size = 10 Value = Null end item Name = #23646#24615 DataType = ftString NumericScale = 255 Precision = 255 Size = 20 Value = Null end> SQL.Strings = ( 'select * from t_sys_code_data' 'where '#20154#21592'=:'#22995#21517' and '#23646#24615'=:'#23646#24615 'order by '#32844#21592) Left = 56 Top = 144 end object t_op1: TDataSource DataSet = t_op Left = 56 Top = 184 end object PopupMenu1: TPopupMenu OwnerDraw = True Left = 56 Top = 108 object N12: TMenuItem Caption = #20840#37096#25968#25454 OnClick = N12Click end object N13: TMenuItem Caption = '-' end object N14: TMenuItem Caption = #20840#37096#28165#31354 OnClick = N14Click end end object XPMenu1: TXPMenu Font.Charset = GB2312_CHARSET Font.Color = clMenuText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Color = 15189677 IconBackColor = 15189677 MenuBarColor = 15189677 SelectColor = 14139102 SelectBorderColor = clHighlight SelectFontColor = clMenuText DisabledColor = clInactiveCaption SeparatorColor = 13485965 CheckedColor = clHighlight IconWidth = 24 DrawSelect = True UseSystemColors = False OverrideOwnerDraw = False Gradient = True FlatMenu = True AutoDetect = True Active = True Left = 289 Top = 56 end end