object fra_op_card: Tfra_op_card Left = 0 Top = 0 Width = 828 Height = 326 Align = alClient Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 object bsSkinGroupBox1: TbsSkinGroupBox Left = 0 Top = 0 Width = 828 Height = 326 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 = #21333#35777#20449#24687 Align = alClient object dxDBGrid1: TdxDBGrid Left = 1 Top = 23 Width = 826 Height = 302 Bands = < item end> DefaultLayout = True HeaderPanelRowCount = 1 KeyField = 'CA_ID' ShowSummaryFooter = True SummaryGroups = <> SummarySeparator = ', ' Align = alClient PopupMenu = PopupMenu1 TabOrder = 0 DataSource = t_op_card1 Filter.Criteria = {00000000} OptionsBehavior = [edgoAutoSort, edgoDragScroll, edgoEditing, edgoEnterShowEditor, edgoImmediateEditor, edgoMultiSelect, edgoTabThrough, edgoVertThrough] OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks] OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap] object dxDBGrid1Column1: TdxDBGridButtonColumn Width = 160 BandIndex = 0 RowIndex = 0 FieldName = #21333#35777#21517#31216 SummaryFooterType = cstCount Buttons = < item Default = True end> OnButtonClick = dxDBGrid1Column1ButtonClick end object dxDBGrid1Column2: TdxDBGridMaskColumn Width = 115 BandIndex = 0 RowIndex = 0 FieldName = #21333#35777#21495#30721 end object dxDBGrid1Column3: TdxDBGridDateColumn Width = 82 BandIndex = 0 RowIndex = 0 FieldName = #25509#21333#26085#26399 end object dxDBGrid1Column4: TdxDBGridDateColumn Width = 79 BandIndex = 0 RowIndex = 0 FieldName = #36865#21333#26085#26399 end object dxDBGrid1Column5: TdxDBGridCheckColumn Width = 53 BandIndex = 0 RowIndex = 0 FieldName = #26159#21542#22238#21333 ValueChecked = 'True' ValueUnchecked = 'False' end object dxDBGrid1Column6: TdxDBGridDateColumn Width = 78 BandIndex = 0 RowIndex = 0 FieldName = #22238#21333#26085#26399 end object dxDBGrid1Column7: TdxDBGridCheckColumn Width = 53 BandIndex = 0 RowIndex = 0 FieldName = #26159#21542#36824#21333 ValueChecked = 'True' ValueUnchecked = 'False' end object dxDBGrid1Column8: TdxDBGridDateColumn Width = 76 BandIndex = 0 RowIndex = 0 FieldName = #36824#21333#26085#26399 end object dxDBGrid1Column9: TdxDBGridMaskColumn Width = 285 BandIndex = 0 RowIndex = 0 FieldName = #22791#27880 end end end object t_op_card: TADOQuery Connection = frm_main.db CursorType = ctStatic BeforeInsert = t_op_cardBeforeInsert AfterInsert = t_op_cardAfterInsert BeforePost = t_op_cardBeforePost Parameters = < item Name = #32534#21495 DataType = ftString NumericScale = 255 Precision = 255 Size = 12 Value = Null end> SQL.Strings = ( 'select * from t_op_card where '#32534#21495'=:'#32534#21495) Left = 200 Top = 128 end object t_op_card1: TDataSource DataSet = t_op_card Left = 200 Top = 160 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 = 57 Top = 32 end object PopupMenu1: TPopupMenu AutoHotkeys = maManual OwnerDraw = True Left = 280 Top = 120 object N1: TMenuItem Caption = #28155#21152#21333#35777 OnClick = N1Click end object N2: TMenuItem Caption = '-' end object N3: TMenuItem Caption = #20445#23384#20462#25913 OnClick = N3Click end object N5: TMenuItem Caption = '-' end object N4: TMenuItem Caption = #21024#38500#21333#35777 OnClick = N4Click end object N6: TMenuItem Caption = '-' end object N7: TMenuItem Caption = #25918#24323#20462#25913 OnClick = N7Click end object N8: TMenuItem Caption = '-' end object N9: TMenuItem Caption = #30830#35748#36865#21333 object N14: TMenuItem Caption = #24403#21069#30830#35748 OnClick = N14Click end object N17: TMenuItem Caption = '-' end object N15: TMenuItem Caption = #25152#36873#30830#35748 OnClick = N15Click end object N18: TMenuItem Caption = '-' end object N16: TMenuItem Caption = #25152#26377#30830#35748 OnClick = N16Click end end object N10: TMenuItem Caption = '-' end object N11: TMenuItem Caption = #30830#35748#22238#21333 object N19: TMenuItem Caption = #24403#21069#30830#35748 OnClick = N19Click end object N20: TMenuItem Caption = '-' end object N21: TMenuItem Caption = #25152#36873#30830#35748 OnClick = N21Click end object N22: TMenuItem Caption = '-' end object N23: TMenuItem Caption = #25152#26377#30830#35748 OnClick = N23Click end end object N12: TMenuItem Caption = '-' end object N13: TMenuItem Caption = #30830#35748#36824#21333 object N24: TMenuItem Caption = #24403#21069#30830#35748 OnClick = N24Click end object N25: TMenuItem Caption = '-' end object N26: TMenuItem Caption = #25152#36873#30830#35748 OnClick = N26Click end object N27: TMenuItem Caption = '-' end object N28: TMenuItem Caption = #25152#26377#30830#35748 OnClick = N28Click end end end end