unit1.nfm.~1~

来自「《Delphi 2005程序设计及其应用开发》源代码」· ~1~ 代码 · 共 116 行

~1~
116
字号
object Form1: TForm1
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  Height = 359
  Width = 373
  Left = 0
  Top = 0
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Caption = 'Name'
    Left = 32
    Top = 64
    Width = 27
    Height = 13
  end
  object Label2: TLabel
    Caption = 'Size'
    Left = 32
    Top = 96
    Width = 19
    Height = 13
  end
  object Label3: TLabel
    Caption = 'Weight'
    Left = 32
    Top = 128
    Width = 34
    Height = 13
  end
  object Label4: TLabel
    Caption = 'Area'
    Left = 32
    Top = 168
    Width = 23
    Height = 13
  end
  object DBNavigator1: TDBNavigator
    DataSource = DataSource1
    TabOrder = 0
    Left = 32
    Top = 16
    Width = 320
    Height = 25
  end
  object DBEdit1: TDBEdit
    DataField = 'NAME'
    DataSource = DataSource1
    TabOrder = 1
    Left = 96
    Top = 64
    Width = 161
    Height = 21
  end
  object DBEdit2: TDBEdit
    DataField = 'SIZE'
    DataSource = DataSource1
    TabOrder = 2
    Left = 96
    Top = 96
    Width = 161
    Height = 21
  end
  object DBEdit3: TDBEdit
    DataField = 'WEIGHT'
    DataSource = DataSource1
    TabOrder = 3
    Left = 96
    Top = 128
    Width = 161
    Height = 21
  end
  object DBListBox1: TDBListBox
    DataField = 'AREA'
    DataSource = DataSource1
    ItemHeight = 13
    Items.Strings = (
      'Computer Aquarium'#9
      'South America'#9
      'Screen Savers'#9
      'New Orleans'
      'Africa and Asia'#9
      'Fish Bowls')
    TabOrder = 4
    Left = 96
    Top = 168
    Width = 161
    Height = 129
  end
  object BitBtn1: TBitBtn
    Kind = bkClose
    TabOrder = 5
    Left = 288
    Top = 72
    Width = 73
    Height = 25
  end
  object Table1: TTable
    TableName = 'animals.dbf'
    DatabaseName = 'DBDEMOS'
    Active = True
    Left = 320
    Top = 120
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 288
    Top = 120
  end
end

⌨️ 快捷键说明

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