📄 score.~dfm

📁 本文件中还有JSP、php和delphi等源程序
💻 ~DFM
字号:
object f_score: Tf_score
  Left = 220
  Top = 84
  Width = 699
  Height = 520
  Caption = #25104#32489#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = True
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Label4: TLabel
    Left = 496
    Top = 193
    Width = 48
    Height = 16
    Caption = #20998#25968#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 496
    Top = 65
    Width = 48
    Height = 16
    Caption = #23398#21495#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 496
    Top = 97
    Width = 48
    Height = 16
    Caption = #22995#21517#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 496
    Top = 129
    Width = 48
    Height = 16
    Caption = #24615#21035#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 496
    Top = 161
    Width = 48
    Height = 16
    Caption = #19987#19994#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 691
    Height = 41
    Align = alTop
    TabOrder = 0
    object Label8: TLabel
      Left = 16
      Top = 9
      Width = 48
      Height = 16
      Caption = #38498#31995#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 152
      Top = 9
      Width = 48
      Height = 16
      Caption = #25945#24072#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 328
      Top = 9
      Width = 48
      Height = 16
      Caption = #35838#31243#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Btnqry: TButton
      Left = 504
      Top = 8
      Width = 75
      Height = 25
      Caption = #26597#35810
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = BtnqryClick
    end
    object Cmbdepart: TComboBox
      Left = 64
      Top = 8
      Width = 81
      Height = 21
      ItemHeight = 13
      TabOrder = 1
      Text = #20449#24687#31995
      OnChange = CmbdepartChange
      Items.Strings = (
        #20449#24687#31995
        #35745#31639#26426#31995
        #31649#29702#31995)
    end
    object Cmbteacher: TComboBox
      Left = 200
      Top = 8
      Width = 121
      Height = 21
      ItemHeight = 13
      TabOrder = 2
      OnChange = CmbteacherChange
    end
    object Cmbcourse: TComboBox
      Left = 368
      Top = 8
      Width = 121
      Height = 21
      ItemHeight = 13
      TabOrder = 3
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 41
    Width = 465
    Height = 452
    Align = alLeft
    DataSource = DataSource1
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object Btnscore: TButton
    Left = 480
    Top = 216
    Width = 82
    Height = 25
    Caption = #25104#32489#32479#35745
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = BtnscoreClick
  end
  object Memo1: TMemo
    Left = 472
    Top = 288
    Width = 217
    Height = 193
    Lines.Strings = (
      '')
    TabOrder = 3
  end
  object Edit1: TEdit
    Left = 544
    Top = 184
    Width = 73
    Height = 28
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
  end
  object Btnchange: TButton
    Left = 568
    Top = 216
    Width = 73
    Height = 25
    Caption = #20998#25968#20462#25913
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnClick = BtnchangeClick
  end
  object DBEdit1: TDBEdit
    Left = 544
    Top = 56
    Width = 121
    Height = 28
    DataField = 'studentno'
    DataSource = DataSource2
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
  end
  object DBEdit2: TDBEdit
    Left = 544
    Top = 88
    Width = 121
    Height = 28
    DataField = 'name'
    DataSource = DataSource2
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
  end
  object DBEdit3: TDBEdit
    Left = 544
    Top = 120
    Width = 121
    Height = 28
    DataField = 'sex'
    DataSource = DataSource2
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
  end
  object DBEdit4: TDBEdit
    Left = 544
    Top = 152
    Width = 121
    Height = 28
    DataField = 'specialty'
    DataSource = DataSource2
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 9
  end
  object DataSource1: TDataSource
    DataSet = Adoqrycourse
    Left = 464
    Top = 72
  end
  object DataSource2: TDataSource
    DataSet = Adoqrystudent
    Left = 656
    Top = 184
  end
  object Adoqrycourse: TADOQuery
    Connection = mainform.ADOConnection1
    AfterScroll = AdoqrycourseAfterScroll
    Parameters = <>
    Left = 464
    Top = 40
  end
  object Adoqrystudent: TADOQuery
    Connection = mainform.ADOConnection1
    Parameters = <>
    Left = 624
    Top = 184
  end
  object ADOQe2: TADOQuery
    Connection = mainform.ADOConnection1
    Parameters = <>
    Left = 568
    Top = 256
  end
  object ADOStoredProc1: TADOStoredProc
    Connection = mainform.ADOConnection1
    ProcedureName = 'ScoreTJ'
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
      end
      item
        Name = '@CourseNO'
        Attributes = [paNullable]
        DataType = ftString
        Size = 6
      end>
    Left = 504
    Top = 256
  end
  object adoqe: TADOQuery
    Connection = mainform.ADOConnection1
    Parameters = <>
    Left = 608
    Top = 256
  end
end
⌨️ 快捷键说明

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