storage.dfm

完整的delphi书籍源代码,大家有空的时候自己慢慢看看

object StorageFrm: TStorageFrm
  Left = 95
  Top = 116
  Width = 641
  Height = 375
  Caption = #24211#23384#32479#35745
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 16
    Top = 16
    Width = 601
    Height = 97
    Caption = #24211#23384#26597#35810
    TabOrder = 0
    object RadioButton1: TRadioButton
      Left = 32
      Top = 32
      Width = 97
      Height = 17
      Caption = #36135#21697#25340#38899#39318#23383
      Checked = True
      TabOrder = 0
      TabStop = True
    end
    object Button1: TButton
      Left = 360
      Top = 24
      Width = 89
      Height = 25
      Caption = #26597#35810
      TabOrder = 1
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 472
      Top = 24
      Width = 89
      Height = 25
      Caption = #36820#22238
      TabOrder = 2
      OnClick = Button2Click
    end
    object RadioButton2: TRadioButton
      Left = 248
      Top = 32
      Width = 97
      Height = 17
      Caption = #20840#37096#24211#23384#20449#24687
      TabOrder = 3
    end
    object Edit1: TEdit
      Left = 128
      Top = 24
      Width = 97
      Height = 21
      TabOrder = 4
    end
    object Button3: TButton
      Left = 360
      Top = 64
      Width = 89
      Height = 25
      Caption = #30701#32447#36135#21697
      TabOrder = 5
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 472
      Top = 64
      Width = 89
      Height = 25
      Caption = #36229#20648#36135#21697
      TabOrder = 6
      OnClick = Button4Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 16
    Top = 120
    Width = 601
    Height = 209
    Caption = #26597#35810#32467#26524
    TabOrder = 1
    object StringGrid1: TStringGrid
      Left = 8
      Top = 32
      Width = 585
      Height = 153
      Color = clBtnHighlight
      ColCount = 9
      FixedColor = clSilver
      FixedCols = 0
      TabOrder = 0
      ColWidths = (
        89
        56
        59
        57
        64
        64
        64
        64
        64)
    end
  end
  object ADOQuery1: TADOQuery
    Connection = LoginFrm.ADOConnection1
    Parameters = <>
    Left = 240
  end
  object ADOQuery2: TADOQuery
    Connection = LoginFrm.ADOConnection1
    Parameters = <>
    Left = 280
  end
end