easygas_bottle.dfm

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

object BUTTLEDlg: TBUTTLEDlg
  Left = 187
  Top = 117
  Width = 696
  Height = 508
  Caption = #38050#29942#31649#29702#31383#21475
  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
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter1: TSplitter
    Left = 0
    Top = 382
    Width = 688
    Height = 3
    Cursor = crVSplit
    Align = alTop
    AutoSnap = False
    Beveled = True
    ResizeStyle = rsUpdate
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 53
    Width = 688
    Height = 329
    Align = alTop
    Caption = #38050#29942#20449#24687
    TabOrder = 0
    object Panel2: TPanel
      Left = 2
      Top = 15
      Width = 684
      Height = 312
      Align = alClient
      BevelOuter = bvNone
      BorderWidth = 2
      Caption = 'Panel2'
      TabOrder = 0
      object DBG: TDBGridEh
        Left = 2
        Top = 2
        Width = 680
        Height = 308
        Align = alClient
        DataSource = BUTTLE_SOURCE
        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 = []
        UseMultiTitle = True
        OnDblClick = BUTTLE_EDITExecute
        OnKeyDown = FormKeyDown
        OnTitleBtnClick = DBGTitleBtnClick
      end
    end
  end
  object TGPAGE: TPageControl
    Left = 0
    Top = 385
    Width = 688
    Height = 89
    ActivePage = TPAGE
    Align = alClient
    TabOrder = 1
    TabPosition = tpBottom
    object MANGPAGE: TTabSheet
      Caption = #24180#23457#20449#24687
      object DBGridEh1: TDBGridEh
        Left = 0
        Top = 0
        Width = 680
        Height = 62
        Align = alClient
        ColumnDefValues.Title.TitleButton = True
        DataSource = NSS
        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 = []
        OnKeyDown = FormKeyDown
        OnTitleBtnClick = TGDBGTitleBtnClick
        Columns = <
          item
            EditButtons = <>
            FieldName = #31080#21495
            Footers = <>
            Width = 60
          end
          item
            EditButtons = <>
            FieldName = #38050#29942#32534#30721
            Footer.ValueType = fvtCount
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #24402#23646
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#31867#22411
            Footers = <>
            Title.Caption = #25910#36153#39033#30446
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#20540
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #37329#39069
          end
          item
            EditButtons = <>
            FieldName = #26377#25928#22825#25968
            Footer.ValueType = fvtSum
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#21592
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#26085#26399
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #22791#27880
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38134#34892
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38134#34892#21517#31216
            Footers = <>
          end>
      end
    end
    object TPAGE: TTabSheet
      Caption = #25176#31649#32564#36153
      ImageIndex = 1
      object TGDBG: TDBGridEh
        Left = 0
        Top = 0
        Width = 680
        Height = 64
        Align = alClient
        ColumnDefValues.Title.TitleButton = True
        DataSource = MANGS
        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 = #31080#21495
            Footers = <>
            Width = 60
          end
          item
            EditButtons = <>
            FieldName = #38050#29942#32534#30721
            Footer.ValueType = fvtCount
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #24402#23646
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#31867#22411
            Footers = <>
            Title.Caption = #25910#36153#39033#30446
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#20540
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #37329#39069
          end
          item
            EditButtons = <>
            FieldName = #26377#25928#22825#25968
            Footer.ValueType = fvtSum
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#21592
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#26085#26399
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #22791#27880
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38134#34892
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38134#34892#21517#31216
            Footers = <>
          end>
      end
    end
    object TabSheet3: TTabSheet
      Caption = #25276#37329#20449#24687
      ImageIndex = 2
      object DBGridEh2: TDBGridEh
        Left = 0
        Top = 0
        Width = 680
        Height = 62
        Align = alClient
        ColumnDefValues.Title.TitleButton = True
        DataSource = YJS
        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 = #31080#21495
            Footers = <>
            Width = 60
          end
          item
            EditButtons = <>
            FieldName = #38050#29942#32534#30721
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #24402#23646
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#31867#22411
            Footers = <>
            Title.Caption = #25910#36153#39033#30446
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#20540
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #37329#39069
          end
          item
            EditButtons = <>
            FieldName = #26377#25928#22825#25968
            Footer.ValueType = fvtSum
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#21592
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25805#20316#26085#26399
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #22791#27880
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38134#34892
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #38134#34892#21517#31216
            Footers = <>
          end>
      end