easygas_buttlelist.dfm

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

object BUTTLELIST: TBUTTLELIST
  Left = 243
  Top = 157
  Width = 696
  Height = 480
  Caption = #38050#29942#21015#34920
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object DBG: TDBGridEh
    Left = 0
    Top = 53
    Width = 688
    Height = 400
    Align = alClient
    AllowedOperations = [alopUpdateEh]
    Color = clBtnFace
    ColumnDefValues.Title.TitleButton = True
    DataSource = MAINS
    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, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    OptionsEh = [dghFixed3D, 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 = []
    OnDblClick = DBGDblClick
    OnTitleBtnClick = DBGTitleBtnClick
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 688
    Height = 53
    AutoSize = True
    ButtonHeight = 51
    ButtonWidth = 55
    Caption = 'ToolBar1'
    Flat = True
    Images = MAINFORM.BIGICON
    ShowCaptions = True
    TabOrder = 1
    object ToolButton2: TToolButton
      Left = 0
      Top = 0
      Action = CreateTick
    end
    object ToolButton1: TToolButton
      Left = 55
      Top = 0
      Action = TicksInfo
    end
    object ToolButton3: TToolButton
      Left = 110
      Top = 0
      Action = DelTick
    end
    object ToolButton4: TToolButton
      Left = 165
      Top = 0
      Width = 8
      Caption = 'ToolButton4'
      ImageIndex = 8
      Style = tbsSeparator
    end
    object Panel1: TPanel
      Left = 173
      Top = 0
      Width = 185
      Height = 51
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 0
      object Edit1: TEdit
        Left = 16
        Top = 16
        Width = 149
        Height = 20
        TabOrder = 0
        OnKeyDown = Edit1KeyDown
      end
    end
  end
  object ActionList1: TActionList
    Images = MAINFORM.BIGICON
    Left = 336
    Top = 228
    object CreateTick: TAction
      Caption = #24320#31649#29702#21333
      ImageIndex = 29
      OnExecute = CreateTickExecute
    end
    object TicksInfo: TAction
      Caption = #21333#25454#26126#32454
      ImageIndex = 3
      OnExecute = TicksInfoExecute
    end
    object DelTick: TAction
      Caption = #21024#38500#31080#25454
      ImageIndex = 7
      OnExecute = DelTickExecute
      OnUpdate = DelTickUpdate
    end
  end
  object MAIN: TADODataSet
    Connection = MAINFORM.ADOC
    CursorType = ctStatic
    CommandText = 'select * from GAS_BOTTLE'
    Parameters = <>
    Left = 272
    Top = 228
  end
  object MAINS: TDataSource
    DataSet = MAIN
    Left = 304
    Top = 228
  end
  object DELS: TADODataSet
    Connection = MAINFORM.ADOC
    BeforeDelete = DELSBeforeDelete
    Parameters = <>
    Left = 240
    Top = 228
  end
end