Measure/Frames/ZJJLFme.dfm

object ZJJLFrame: TZJJLFrame
  Left = 0
  Top = 0
  Width = 390
  Height = 722
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  ParentFont = False
  TabOrder = 0
  object labTitle: TJimGradLabel
    Left = 0
    Top = 0
    Width = 390
    Height = 20
    Align = alTop
    AutoSize = False
    ColorBegin = clGradientInactiveCaption
    ColorEnd = clGradientInactiveCaption
    Caption = ' '#20013#38388#35745#37327
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Layout = tlCenter
  end
  object pnlTop: TPanel
    Left = 0
    Top = 20
    Width = 390
    Height = 27
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object pnlButton: TPanel
      Left = 0
      Top = 0
      Width = 81
      Height = 27
      Align = alLeft
      BevelOuter = bvNone
      TabOrder = 0
      object tobaTop: TToolBar
        Left = 0
        Top = 0
        Width = 81
        Height = 22
        AutoSize = True
        ButtonWidth = 75
        Caption = 'tobaTop'
        EdgeInner = esNone
        EdgeOuter = esNone
        Flat = True
        Images = MainForm.Images
        List = True
        ShowCaptions = True
        TabOrder = 0
        object tobtnGenerate: TToolButton
          Left = 0
          Top = 0
          Action = actnGenerate
        end
      end
    end
    object lePreText: TLabeledEdit
      Left = 152
      Top = 3
      Width = 58
      Height = 18
      Ctl3D = False
      EditLabel.Width = 66
      EditLabel.Height = 12
      EditLabel.Caption = #34920#21495#21069#32512#65306' '
      LabelPosition = lpLeft
      ParentCtl3D = False
      TabOrder = 1
      OnExit = lePreTextExit
    end
  end
  object pnlZJJL: TPanel
    Left = 0
    Top = 47
    Width = 390
    Height = 325
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 1
    object zgZJJL: TZJGrid
      Left = 0
      Top = 18
      Width = 390
      Height = 307
      Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection]
      OptionsEx = []
      ColCount = 4
      ShowGridLine = False
      DefaultColWidth = 73
      DefaultFixedColWidth = 25
      Selection.AlphaBlend = False
      Selection.TransparentColor = False
      FrozenCol = 0
      FrozenRow = 0
      OnCurrentChanged = zgZJJLCurrentChanged
      OnMouseDown = zgZJJLMouseDown
      Align = alClient
    end
    object pnlListTitle: TPanel
      Left = 0
      Top = 0
      Width = 390
      Height = 18
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 1
      DesignSize = (
        390
        18)
      object lblListTitle: TLabel
        Left = 6
        Top = 3
        Width = 84
        Height = 12
        Caption = #20013#38388#35745#37327#34920#21015#34920
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object pnlListBar: TPanel
        Left = 95
        Top = 8
        Width = 287
        Height = 2
        Anchors = [akLeft, akTop, akRight]
        BevelOuter = bvLowered
        TabOrder = 0
      end
    end
  end
  object pnlZJJLProperty: TPanel
    Left = 0
    Top = 372
    Width = 390
    Height = 350
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 2
    object pnlDataTitle: TPanel
      Left = 0
      Top = 0
      Width = 390
      Height = 22
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 0
      DesignSize = (
        390
        22)
      object lblDataTiel: TLabel
        Left = 5
        Top = 5
        Width = 84
        Height = 12
        Caption = #20013#38388#35745#37327#34920#25968#25454
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object pnlDataBar: TPanel
        Left = 94
        Top = 10
        Width = 287
        Height = 2
        Anchors = [akLeft, akTop, akRight]
        BevelOuter = bvLowered
        TabOrder = 0
      end
    end
    object zgDetailInfo: TZJGrid
      Left = 0
      Top = 22
      Width = 390
      Height = 328
      Options = [goRangeSelect, goRowSizing, goColSizing, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection, goWarpText]
      OptionsEx = []
      ColCount = 1
      RowCount = 11
      FixedRowCount = 0
      FixedColCount = 0
      ShowGridLine = False
      DefaultColWidth = 330
      Selection.AlphaBlend = False
      Selection.TransparentColor = False
      FrozenCol = 0
      FrozenRow = 0
      OnGetCellText = zgDetailInfoGetCellText
      OnSetCellText = zgDetailInfoSetCellText
      OnCellCanEdit = zgDetailInfoCellCanEdit
      Align = alClient
    end
  end
  object alBGL: TActionList
    Images = MainForm.Images
    Left = 200
    Top = 160
    object actnGenerate: TAction
      Caption = #33258#21160#29983#25104
      ImageIndex = 32
      OnExecute = actnGenerateExecute
      OnUpdate = actnGenerateUpdate
    end
    object actnLocateBills: TAction
      Caption = #23450#20301#33267#21488#36134
      OnExecute = actnLocateBillsExecute
      OnUpdate = actnLocateBillsUpdate
    end
    object actnGenerateFxZJJL: TAction
      Caption = '0'#21495#21488#36134#26684#24335
      ImageIndex = 32
      OnExecute = actnGenerateFxZJJLExecute
    end
    object actnGenerateGclZJJL: TAction
      Caption = #24635#37327#25511#21046#26684#24335
      ImageIndex = 32
      OnExecute = actnGenerateGclZJJLExecute
    end
  end
  object dxpmZJJL: TdxBarPopupMenu
    BarManager = MainForm.dxBarManager
    ItemLinks = <
      item
        Item = MainForm.dxbtnLocateBills
        Visible = True
      end
      item
        BeginGroup = True
        Item = MainForm.dxbtnDelete
        Visible = True
      end>
    UseOwnFont = False
    OnPopup = dxpmZJJLPopup
    Left = 104
    Top = 160
  end
  object dxpmAutoGenerate: TdxBarPopupMenu
    BarManager = MainForm.dxBarManager
    ItemLinks = <
      item
        Item = MainForm.dxbtnFxZJJL
        Visible = True
      end
      item
        Item = MainForm.dxbtnGclZJJL
        Visible = True
      end>
    UseOwnFont = False
    OnPopup = dxpmAutoGeneratePopup
    Left = 104
    Top = 200
  end
  object saZJJL: TsdGridDBA
    Columns = <
      item
        Title.Caption = #32534#21495
        Title.CaptionAcrossCols = '1'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Alignment = taLeftJustify
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FieldName = 'BillsCode'
        ReadOnly = True
      end
      item
        Title.Caption = #20013#38388#35745#37327#34920#21495
        Title.CaptionAcrossCols = '1'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Alignment = taLeftJustify
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FieldName = 'Code'
        ReadOnly = False
      end
      item
        Title.Caption = #20132#24037#35777#20070'/'#20973#35777#21495
        Title.CaptionAcrossCols = '1'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Alignment = taLeftJustify
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FieldName = 'CertificateCode'
        ReadOnly = False
      end>
    Grid = zgZJJL
    ExtendRowCount = 0
    Left = 152
    Top = 160
  end
end