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

📄 copy_zyjxjh.dfm

📁 本科的毕业设计
💻 DFM
字号:
object Frmzyjxjhhz: TFrmzyjxjhhz
  Left = 221
  Top = 279
  Width = 490
  Height = 288
  BorderIcons = []
  Caption = #22797#21046#19987#19994#25945#23398#35745#21010
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 482
    Height = 261
    Align = alClient
    BevelOuter = bvLowered
    BevelWidth = 2
    TabOrder = 0
    object GroupBox1: TGroupBox
      Left = 32
      Top = 24
      Width = 153
      Height = 193
      Caption = #28304#19987#19994#25945#23398#35745#21010
      TabOrder = 0
      object Label1: TLabel
        Left = 7
        Top = 18
        Width = 60
        Height = 13
        Caption = #20837#23398#24180#20221#65306
      end
      object ListBox1: TListBox
        Left = 2
        Top = 40
        Width = 149
        Height = 151
        Color = cl3DLight
        ItemHeight = 13
        TabOrder = 0
        OnClick = ListBox1Click
      end
      object ComboBox1: TComboBox
        Left = 68
        Top = 14
        Width = 73
        Height = 21
        ItemHeight = 13
        TabOrder = 1
        OnChange = ComboBox1Change
      end
    end
    object GroupBox2: TGroupBox
      Left = 224
      Top = 24
      Width = 153
      Height = 193
      Caption = #22797#21046#21040#19987#19994
      TabOrder = 1
      object Label2: TLabel
        Left = 7
        Top = 18
        Width = 60
        Height = 13
        Caption = #20837#23398#24180#20221#65306
      end
      object ListBox2: TListBox
        Left = 2
        Top = 40
        Width = 149
        Height = 151
        Color = cl3DLight
        ItemHeight = 13
        TabOrder = 0
        OnClick = ListBox2Click
      end
      object ComboBox2: TComboBox
        Left = 68
        Top = 14
        Width = 73
        Height = 21
        ItemHeight = 13
        TabOrder = 1
        OnChange = ComboBox2Change
      end
    end
    object Button1: TButton
      Left = 400
      Top = 80
      Width = 59
      Height = 25
      Caption = #30830#23450
      TabOrder = 2
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 400
      Top = 136
      Width = 59
      Height = 25
      Caption = #21462#28040
      TabOrder = 3
      OnClick = Button2Click
    end
  end
  object Q_deljxjhb: TQuery
    DatabaseName = 'kjxy'
    SQL.Strings = (
      'SELECT JW_JXJHB.JW_JXJHB__KYY, JW_JXJHB.JW_JXJHB__RXNF, '
      '      SYS_ZY.SYS_ZY__ZYM'
      'FROM JW_JXJHB INNER JOIN'
      '      SYS_ZY ON JW_JXJHB.JW_JXJHB__ZYH = SYS_ZY.SYS_ZY__ZYH'
      'WHERE (JW_JXJHB.JW_JXJHB__RXNF =:rxnf) AND '
      '      (SYS_ZY.SYS_ZY__ZYM =:zym)')
    Left = 192
    Top = 112
    ParamData = <
      item
        DataType = ftString
        Name = 'rxnf'
        ParamType = ptUnknown
        Value = '0'
      end
      item
        DataType = ftString
        Name = 'zym'
        ParamType = ptUnknown
        Value = '0'
      end>
  end
  object Q_rxnf_jxjh: TQuery
    DatabaseName = 'kjxy'
    SQL.Strings = (
      'SELECT JW_JXJHB.JW_JXJHB__RXNF, SYS_ZY.SYS_ZY__ZYM, '
      '      JW_JXJHB.JW_JXJHB__ZYH, JW_JXJHB.JW_JXJHB__KYY, '
      '      JW_JXJHB.JW_JXJHB__KCH, JW_JXJHB.JW_JXJHB__KCH1, '
      '      JW_JXJHB.JW_JXJHB__KCLB, JW_JXJHB.JW_JXJHB__KSFS, '
      '      JW_JXJHB.JW_JXJHB__KSLB, JW_JXJHB.JW_JXJHB__ZXS, '
      '      JW_JXJHB.JW_JXJHB__ZXF'
      'FROM SYS_ZY INNER JOIN'
      '      JW_JXJHB ON SYS_ZY.SYS_ZY__ZYH = JW_JXJHB.JW_JXJHB__ZYH'
      
        'WHERE (JW_JXJHB.JW_JXJHB__RXNF = :rxnf) AND (SYS_ZY.SYS_ZY__ZYM ' +
        '=:zym) ')
    Left = 248
    Top = 112
    ParamData = <
      item
        DataType = ftString
        Name = 'rxnf'
        ParamType = ptUnknown
        Value = '0'
      end
      item
        DataType = ftString
        Name = 'zym'
        ParamType = ptUnknown
        Value = '0'
      end>
  end
  object Q_jxjhc: TQuery
    DatabaseName = 'kjxy'
    SQL.Strings = (
      'SELECT JW_JXJHB.JW_JXJHB__RXNF, SYS_ZY.SYS_ZY__ZYM, '
      '      JW_JXJHC.*, JW_JXJHB.JW_JXJHB__KCH, '
      '      JW_JXJHB.JW_JXJHB__ZYH'
      'FROM JW_JXJHC INNER JOIN'
      '      JW_JXJHB ON '
      '      JW_JXJHC.JW_JXJHC__KYY = JW_JXJHB.JW_JXJHB__KYY INNER JOIN'
      '      SYS_ZY ON JW_JXJHB.JW_JXJHB__ZYH = SYS_ZY.SYS_ZY__ZYH'
      'WHERE (JW_JXJHB.JW_JXJHB__RXNF =:rxnf ) AND '
      '      (SYS_ZY.SYS_ZY__ZYM =:zym)')
    Left = 224
    Top = 168
    ParamData = <
      item
        DataType = ftString
        Name = 'rxnf'
        ParamType = ptUnknown
        Value = '0'
      end
      item
        DataType = ftString
        Name = 'zym'
        ParamType = ptUnknown
        Value = '0'
      end>
  end
  object Q_okyy_nkyy: TQuery
    DatabaseName = 'kjxy'
    SQL.Strings = (
      'SELECT JW_JXJHB.*, JW_JXJHB__ZYH FROM JW_JXJHB'
      'WHERE (JW_JXJHB__RXNF =:rxnf) AND (JW_JXJHB__KCH =:kch) AND '
      '      (JW_JXJHB__ZYH =:zyh)'
      '')
    Left = 280
    Top = 216
    ParamData = <
      item
        DataType = ftString
        Name = 'rxnf'
        ParamType = ptUnknown
        Value = '0'
      end
      item
        DataType = ftString
        Name = 'kch'
        ParamType = ptUnknown
        Value = '0'
      end
      item
        DataType = ftString
        Name = 'zyh'
        ParamType = ptUnknown
        Value = '0'
      end>
  end
  object Table1: TTable
    DatabaseName = 'kjxy'
    TableName = 'dbo.SYS_RXNF'
    Left = 200
    Top = 16
  end
end

⌨️ 快捷键说明

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