copy_jxjh.dfm

本科的毕业设计

object Frmjxjhhz: TFrmjxjhhz
  Left = 233
  Top = 154
  BorderStyle = bsDialog
  Caption = #36873#25321#20837#23398#24180#20221
  ClientHeight = 302
  ClientWidth = 292
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object Label1: TLabel
    Left = 16
    Top = 8
    Width = 169
    Height = 16
    AutoSize = False
    Caption = #36873#25321#28304#25945#23398#35745#21010#24180#20221'............'
  end
  object Button1: TButton
    Left = 200
    Top = 32
    Width = 75
    Height = 25
    Caption = #30830#23450'(&O)'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 200
    Top = 72
    Width = 75
    Height = 25
    Caption = #21462#28040'(&C)'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = Button2Click
  end
  object Lb_rxnf: TListBox
    Left = 16
    Top = 32
    Width = 161
    Height = 233
    ImeName = #26497#21697#20116#31508#36755#20837#27861'5.0'
    ItemHeight = 16
    TabOrder = 2
    OnClick = Lb_rxnfClick
  end
  object Q_deljxjhb: TQuery
    DatabaseName = 'kjxy'
    Left = 192
    Top = 112
  end
  object Q_rxnf_jxjh: TQuery
    DatabaseName = 'kjxy'
    SQL.Strings = (
      
        'SELECT JW_JXJHB__KYY, JW_JXJHB__RXNF, JW_JXJHB__ZYH, JW_JXJHB__K' +
        'CH, JW_JXJHB__KCH1, JW_JXJHB__KCLB, JW_JXJHB__KSFS, JW_JXJHB__KS' +
        'LB, JW_JXJHB__ZXS, JW_JXJHB__ZXF'
      'FROM dbo.JW_JXJHB Dbo_jw_jxjhb'
      'where JW_JXJHB__RXNF=:rxnf')
    Left = 248
    Top = 112
    ParamData = <
      item
        DataType = ftString
        Name = 'rxnf'
        ParamType = ptUnknown
        Value = '0'
      end>
  end
  object Q_jxjhc: TQuery
    DatabaseName = 'kjxy'
    SQL.Strings = (
      'SELECT JW_JXJHB.JW_JXJHB__RXNF, JW_JXJHC.JW_JXJHC__KYY, '
      '      JW_JXJHC.JW_JXJHC__XNXQH, JW_JXJHC.JW_JXJHC__JKZXS, '
      '      JW_JXJHC.JW_JXJHC__XF'
      'FROM JW_JXJHC INNER JOIN'
      
        '      JW_JXJHB ON JW_JXJHC.JW_JXJHC__KYY = JW_JXJHB.JW_JXJHB__KY' +
        'Y'
      'where JW_JXJHB__RXNF=:rxnfh')
    Left = 224
    Top = 168
    ParamData = <
      item
        DataType = ftString
        Name = 'rxnfh'
        ParamType = ptUnknown
        Value = '0'
      end>
  end
  object Q_okyy_nkyy: TQuery
    DatabaseName = 'kjxy'
    SQL.Strings = (
      'SELECT JW_JXJHB.JW_JXJHB__ZXF, JW_JXJHB.JW_JXJHB__ZYH, '
      '      JW_JXJHB.JW_JXJHB__KCH, JW_JXJHB.JW_JXJHB__RXNF AS orxnf, '
      
        '      JW_JXJHB_1.JW_JXJHB__RXNF AS nrxnf, JW_JXJHB_1.JW_JXJHB__K' +
        'YY AS nkyy, '
      '      JW_JXJHB.JW_JXJHB__KYY AS okyy'
      'FROM JW_JXJHB INNER JOIN'
      '      JW_JXJHB JW_JXJHB_1 ON '
      '      JW_JXJHB.JW_JXJHB__ZYH = JW_JXJHB_1.JW_JXJHB__ZYH AND '
      '      JW_JXJHB.JW_JXJHB__KCH = JW_JXJHB_1.JW_JXJHB__KCH'
      'WHERE (JW_JXJHB.JW_JXJHB__KYY =:okyy) AND '
      '      (JW_JXJHB_1.JW_JXJHB__RXNF =:nrxnf)')
    Left = 240
    Top = 240
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'okyy'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'nrxnf'
        ParamType = ptUnknown
      end>
  end
end