⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit_query_lr.dfm

📁 DELPHI 编写的绣花厂管理软件
💻 DFM
字号:
inherited form_query_lr: Tform_query_lr
  Left = 204
  Top = 184
  Caption = #38144#21806#21333#21697#21033#28070#26597#35810
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 786
    Height = 73
    Align = alTop
    BevelInner = bvLowered
    TabOrder = 0
    object Label2: TLabel
      Left = 17
      Top = 13
      Width = 78
      Height = 13
      Caption = #21333#25454#26085#26399#20174#65306
    end
    object Label3: TLabel
      Left = 518
      Top = 13
      Width = 39
      Height = 13
      Caption = #23458#25143#65306
    end
    object Label1: TLabel
      Left = 347
      Top = 13
      Width = 65
      Height = 13
      Caption = #38144#21806#21333#21495#65306
    end
    object Label8: TLabel
      Left = 210
      Top = 11
      Width = 13
      Height = 13
      Caption = #33267
    end
    object BitBtn_find: TBitBtn
      Left = 467
      Top = 41
      Width = 75
      Height = 25
      Caption = #26597#35810
      TabOrder = 5
      OnClick = BitBtn_findClick
    end
    object BitBtn_quit: TBitBtn
      Left = 665
      Top = 41
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 7
      OnClick = BitBtn_quitClick
    end
    object DateEdit_begin: TDateEdit
      Left = 93
      Top = 8
      Width = 106
      Height = 21
      Color = 16572566
      DefaultToday = True
      NumGlyphs = 2
      TabOrder = 0
    end
    object DateEdit_end: TDateEdit
      Left = 234
      Top = 8
      Width = 106
      Height = 21
      Color = 16572566
      DefaultToday = True
      NumGlyphs = 2
      TabOrder = 1
    end
    object Edit_jhdh: TEdit
      Left = 410
      Top = 8
      Width = 105
      Height = 21
      Color = 16572566
      TabOrder = 2
    end
    object Edit_gys: TEdit
      Left = 554
      Top = 8
      Width = 169
      Height = 21
      Color = 16572566
      TabOrder = 3
    end
    object BitBtn_print: TBitBtn
      Left = 562
      Top = 41
      Width = 75
      Height = 25
      Caption = #25171#21360
      TabOrder = 6
      OnClick = BitBtn_printClick
    end
    object Button1: TButton
      Left = 728
      Top = 7
      Width = 24
      Height = 20
      Caption = '..'
      TabOrder = 4
      OnClick = Button1Click
    end
  end
  object DBGridEh1: TDBGridEh
    Left = 0
    Top = 73
    Width = 786
    Height = 384
    Align = alClient
    AutoFitColWidths = True
    Color = 16382446
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    FooterColor = clWindow
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clRed
    FooterFont.Height = -13
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    FooterRowCount = 1
    ParentFont = False
    ReadOnly = True
    SumList.Active = True
    TabOrder = 1
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Columns = <
      item
        EditButtons = <>
        FieldName = 't0301'
        Footer.Alignment = taCenter
        Footer.Value = #21512#35745#65306
        Footer.ValueType = fvtStaticText
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21333#25454#21495
        Width = 80
      end
      item
        EditButtons = <>
        FieldName = 't0302'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #38144#21806#26085#26399
        Width = 66
      end
      item
        EditButtons = <>
        FieldName = #23458#25143#21517#31216
        Footers = <>
        Title.Alignment = taCenter
        Width = 150
      end
      item
        EditButtons = <>
        FieldName = #21830#21697#21517#31216
        Footers = <>
        Title.Alignment = taCenter
        Width = 150
      end
      item
        EditButtons = <>
        FieldName = #35268#26684
        Footers = <>
        Title.Alignment = taCenter
        Width = 80
      end
      item
        EditButtons = <>
        FieldName = #21333#20301
        Footers = <>
        Title.Alignment = taCenter
        Width = 40
      end
      item
        EditButtons = <>
        FieldName = 't0403'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21333#20215
        Width = 60
      end
      item
        EditButtons = <>
        FieldName = 't0406'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #25968#37327
        Width = 50
      end
      item
        EditButtons = <>
        FieldName = 't0404'
        Footer.FieldName = 't0404'
        Footer.ValueType = fvtSum
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #37329#39069
        Width = 60
      end
      item
        EditButtons = <>
        FieldName = 't0407'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21378#20215
        Width = 80
      end
      item
        EditButtons = <>
        FieldName = #21333#21697#21033#28070
        Footer.FieldName = #21333#21697#21033#28070
        Footer.ValueType = fvtSum
        Footers = <>
        Width = 80
      end>
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 160
    Top = 224
  end
  object ADOQuery1: TADOQuery
    Connection = Form_main.ADOCn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select *,(t0404-t0407*t0406)  as '#21333#21697#21033#28070','
      '(select t0202 from t02 where t0200=t03.t0304) as '#23458#25143#21517#31216','
      '(select t0707 from t07 where t0700=t04.t0402) as '#21333#20301','
      '(select t0702 from t07 where t0700=t04.t0402) as '#21830#21697#21517#31216','
      '(select t0703 from t07 where t0700=t04.t0402) as '#35268#26684
      'from t03 , t04'
      'where t03.t0300=t04.t0401')
    Left = 128
    Top = 224
  end
  object ADOQuery2: TADOQuery
    Connection = Form_main.ADOCn
    Parameters = <>
    Left = 640
    Top = 216
  end
  object RMDBDataSet1: TRMDBDataSet
    DataSet = ADOQuery1
    Left = 336
    Top = 200
  end
  object RMReport1: TRMReport
    Dataset = RMDBDataSet1
    InitialZoom = pzPageWidth
    ModifyPrepared = True
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit]
    Left = 304
    Top = 200
    ReportForm = {28000000}
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -