unit1.xfm

来自「delphi编程实效百例的随书源代码 这是其中的界面外观部分」· XFM 代码 · 共 29 行

object Form1: TForm1
  Left = 192
  Top = 107
  Width = 302
  Height = 143
  VertScrollBar.Range = 113
  HorzScrollBar.Range = 238
  Caption = 'Form1'
  Color = clBackground
  PixelsPerInch = 96
  TextHeight = 12
  TextWidth = 6
  object ProgressBar1: TProgressBar
    Left = 88
    Top = 40
    Width = 150
    Height = 18
  end
  object Button1: TButton
    Left = 120
    Top = 88
    Width = 75
    Height = 25
    Caption = #24320#22987
    TabOrder = 0
    OnClick = Button1Click
  end
end