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

📄 unit1.~dfm

📁 图书馆管理系统
💻 ~DFM
字号:
object findreader: Tfindreader
  Left = 204
  Top = 145
  Width = 666
  Height = 510
  Caption = #35835#32773#20449#24687#20462#25913
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 5
    Width = 641
    Height = 72
    Caption = #26597#35810#35835#32773
    TabOrder = 0
    object Label6: TLabel
      Left = 48
      Top = 176
      Width = 3
      Height = 13
    end
    object Button1: TButton
      Left = 536
      Top = 16
      Width = 75
      Height = 25
      Caption = #26597#25214'[&S]'
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 536
      Top = 40
      Width = 75
      Height = 25
      Caption = #28165#38500'[&R]'
      TabOrder = 1
      OnClick = Button2Click
    end
    object edit2: TEdit
      Left = 328
      Top = 16
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 2
    end
    object RadioButton1: TRadioButton
      Left = 24
      Top = 16
      Width = 81
      Height = 17
      Caption = #35835#32773#32534#21495
      TabOrder = 3
    end
    object RadioButton2: TRadioButton
      Left = 240
      Top = 16
      Width = 81
      Height = 17
      Caption = #35835#32773#22995#21517
      TabOrder = 4
    end
  end
  object DBNavigator1: TDBNavigator
    Left = 344
    Top = 432
    Width = 220
    Height = 25
    TabOrder = 1
  end
  object Edit1: TEdit
    Left = 120
    Top = 16
    Width = 121
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
    TabOrder = 2
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 327
    Width = 641
    Height = 138
    DataSource = DataSource1
    ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
    ReadOnly = True
    TabOrder = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnCellClick = DBGrid1CellClick
  end
  object Panel1: TPanel
    Left = 8
    Top = 80
    Width = 641
    Height = 242
    TabOrder = 4
    object Label9: TLabel
      Left = 264
      Top = 100
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #30331#35760#26085#26399
    end
    object Label11: TLabel
      Left = 264
      Top = 68
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #30005#35805#21495#30721
    end
    object Label8: TLabel
      Left = 32
      Top = 140
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #32047#35745#25968#37327
    end
    object Label10: TLabel
      Left = 32
      Top = 100
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #30005#23376#37038#20214
    end
    object Label5: TLabel
      Left = 32
      Top = 72
      Width = 57
      Height = 17
      AutoSize = False
      Caption = #24037#20316#21333#20301
    end
    object Label2: TLabel
      Left = 32
      Top = 32
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #35835#32773#24615#21035
    end
    object Label3: TLabel
      Left = 264
      Top = 32
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #35835#32773#31181#31867
    end
    object Label4: TLabel
      Left = 32
      Top = 192
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #22791'       '#27880
    end
    object Edit9: TEdit
      Left = 104
      Top = 140
      Width = 121
      Height = 21
      Color = clBtnFace
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 0
    end
    object Edit7: TEdit
      Left = 104
      Top = 100
      Width = 121
      Height = 21
      Color = clBtnFace
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 1
    end
    object Edit6: TEdit
      Left = 344
      Top = 64
      Width = 121
      Height = 21
      Color = clBtnFace
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 2
    end
    object Edit5: TEdit
      Left = 104
      Top = 64
      Width = 121
      Height = 21
      Color = clBtnFace
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 3
    end
    object Edit3: TEdit
      Left = 104
      Top = 32
      Width = 121
      Height = 21
      Color = clBtnFace
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 4
    end
    object Memo1: TMemo
      Left = 104
      Top = 176
      Width = 377
      Height = 49
      Color = clBtnFace
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 5
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 344
      Top = 32
      Width = 121
      Height = 21
      Color = clBtnFace
      DataField = 'reader_type'
      DataSource = DataSource1
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      KeyField = 'RT_typename'
      ListField = 'RT_typename'
      ListSource = DataSource2
      ReadOnly = True
      TabOrder = 6
      OnMouseDown = DBLookupComboBox1MouseDown
    end
    object MaskEdit1: TMaskEdit
      Left = 344
      Top = 96
      Width = 120
      Height = 21
      Color = clBtnFace
      EditMask = '!9999/99/00;1;_'
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 10
      TabOrder = 7
      Text = '    -  -  '
    end
    object Button4: TButton
      Left = 542
      Top = 193
      Width = 75
      Height = 25
      Caption = #25552#20132'[&C]'
      TabOrder = 8
      OnClick = Button4Click
    end
    object Button3: TButton
      Left = 544
      Top = 152
      Width = 75
      Height = 25
      Caption = #20462#25913'[&M]'
      TabOrder = 9
      OnClick = Button3Click
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 704
    Top = 57
  end
  object ADOTable1: TADOTable
    Active = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=library;Data Source=.'
    CursorType = ctStatic
    TableName = 'Readers'
    Left = 704
    Top = 17
  end
  object ADOTable2: TADOTable
    Active = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=library;Data Source=.'
    CursorType = ctStatic
    TableName = 'Readertype'
    Left = 704
    Top = 120
  end
  object DataSource2: TDataSource
    DataSet = ADOTable2
    Left = 704
    Top = 160
  end
end

⌨️ 快捷键说明

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