u_jsmx.dfm

材料租赁

object frmJsmx: TfrmJsmx
  Left = 72
  Top = 99
  Width = 731
  Height = 545
  Caption = #26448#26009#32467#31639#26126#32454#34920
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 723
    Height = 33
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object frTBPanel1: TfrTBPanel
      Left = 0
      Top = 0
      Width = 227
      Height = 33
      Align = alLeft
      AutoSize = True
      BevelInner = bvLowered
      BevelOuter = bvNone
      Caption = 'frTBPanel1'
      TabOrder = 0
      object Shape1: TShape
        Left = 107
        Top = 17
        Width = 12
        Height = 3
        Brush.Color = clRed
        Pen.Color = clRed
        Shape = stEllipse
      end
      object dtEnd: TDateTimePicker
        Left = 120
        Top = 7
        Width = 106
        Height = 20
        BevelInner = bvNone
        BevelOuter = bvNone
        Date = 38067.000000000000000000
        Time = 38067.000000000000000000
        Color = 16768925
        DateFormat = dfLong
        Font.Charset = GB2312_CHARSET
        Font.Color = clTeal
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = False
        TabOrder = 0
      end
      object dtStar: TDateTimePicker
        Left = 1
        Top = 9
        Width = 104
        Height = 20
        BevelInner = bvNone
        BevelOuter = bvNone
        Date = 38067.000000000000000000
        Time = 38067.000000000000000000
        Color = 16768925
        DateFormat = dfLong
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
      end
    end
    object frTBPanel2: TfrTBPanel
      Left = 568
      Top = 0
      Width = 155
      Height = 33
      Align = alRight
      AutoSize = True
      Caption = 'frTBPanel2'
      TabOrder = 1
      object btnClose: TSpeedButton
        Left = 106
        Top = 7
        Width = 48
        Height = 22
        Caption = #36864#20986
        Flat = True
        Glyph.Data = {
          36030000424D3603000000000000360000002800000010000000100000000100
          18000000000000030000120B0000120B00000000000000000000BFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBD
          BDBFBDBDBFBDBDBFBFBFBFBEBEBF0000BF0000BF0000BF0000BF0000BFBFBFBF
          0000BF0000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBDBDBFBDBDBFBEBEBF0000
          BF0000BF0000BF0000BF0000BFBFBFBF0000BF0000000000BFBFBFBFBFBFBFBF
          BFBFBFBFBFBDBDBFBDBDBFBEBEBF0000BE6E6EBE6E6EBE6E6EBF0000BFBFBFBF
          BFBFBF0000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBDBDBFBDBDBFBEBEBF0000
          BE6E6EBE6E6EBE6E6EBF0000BFBFBFBFBFBFBF0000000000BFBFBFBFBFBFBFBF
          BFBFBFBFBFBDBDBFBDBDBFBEBEBF0000BE6E6EBE6E6EBE6E6EBF0000BFBFBFBF
          BFBFBF0000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBDBDBFBDBDBFBEBEBF0000
          BE6E6EBE6E6EBE6E6EBF0000BFBFBFBFBFBFBF0000000000BFBFBFBFBFBFBFBF
          BFBFBFBFBFBDBDBFBDBDBFBEBEBF0000BE6E6EBE6E6EBE6E6EBF0000BFBFBFBF
          BFBFBF0000BFBFBFBFBFBF0000FFBFBFBFBFBFBFBFBDBDBFBDBDBFBEBEBF0000
          BE6E6EBE6E6EBE6E6EBF0000BFBFBFBFBFBFBFBFBFBFBFBF0000FF0000FFBFBF
          BFBFBFBFBFBDBDBFBDBDBFBEBEBF0000BE6E6EBE6E6EBE6E6EBF0000BFBFBFBF
          BFBFBFBFBF0000FF0000FF0000FF0000FF0000FFBFBFBFBFBDBDBFBEBEBF0000
          BE6E6EBE6E6EBF0000BF0000BFBFBFBFBFBFBFBFBFBFBFBF0000FF0000FFBFBF
          BF0000FFBFBFBFBFBDBDBFBEBEBF0000BE6E6EBF0000BF0000BFBFBFBFBFBFBF
          BFBFBF0000BFBFBFBFBFBF0000FFBFBFBFBFBFBF0000FFBFBDBDBFBEBEBF0000
          BF0000BF0000BFBFBFBFBFBFBFBFBFBFBFBFBF0000000000BFBFBFBFBFBFBFBF
          BFBFBFBF0000FFBFBDBDBFBEBEBF0000BF0000BFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBF0000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBDBDBFBEBEBF0000
          BF0000BF0000BF0000BF0000BF0000BF0000BF0000000000BFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBDBDBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBDBDBFBDBDBFBDBDBFBDBDBFBDBD}
        OnClick = btnCloseClick
      end
      object btnQuery: TSpeedButton
        Left = 1
        Top = 7
        Width = 51
        Height = 22
        Caption = #26597#35810
        Flat = True
        Glyph.Data = {
          66010000424D6601000000000000760000002800000014000000140000000100
          040000000000F0000000130B0000130B00001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          FFFFFFFFC0C0FFFFFFFFFFFFFFFFFFFFC0C0FFFFFFF000FFFFF000FFC0C0FFFF
          FFF080FFFFF080FFC0C0FFFFFFF0007FFF7000FFC0C0FFFFFFF00000000000FF
          C0C0FF0000008000080000FFC0C0FF0FFFF08000080000FFC0C0FF0F00F00000
          000000FFC0C0FF0FFFFF0000F0000FFFC0C0FF0CCCCCC00CCC00FFFFC0C0FFFC
          FFFFF00FFF00FFFFC0C0FFFCF00F00080F00FFFFC0C0FFFCFFFFFFFFFFCFFFFF
          C0C0FFFCCCCCCCCCCCCFFFFFC0C0FFFC8CC8CC8CC8CFFFFFC0C0FFFCCCCCCCCC
          CCCFFFFFC0C0FFFFFFFFFFFFFFFFFFFFC0C0FFFFFFFFFFFFFFFFFFFFC0C0FFFF
          FFFFFFFFFFFFFFFFC0C0}
        OnClick = btnQueryClick
      end
      object btnPrint: TSpeedButton
        Left = 54
        Top = 7
        Width = 51
        Height = 22
        Caption = #25171#21360
        Flat = True
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000074120000741200001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888000000000
          0888880888888880808880000000000008088088888BBB808008808888877780
          8808800000000000888080888888888808808808888888888080888088888888
          8800888808888888888088888000000000008888077777777708888077777777
          7088880777777777088880777777777088888000000000088888}
        OnClick = btnPrintClick
      end
    end
    object frTBPanel3: TfrTBPanel
      Left = 227
      Top = 0
      Width = 341
      Height = 33
      Align = alClient
      AutoSize = True
      Caption = 'frTBPanel3'
      TabOrder = 2
      object Label3: TLabel
        Left = 6
        Top = 10
        Width = 49
        Height = 14
        Caption = #39033#30446#37096':'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label1: TLabel
        Left = 167
        Top = 9
        Width = 63
        Height = 14
        Caption = #26448#26009#21517#31216':'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object cmbBm: TComboBox
        Left = 60
        Top = 7
        Width = 101
        Height = 20
        ItemHeight = 12
        TabOrder = 0
        Text = 'cmbBm'
      end
      object cmbCl: TComboBox
        Left = 228
        Top = 6
        Width = 101
        Height = 20
        ItemHeight = 12
        TabOrder = 1
        Text = 'cmbCl'
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 499
    Width = 723
    Height = 19
    Panels = <
      item
        Width = 50
      end>
  end
  object DBGridEh1: TDBGridEh
    Left = 0
    Top = 33
    Width = 723
    Height = 449
    Align = alClient
    ColumnDefValues.Title.TitleButton = True
    DataSource = DataSource1
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -12
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    FooterRowCount = 1
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection]
    OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghFitRowHeightToText, dghEnterAsTab, dghTraceColSizing, dghRowHighlight]
    ParentShowHint = False
    RowHeight = 2
    RowLines = 1
    RowSizingAllowed = True
    ShowHint = True
    SumList.Active = True
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    TitleLines = 1
    UseMultiTitle = True
    OnColWidthsChanged = DBGridEh1ColWidthsChanged
    Columns = <
      item
        EditButtons = <>
        FieldName = 'sdate'
        Footer.Font.Charset = GB2312_CHARSET
        Footer.Font.Color = clBlue
        Footer.Font.Height = -12
        Footer.Font.Name = #23435#20307
        Footer.Font.Style = []
        Footer.Value = #20849#26377#35760#24405#25968':'
        Footer.ValueType = fvtStaticText
        Footers = <>
        Title.Caption = #26085#26399
        Title.Color = 16776400
        Width = 110
      end
      item
        EditButtons = <>
        FieldName = 'spmc'
        Footer.Font.Charset = GB2312_CHARSET
        Footer.Font.Color = clMaroon
        Footer.Font.Height = -12
        Footer.Font.Name = #23435#20307
        Footer.Font.Style = []
        Footer.ValueType = fvtCount
        Footers = <>
        Title.Caption = #21697#21517
        Title.Color = 16776400
        Width = 193
      end
      item
        EditButtons = <>
        FieldName = 'jldw'
        Footers = <>
        Title.Caption = #21333#20301
        Title.Color = 16776400
        Width = 69
      end
      item
        EditButtons = <>
        FieldName = 'fcsl'
        Footers = <>
        Title.Caption = #21457#20986#25968#37327
        Title.Color = 16776400
        Width = 61
      end
      item
        EditButtons = <>
        FieldName = 'hssl'
        Footers = <>
        Title.Caption = #22238#25910#25968#37327
        Title.Color = 16776400
        Width = 53
      end
      item
        EditButtons = <>
        FieldName = 'spdj'
        Footers = <>
        Title.Caption = #21333#20215
        Title.Color = 16776400
        Width = 38
      end
      item
        EditButtons = <>
        FieldName = 'zlts'
        Footers = <>
        Title.Caption = #22825#25968
        Title.Color = 16776400
        Width = 20
      end
      item
        EditButtons = <>
        FieldName = 'money'
        Footers = <>
        Title.Caption = #37329#39069
        Title.Color = 16776400
        Width = 66
      end
      item
        EditButtons = <>
        FieldName = 'jsje'
        Font.Charset = GB2312_CHARSET
        Font.Color = clMaroon
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Footers = <>
        Title.Caption = #31199#37329
        Title.Color = 16776400
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlack
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Width = 86
      end>
  end
  object pShwomessage: TPanel
    Left = 288
    Top = 184
    Width = 241
    Height = 41
    BevelInner = bvLowered
    Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#20505#65281'......'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    Visible = False
  end
  object Panel2: TPanel
    Left = 0
    Top = 482
    Width = 723
    Height = 17
    Align = alBottom
    AutoSize = True
    BevelOuter = bvNone
    TabOrder = 4
    object chkYq: TCheckBox
      Left = 8
      Top = 0
      Width = 57
      Height = 17
      Caption = #39044#27979
      Checked = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      State = cbChecked
      TabOrder = 0
    end
  end
  object adofc: TADOQuery
    Connection = frmMain.ADOConnect
    Parameters = <>
    Left = 544
    Top = 152
  end
  object adosh: TADOQuery
    Connection = frmMain.ADOConnect
    Parameters = <>
    Left = 576
    Top = 152
  end
  object DataSource1: TDataSource
    DataSet = adofc
    Left = 451
    Top = 152
  end
  object DataSource2: TDataSource
    DataSet = adosh
    Left = 483
    Top = 152
  end
  object qyado: TADOQuery
    Connection = frmMain.ADOConnect
    Parameters = <>
    Left = 616
    Top = 152
  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 = 648
    Top = 152
  end
  object ADOUpdate: TADOQuery
    Connection = frmMain.ADOConnect
    Parameters = <>
    Left = 512
    Top = 152
  end
end