easygas_bottle.dfm

EasyGasDpr 瓶装液化气 钢瓶 SQL,用户名：SYSTEM 密码：空

    end
    object SELLPAGE: TTabSheet
      Caption = #38144#21806#20449#24687
      ImageIndex = 3
      object DBGridEh3: TDBGridEh
        Left = 0
        Top = 0
        Width = 680
        Height = 62
        Align = alClient
        ColumnDefValues.Title.TitleButton = True
        DataSource = SELLS
        DrawMemoText = True
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = GB2312_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -12
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        FooterRowCount = 1
        Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghAutoSortMarking, dghDialogFind]
        ReadOnly = True
        SumList.Active = True
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnTitleBtnClick = TGDBGTitleBtnClick
        Columns = <
          item
            EditButtons = <>
            FieldName = #32534#21495
            Footers = <>
            Width = 60
          end
          item
            EditButtons = <>
            FieldName = #21333#25454#31867#22411
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38050#29942#32534#30721
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #29942#36523#30721
            Footer.ValueType = fvtCount
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38050#29942#31867#22411
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #28748#35013#35268#26684
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21333#20215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25968#37327
            Footer.ValueType = fvtSum
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #37329#39069
            Footer.ValueType = fvtSum
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #23458#25143#31867#22411
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38144#21806#26085#26399
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #22791#27880
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#21592
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#26085#26399
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #36816#31639
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38134#34892
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38134#34892#21517#31216
            Footers = <>
          end>
      end
    end
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 688
    Height = 53
    AutoSize = True
    ButtonHeight = 51
    ButtonWidth = 67
    Caption = 'ToolBar1'
    Flat = True
    Images = MAINFORM.BIGICON
    ShowCaptions = True
    TabOrder = 2
    object ToolButton3: TToolButton
      Left = 0
      Top = 0
      Action = NewButtle
    end
    object ToolButton4: TToolButton
      Left = 67
      Top = 0
      Action = FindData
    end
    object ToolButton2: TToolButton
      Left = 134
      Top = 0
      Action = ExportGrid
    end
    object ToolButton5: TToolButton
      Left = 201
      Top = 0
      Width = 8
      Caption = 'ToolButton5'
      ImageIndex = 17
      Style = tbsSeparator
    end
    object ToolButton1: TToolButton
      Left = 209
      Top = 0
      Action = MANGTICK_DO
    end
    object ToolButton12: TToolButton
      Left = 276
      Top = 0
      Action = BackTick
    end
    object ToolButton10: TToolButton
      Left = 343
      Top = 0
      Width = 8
      Caption = 'ToolButton10'
      ImageIndex = 27
      Style = tbsSeparator
    end
    object ToolButton9: TToolButton
      Left = 351
      Top = 0
      Action = A_SELLTICK
    end
    object ToolButton6: TToolButton
      Left = 418
      Top = 0
      Width = 8
      Caption = 'ToolButton6'
      ImageIndex = 17
      Style = tbsSeparator
    end
    object ToolButton7: TToolButton
      Left = 426
      Top = 0
      Action = SetFmt
    end
    object ToolButton11: TToolButton
      Left = 493
      Top = 0
      Width = 8
      Caption = 'ToolButton11'
      ImageIndex = 35
      Style = tbsSeparator
    end
    object ToolButton8: TToolButton
      Left = 501
      Top = 0
      Action = PRINT
      DropdownMenu = PopupMenu1
      Style = tbsDropDown
    end
  end
  object BUTTLE: TADODataSet
    Connection = MAINFORM.ADOC
    BeforePost = BUTTLE_MANGBeforePost
    AfterScroll = BUTTLEAfterScroll
    OnNewRecord = BUTTLENewRecord
    CommandText = 'select * from GAS_BOTTLE'
    Parameters = <>
    Left = 348
    Top = 152
  end
  object BUTTLE_MANG: TADODataSet
    Connection = MAINFORM.ADOC
    CursorType = ctStatic
    BeforePost = BUTTLE_MANGBeforePost
    CommandText = 'select * from GAS_MANAGE'
    Parameters = <>
    Left = 380
    Top = 152
  end
  object BUTTLE_SOURCE: TDataSource
    DataSet = BUTTLE
    Left = 348
    Top = 120
  end
  object NSTAB: TADODataSet
    Connection = MAINFORM.ADOC
    CursorType = ctStatic
    CommandText = 'select * from GAS_MANAGE'
    Parameters = <>
    Left = 412
    Top = 152
  end
  object MANGS: TDataSource
    DataSet = BUTTLE_MANG
    Left = 380
    Top = 120
  end
  object ActionList1: TActionList
    Images = MAINFORM.BIGICON
    Left = 316
    Top = 152
    object BUTTLE_EDIT: TAction
      Caption = #38050#29942#32534#36753
      OnExecute = BUTTLE_EDITExecute
    end
    object NewButtle: TAction
      Caption = #26032#24314#38050#29942
      ImageIndex = 32
      ShortCut = 16462
      OnExecute = NewButtleExecute
    end
    object MANGTICK_DO: TAction
      Caption = #24320#31649#29702#31080#25454
      ImageIndex = 29
      ShortCut = 16461
      OnExecute = MANGTICK_DOExecute
    end
    object ExportGrid: TAction
      Caption = #23548#20986#34920#26684
      ImageIndex = 16
      ShortCut = 16453
      OnExecute = ExportGridExecute
    end
    object FindData: TAction
      Caption = #26597#25214#38050#29942
      ImageIndex = 0
      ShortCut = 16454
      OnExecute = FindDataExecute
    end
    object SetFmt: TAction
      Caption = #35774#32622#26684#24335
      ImageIndex = 33
      OnExecute = SetFmtExecute
    end
    object PRINT: TAction
      Caption = #25171#21360#34920#26684
      ImageIndex = 26
      OnExecute = PRINTExecute
    end
    object SetPNT: TAction
      Caption = #25171#21360#35774#32622
      ImageIndex = 30
      OnExecute = SetPNTExecute
    end
    object SetDBGPNT: TAction
      Caption = #25171#21360#26684#24335
      ImageIndex = 34
      OnExecute = SetDBGPNTExecute
    end
    object BackTick: TAction
      Caption = #24320#31649#29702#36864#21333
      ImageIndex = 48
      OnExecute = BackTickExecute
    end
    object A_SELLTICK: TAction
      Caption = #24320#38144#21806#21333
      ImageIndex = 44
      OnExecute = A_SELLTICKExecute
    end
  end
  object NSS: TDataSource
    DataSet = NSTAB
    Left = 412
    Top = 120
  end
  object YJTAB: TADODataSet
    Connection = MAINFORM.ADOC
    CursorType = ctStatic
    CommandText = 'select * from GAS_MANAGE'
    Parameters = <>
    Left = 444
    Top = 152
  end
  object YJS: TDataSource
    DataSet = YJTAB
    Left = 444
    Top = 120
  end
  object PDBG: TPrintDBGridEh
    DBGridEh = DBG
    Options = []
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -11
    PageFooter.Font.Name = 'MS Sans Serif'
    PageFooter.Font.Style = []
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -11
    PageHeader.Font.Name = 'MS Sans Serif'
    PageHeader.Font.Style = []
    Units = MM
    Left = 318
    Top = 121
  end
  object PopupMenu1: TPopupMenu
    Images = MAINFORM.BIGICON
    Left = 178
    Top = 85
    object N2: TMenuItem
      Action = SetPNT
    end
    object N1: TMenuItem
      Action = SetDBGPNT
      Caption = #25171#21360#34920#26684#26684#24335
    end
  end
  object SELL: TADODataSet
    Connection = MAINFORM.ADOC
    CursorType = ctStatic
    CommandText = 'select * from GAS_SELL'
    Parameters = <>
    Left = 476
    Top = 152
  end
  object SELLS: TDataSource
    DataSet = SELL
    Left = 476
    Top = 120
  end
end