main.xfm

来自「《Kylix程序设计》一书中附带的例程源代码」· XFM 代码 · 共 30 行

object FrmMain: TFrmMain
  Left = 117
  Top = 117
  Width = 661
  Height = 243
  HorzScrollBar.Range = 651
  VertScrollBar.Range = 41
  ActiveControl = BtnShow
  Caption = 'Showing Virtual Methods...'
  Color = clBackground
  Font.Color = clBlack
  Font.Height = 18
  Font.Name = 'adobe-helvetica'
  Font.Pitch = fpVariable
  Font.Style = []
  ParentFont = False
  PixelsPerInch = 97
  TextHeight = 22
  TextWidth = 10
  object BtnShow: TButton
    Left = 576
    Top = 16
    Width = 75
    Height = 25
    Caption = 'Show'
    TabOrder = 0
    OnClick = BtnShowClick
  end
end