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

📄 unit6.~dfm

📁 本人生产实习的内容
💻 ~DFM
字号:
object Form6: TForm6
  Left = 315
  Top = 95
  Width = 696
  Height = 480
  Caption = #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
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 8
    Width = 681
    Height = 433
    ActivePage = TabSheet2
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #21592#24037#20449#24687#20462#25913
      object Label1: TLabel
        Left = 96
        Top = 40
        Width = 112
        Height = 13
        AutoSize = False
        Caption = #36755#20837#20462#25913#21592#24037#32534#21495
      end
      object Label2: TLabel
        Left = 96
        Top = 112
        Width = 97
        Height = 13
        AutoSize = False
        Caption = #36873#25321#20462#25913#20869#23481
      end
      object Label3: TLabel
        Left = 96
        Top = 176
        Width = 89
        Height = 13
        AutoSize = False
        Caption = #36755#20837#20462#25913#20540
      end
      object Label4: TLabel
        Left = 96
        Top = 224
        Width = 89
        Height = 13
        AutoSize = False
        Caption = #22791#27880#20462#25913#36755#20837
      end
      object Edit1: TEdit
        Left = 232
        Top = 32
        Width = 121
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 0
      end
      object ComboBox1: TComboBox
        Left = 232
        Top = 112
        Width = 145
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        TabOrder = 1
        Items.Strings = (
          #22995#21517
          #37096#38376
          #30005#35805
          #22320#22336
          #32844#31216
          #22791#27880)
      end
      object Button1: TButton
        Left = 120
        Top = 336
        Width = 75
        Height = 25
        Caption = #25552#20132
        TabOrder = 4
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 264
        Top = 328
        Width = 75
        Height = 25
        Caption = #37325#32622
        TabOrder = 5
        OnClick = Button2Click
      end
      object Button3: TButton
        Left = 400
        Top = 328
        Width = 75
        Height = 25
        Caption = #36820#22238
        TabOrder = 6
        OnClick = Button3Click
      end
      object Edit2: TEdit
        Left = 232
        Top = 176
        Width = 121
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 2
      end
      object Memo1: TMemo
        Left = 232
        Top = 216
        Width = 185
        Height = 89
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Lines.Strings = (
          #22791#27880#20869#23481#22312#27492#36755#20837)
        ScrollBars = ssBoth
        TabOrder = 3
      end
    end
    object TabSheet2: TTabSheet
      Caption = #37096#38376#20449#24687#20462#25913
      ImageIndex = 1
      object Label5: TLabel
        Left = 136
        Top = 88
        Width = 60
        Height = 13
        AutoSize = False
        Caption = #37096#38376#21407#32534#21495
      end
      object Label6: TLabel
        Left = 136
        Top = 144
        Width = 72
        Height = 13
        AutoSize = False
        Caption = #36873#25321#20462#25913#20869#23481
      end
      object Label7: TLabel
        Left = 136
        Top = 200
        Width = 80
        Height = 13
        AutoSize = False
        Caption = #36755#20837#20462#25913#20540
      end
      object Edit3: TEdit
        Left = 248
        Top = 80
        Width = 121
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 0
      end
      object ComboBox2: TComboBox
        Left = 248
        Top = 136
        Width = 145
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        TabOrder = 1
        Items.Strings = (
          #37096#38376#21517#31216
          #37096#38376#32534#21495
          #36127#36131#20154)
      end
      object Edit4: TEdit
        Left = 248
        Top = 200
        Width = 121
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 2
      end
      object Button4: TButton
        Left = 144
        Top = 296
        Width = 75
        Height = 25
        Caption = #25552#20132
        TabOrder = 3
        OnClick = Button4Click
      end
      object Button5: TButton
        Left = 272
        Top = 296
        Width = 75
        Height = 25
        Caption = #37325#32622
        TabOrder = 4
        OnClick = Button5Click
      end
      object Button6: TButton
        Left = 408
        Top = 296
        Width = 75
        Height = 25
        Caption = #36820#22238
        TabOrder = 5
        OnClick = Button6Click
      end
    end
    object TabSheet3: TTabSheet
      Caption = #24037#36164#20449#24687#20462#25913
      ImageIndex = 2
      object Label8: TLabel
        Left = 144
        Top = 48
        Width = 64
        Height = 13
        AutoSize = False
        Caption = #21592#24037#32534#21495
      end
      object Label9: TLabel
        Left = 144
        Top = 120
        Width = 72
        Height = 13
        AutoSize = False
        Caption = #22522#26412#24037#36164
      end
      object Label10: TLabel
        Left = 144
        Top = 176
        Width = 64
        Height = 13
        AutoSize = False
        Caption = #22870#37329
      end
      object Edit5: TEdit
        Left = 248
        Top = 48
        Width = 121
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 0
        Text = 'Edit5'
      end
      object Edit6: TEdit
        Left = 248
        Top = 112
        Width = 121
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 1
        Text = 'Edit6'
      end
      object Edit7: TEdit
        Left = 248
        Top = 176
        Width = 121
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 2
        Text = 'Edit7'
      end
      object Button7: TButton
        Left = 152
        Top = 288
        Width = 75
        Height = 25
        Caption = #25552#20132
        TabOrder = 3
        OnClick = Button7Click
      end
      object Button8: TButton
        Left = 288
        Top = 288
        Width = 75
        Height = 25
        Caption = #37325#32622
        TabOrder = 4
        OnClick = Button8Click
      end
      object Button9: TButton
        Left = 416
        Top = 288
        Width = 75
        Height = 25
        Caption = #36820#22238
        TabOrder = 5
        OnClick = Button9Click
      end
    end
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=renshi'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 12
    Top = 40
  end
  object ADOTable1: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    MasterSource = DataSource1
    TableName = 'ygb'
    Left = 52
    Top = 32
  end
  object ADOQuery1: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select *'
      'from ygb')
    Left = 92
    Top = 32
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 124
    Top = 32
  end
  object ADOTable2: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'dept'
    Left = 12
    Top = 80
  end
  object ADOQuery2: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from dept')
    Left = 52
    Top = 72
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 84
    Top = 64
  end
  object ADOTable3: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'salary'
    Left = 12
    Top = 128
  end
  object ADOQuery3: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from salary')
    Left = 60
    Top = 120
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery3
    Left = 100
    Top = 112
  end
end

⌨️ 快捷键说明

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