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

📄 mc_sdmqfdy.dfm

📁 1、系统环境要求:所有程序均在Windows98/XP操作系统下测试运行。 2、建议用户在系统上安装DELPHI7.0企业版。 3、如果数据库为SQL Server数据库
💻 DFM
📖 第 1 页 / 共 5 页
字号:
object SDMQFDY: TSDMQFDY
  Left = 222
  Top = 62
  Hint = #27700#30005#29028#27668#36153#25171#21360
  BorderStyle = bsToolWindow
  Caption = #27700#30005#29028#27668#36153#25171#21360#65306
  ClientHeight = 626
  ClientWidth = 792
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  ShowHint = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 4
    Top = 5
    Width = 193
    Height = 51
    Caption = #29616#26377#23567#21306#65306
    TabOrder = 0
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 9
      Top = 21
      Width = 174
      Height = 20
      KeyField = #23567#21306#21517
      ListField = #23567#21306#21517
      ListSource = DataSource1
      TabOrder = 0
    end
  end
  object GroupBox2: TGroupBox
    Left = 4
    Top = 61
    Width = 193
    Height = 225
    Caption = #21306#20869#27004#25151#21015#34920#65306
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 8
      Top = 17
      Width = 175
      Height = 198
      DataSource = DataSource2
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = #22823#27004#21517#31216
          Width = 95
          Visible = True
        end
        item
          Expanded = False
          FieldName = #36127#36131#20154
          Width = 44
          Visible = True
        end>
    end
  end
  object GroupBox3: TGroupBox
    Left = 202
    Top = 4
    Width = 119
    Height = 617
    Caption = #36873#31181#25151#23627#21015#34920#65306
    TabOrder = 2
    object ListBox1: TListBox
      Left = 8
      Top = 16
      Width = 103
      Height = 569
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 16
      ParentFont = False
      TabOrder = 0
      OnDblClick = ListBox1DblClick
    end
    object BitBtn1: TBitBtn
      Left = 8
      Top = 588
      Width = 103
      Height = 25
      Caption = #30830#23450
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BitBtn1Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333330000333333333333333333333333F33333333333
        00003333344333333333333333388F3333333333000033334224333333333333
        338338F3333333330000333422224333333333333833338F3333333300003342
        222224333333333383333338F3333333000034222A22224333333338F338F333
        8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
        33333338F83338F338F33333000033A33333A222433333338333338F338F3333
        0000333333333A222433333333333338F338F33300003333333333A222433333
        333333338F338F33000033333333333A222433333333333338F338F300003333
        33333333A222433333333333338F338F00003333333333333A22433333333333
        3338F38F000033333333333333A223333333333333338F830000333333333333
        333A333333333333333338330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
  end
  object GroupBox4: TGroupBox
    Left = 4
    Top = 291
    Width = 193
    Height = 330
    Caption = #25151#38388#20449#24687#21015#34920#65306
    TabOrder = 3
    object DBGrid2: TDBGrid
      Left = 9
      Top = 18
      Width = 172
      Height = 302
      DataSource = DataSource3
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnDblClick = DBGrid2DblClick
      Columns = <
        item
          Expanded = False
          FieldName = #25151#38388#32534#21495
          Width = 71
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25151#20027#22995#21517
          Visible = True
        end>
    end
  end
  object PageControl1: TPageControl
    Left = 328
    Top = 8
    Width = 460
    Height = 613
    ActivePage = TabSheet1
    TabIndex = 0
    TabOrder = 4
    object TabSheet1: TTabSheet
      Caption = #12304#27700#36153#12305
      object DBGrid3: TDBGrid
        Left = 5
        Top = 6
        Width = 441
        Height = 551
        DataSource = DataSource4
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
      end
      object BitBtn2: TBitBtn
        Left = 5
        Top = 560
        Width = 148
        Height = 26
        Caption = #25171#21360#27700#36153#20449#24687
        TabOrder = 1
        OnClick = BitBtn2Click
        Glyph.Data = {
          42020000424D4202000000000000420000002800000010000000100000000100
          1000030000000002000000000000000000000000000000000000007C0000E003
          00001F0000001F7CEF3DEF3DEF3DEF3DEF3D1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7CAD3528212821282128218B2D39671F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C734EFF7FDD779C737A6B734E3967EF3D1F7C28211F7C1F7C1F7C
          1F7C1F7C1F7C1F7C7A6BDD77DD77DD777A6B8B2DE71CEF3DC51484101F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C5146E71CAD35734EB452734EE71CE71C21041F7C
          1F7C1F7C1F7C1F7CEF3DE71CB452F75E9C73734EB452B452E71CE71C2821C514
          E71C1F7C1F7C282139677A6BDD77EF3DB452B452F75E734EE71CE71CE71CE71C
          E71C84101F7CDD77F75E51467A6B3967F75EF75E9C73B452E71CE71CE71CE71C
          E71CE71C8410DD779C739C739C739C739C73F75EF75EB452C514C5142821E71C
          E71CE71C0000DD77DD779C73F75EF75E7A6B7A6BDD779C73734EE71CE71C2821
          E71CE71C2104DD77F75E9C739C73DD77FF7F734E3967F75EB452F75E5146C514
          E71CE71C2104DD77DD77DD77B452AD35B452B452282128219C737A6B9C73DD77
          C514E71C21047A6B3967AD35DD77FF7FFF7FDD779C73B4528B2DF75EF75EE71C
          AD35E71C21041F7C1F7CB4523967E71C28212821EF3D734EE71C21043967AD35
          9C735F6F21041F7C1F7C1F7C1F7C7A6BAD35E71C8410E71CB452DD77DD77F75E
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C3967F75EFF7F7A6BF75E1F7C1F7C1F7C
          1F7C1F7C1F7C}
      end
    end
    object TabSheet2: TTabSheet
      Caption = #12304#30005#36153#12305
      ImageIndex = 1
      object DBGrid4: TDBGrid
        Left = 5
        Top = 6
        Width = 441
        Height = 551
        DataSource = DataSource5
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
      end
      object BitBtn3: TBitBtn
        Left = 5
        Top = 560
        Width = 148
        Height = 26
        Caption = #25171#21360#30005#36153#20449#24687
        TabOrder = 1
        OnClick = BitBtn3Click
        Glyph.Data = {
          42020000424D4202000000000000420000002800000010000000100000000100
          1000030000000002000000000000000000000000000000000000007C0000E003
          00001F0000001F7CEF3DEF3DEF3DEF3DEF3D1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7CAD3528212821282128218B2D39671F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C734EFF7FDD779C737A6B734E3967EF3D1F7C28211F7C1F7C1F7C
          1F7C1F7C1F7C1F7C7A6BDD77DD77DD777A6B8B2DE71CEF3DC51484101F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C5146E71CAD35734EB452734EE71CE71C21041F7C
          1F7C1F7C1F7C1F7CEF3DE71CB452F75E9C73734EB452B452E71CE71C2821C514
          E71C1F7C1F7C282139677A6BDD77EF3DB452B452F75E734EE71CE71CE71CE71C
          E71C84101F7CDD77F75E51467A6B3967F75EF75E9C73B452E71CE71CE71CE71C
          E71CE71C8410DD779C739C739C739C739C73F75EF75EB452C514C5142821E71C
          E71CE71C0000DD77DD779C73F75EF75E7A6B7A6BDD779C73734EE71CE71C2821
          E71CE71C2104DD77F75E9C739C73DD77FF7F734E3967F75EB452F75E5146C514
          E71CE71C2104DD77DD77DD77B452AD35B452B452282128219C737A6B9C73DD77
          C514E71C21047A6B3967AD35DD77FF7FFF7FDD779C73B4528B2DF75EF75EE71C
          AD35E71C21041F7C1F7CB4523967E71C28212821EF3D734EE71C21043967AD35
          9C735F6F21041F7C1F7C1F7C1F7C7A6BAD35E71C8410E71CB452DD77DD77F75E
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C3967F75EFF7F7A6BF75E1F7C1F7C1F7C
          1F7C1F7C1F7C}
      end
    end
    object TabSheet3: TTabSheet
      Caption = #12304#29028#27668#36153#12305
      ImageIndex = 2
      object DBGrid5: TDBGrid
        Left = 5
        Top = 6
        Width = 441
        Height = 551
        DataSource = DataSource6
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
      end
      object BitBtn4: TBitBtn
        Left = 5
        Top = 560
        Width = 148
        Height = 26
        Caption = #25171#21360#29028#27668#36153#20449#24687
        TabOrder = 1
        OnClick = BitBtn4Click
        Glyph.Data = {
          42020000424D4202000000000000420000002800000010000000100000000100
          1000030000000002000000000000000000000000000000000000007C0000E003
          00001F0000001F7CEF3DEF3DEF3DEF3DEF3D1F7C1F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7CAD3528212821282128218B2D39671F7C1F7C1F7C1F7C1F7C1F7C
          1F7C1F7C1F7C734EFF7FDD779C737A6B734E3967EF3D1F7C28211F7C1F7C1F7C
          1F7C1F7C1F7C1F7C7A6BDD77DD77DD777A6B8B2DE71CEF3DC51484101F7C1F7C
          1F7C1F7C1F7C1F7C1F7C1F7C5146E71CAD35734EB452734EE71CE71C21041F7C
          1F7C1F7C1F7C1F7CEF3DE71CB452F75E9C73734EB452B452E71CE71C2821C514
          E71C1F7C1F7C282139677A6BDD77EF3DB452B452F75E734EE71CE71CE71CE71C
          E71C84101F7CDD77F75E51467A6B3967F75EF75E9C73B452E71CE71CE71CE71C
          E71CE71C8410DD779C739C739C739C739C73F75EF75EB452C514C5142821E71C
          E71CE71C0000DD77DD779C73F75EF75E7A6B7A6BDD779C73734EE71CE71C2821
          E71CE71C2104DD77F75E9C739C73DD77FF7F734E3967F75EB452F75E5146C514
          E71CE71C2104DD77DD77DD77B452AD35B452B452282128219C737A6B9C73DD77
          C514E71C21047A6B3967AD35DD77FF7FFF7FDD779C73B4528B2DF75EF75EE71C
          AD35E71C21041F7C1F7CB4523967E71C28212821EF3D734EE71C21043967AD35
          9C735F6F21041F7C1F7C1F7C1F7C7A6BAD35E71C8410E71CB452DD77DD77F75E
          1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C3967F75EFF7F7A6BF75E1F7C1F7C1F7C
          1F7C1F7C1F7C}
      end
    end
  end
  object QuickRep1: TQuickRep
    Left = 184
    Top = 631
    Width = 794
    Height = 1123
    Frame.Color = clBlack
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    DataSet = Query2
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Functions.Strings = (
      'PAGENUMBER'
      'COLUMNNUMBER'
      'REPORTTITLE')
    Functions.DATA = (
      '0'
      '0'
      #39#39)
    OnPreview = QuickRep1Preview
    Options = [FirstPageHeader, LastPageFooter]
    Page.Columns = 1
    Page.Orientation = poPortrait
    Page.PaperSize = A4
    Page.Values = (
      100
      2970
      100
      2100
      100
      100
      0)
    PrinterSettings.Copies = 1
    PrinterSettings.Duplex = False
    PrinterSettings.FirstPage = 0
    PrinterSettings.LastPage = 0
    PrinterSettings.OutputBin = Auto
    PrintIfEmpty = True
    SnapToGrid = True
    Units = MM
    Zoom = 100
    object PageHeaderBand1: TQRBand
      Left = 38
      Top = 38
      Width = 718
      Height = 40
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      Size.Values = (
        105.833333333333
        1899.70833333333)
      BandType = rbPageHeader
      object QRLabel1: TQRLabel
        Left = 300
        Top = 10
        Width = 97
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          793.75
          26.4583333333333
          256.645833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #27700#36153#20449#24687#25171#21360
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 12
      end
      object QRLabel2: TQRLabel
        Left = 10
        Top = 20
        Width = 61
        Height = 13
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          34.3958333333333
          26.4583333333333
          52.9166666666667
          161.395833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = '['#19975#36890#33457#22253']'
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRLabel9: TQRLabel
        Left = 600
        Top = 20
        Width = 25
        Height = 13
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          34.3958333333333
          1587.5
          52.9166666666667
          66.1458333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #31532#65306
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRSysData1: TQRSysData
        Left = 630

⌨️ 快捷键说明

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