ujetz.dfm

材料租赁

    object dtdate: TDBDateTimeEditEh
      Left = 88
      Top = 19
      Width = 121
      Height = 22
      DataField = 'sdate'
      DataSource = DM.DS_CLJX
      EditButtons = <>
      Kind = dtkDateEh
      TabOrder = 0
      Visible = True
    end
    object DBLookupComboboxEh1: TDBLookupComboboxEh
      Left = 308
      Top = 20
      Width = 139
      Height = 22
      DataField = 'bmbh'
      DataSource = DM.DS_CLJX
      EditButtons = <>
      KeyField = 'bmbh'
      ListField = 'bmname'
      ListSource = DM.DS_BMBMK
      TabOrder = 1
      Visible = True
    end
    object DBEditEh2: TDBEditEh
      Left = 88
      Top = 56
      Width = 89
      Height = 22
      Hint = #35831#36755#20837#26448#26009#32534#30721#21518#25353#22238#36710#38190'!........'
      DataField = 'spbh'
      DataSource = DM.DS_CLJX
      EditButtons = <>
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      Visible = True
    end
    object DBEditEh3: TDBEditEh
      Left = 312
      Top = 57
      Width = 97
      Height = 22
      DataField = 'spmc'
      DataSource = DM.DS_CLJX
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clTeal
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
      Visible = True
    end
    object DBEditEh4: TDBEditEh
      Left = 88
      Top = 89
      Width = 97
      Height = 22
      DataField = 'jldw'
      DataSource = DM.DS_CLJX
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clTeal
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 4
      Visible = True
    end
    object DBEditEh6: TDBEditEh
      Left = 313
      Top = 87
      Width = 97
      Height = 22
      DataField = 'money'
      DataSource = DM.DS_CLJX
      EditButtons = <>
      TabOrder = 5
      Visible = True
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 446
    Width = 572
    Height = 19
    Panels = <
      item
        Width = 150
      end
      item
        Width = 150
      end
      item
        Width = 50
      end>
  end
  object Panel1: TPanel
    Left = 0
    Top = 159
    Width = 572
    Height = 287
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 3
    object DBGridEh1: TDBGridEh
      Left = 0
      Top = 0
      Width = 572
      Height = 287
      Align = alClient
      DataSource = DM.DS_CLJX
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      FooterColor = clWindow
      FooterFont.Charset = GB2312_CHARSET
      FooterFont.Color = clBlack
      FooterFont.Height = -12
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      FooterRowCount = 1
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection]
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection]
      ParentFont = False
      SumList.Active = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clBlack
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          EditButtons = <>
          FieldName = 'sdate'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #26085#26399
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -14
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 70
        end
        item
          EditButtons = <>
          FieldName = 'bmbh'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #37096#38376#32534#30721
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -14
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 82
        end
        item
          EditButtons = <>
          FieldName = 'spbh'
          Footers = <
            item
              Value = #21512#35745':'
              ValueType = fvtStaticText
            end>
          Title.Alignment = taCenter
          Title.Caption = #21830#21697#32534#21495
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -14
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 87
        end
        item
          EditButtons = <>
          FieldName = 'spmc'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #21830#21697#21517#31216
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -14
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 121
        end
        item
          EditButtons = <>
          FieldName = 'jldw'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #21333#20301
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -14
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 94
        end
        item
          EditButtons = <>
          FieldName = 'money'
          Footers = <
            item
              ValueType = fvtSum
            end>
          Title.Alignment = taCenter
          Title.Caption = #37329#39069
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -14
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 80
        end>
    end
  end
  object PrintDBGridEh1: TPrintDBGridEh
    DBGridEh = DBGridEh1
    Options = []
    Page.BottomMargin = 2.000000000000000000
    Page.LeftMargin = 2.000000000000000000
    Page.RightMargin = 2.000000000000000000
    Page.TopMargin = 2.000000000000000000
    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 = 520
    Top = 46
    BeforeGridText_Data = {
      7B5C727466315C616E73695C616E73696370673933365C64656666305C646566
      6C616E67313033335C6465666C616E676665323035327B5C666F6E7474626C7B
      5C66305C666E696C5C6663686172736574313334205C2763625C2763655C2763
      635C2765353B7D7B5C66315C666E696C5C6663686172736574313334204D5320
      53616E732053657269663B7D7D0D0A5C766965776B696E64345C7563315C7061
      72645C71635C6C616E67323035325C625C66305C667332305C2762645C276164
      5C2763625C2764355C2764355C2766645C2762625C2761615C2762645C276138
      5C2763395C2765385C2762635C2761665C2763645C2763355C2762395C276162
      5C2763625C2762655C62305C66315C66733136200D0A5C706172207D0D0A00}
  end
end