main.xfm

《Kylix程序设计》一书中附带的例程源代码

object FrmMain: TFrmMain
  Left = 279
  Top = 117
  Width = 481
  Height = 200
  HorzScrollBar.Range = 467
  VertScrollBar.Range = 37
  ActiveControl = BtnShow
  Caption = 'My Address Book'
  Color = clBackground
  Font.Color = clBlack
  Font.Height = 13
  Font.Name = 'Helvetica'
  Font.Pitch = fpVariable
  Font.Style = []
  ParentFont = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 97
  TextHeight = 15
  TextWidth = 7
  object BtnShow: TButton
    Left = 392
    Top = 12
    Width = 75
    Height = 25
    Caption = 'Show'
    TabOrder = 0
    OnClick = BtnShowClick
  end
  object Memo: TMemo
    Left = 0
    Top = 0
    Width = 373
    Height = 200
    Align = alLeft
    ScrollBars = ssVertical
    TabOrder = 1
  end
end